FiveTech Software tech support forums

Mr. Rao Gracias por contestar,,, pero el problema persiste... solo haciendo doble click sobre la imagen se arregla el problema REDEFINE XBROWSE oLbx1 ID 4007 OF oDlg; COLUMNS 1,2,3; HEADERS "Mantencion","Servicio Realizado","Detalle/Observaciones"; COLSIZES 150,150,250; ...

... the xbrowse and the entire dialog, but it does not change the display. Can you provide a quick sample of how to get it to switch ? Consider oLbx1 to be the browse, and oOrders to be the database object. Thanks. If there is a sample in the distribution files, that would be great.

... a button click to change those to. ,,, ealord, eprcom, eprvli. I have tried various options, but cannot get them to work. It is a browse called oLbx1 Looking at the include, I thought maybe. oLbx1:aSort := { ,,,ealord, eprcom, eprvli } might work, but aSort is not a DATA in the class. Thanks ...

Gracias nuevamente, pongo un ejemplo de la situacion: Function Menu() local oDlg1, oLbx1, oGet2, oGet3 SET 3DLOOK ON // Microsoft 3D Look DEFINE DIALOG oDlg5 FROM 13,15 TO 38,76 ; TITLE "Control de Tickets " ; nTicket:=0 Libre:=.t. @ 0.25, 19.5 TBTNGET ...

Buenas Tengo un xbrowse en xharbour, y lo inicializo con un array     REDEFINE xBROWSE oLbx1  ;        ARRAY aData     ;        ID 300 of odlg  ;        CELL LINES;        ON LEFT DBLCLICK  (iif(cQuehago$"AM",(cPro1:=aData[oLbx1:nArrayAt,2],cDomi1:=aData[oLbx1:nArrayAt,3],cTel1:=aData[oLbx1:nArrayAt,4],Publicas:cPobla1:=aData[oLbx1:nArrayAt,5],Publicas:ncCodmun1:=aData[oLbx1:nArrayAt,6],Publicas:ccp1:=aData[oLbx1:nArrayAt,7]),.F.),oDlg:Update())  ...

Lubin
Seguramente tampoco me expliqué bien yo

En cada control, asigna en su bGotFocus a una variable un valor que luego evalúas en el ACTION del botón

oLbx1:bGotFocus := { || nMivariable := 1 }

también te serviría igual en el bLostFocus

... 232, 62, 450, 57 How do I resolve this issue? cAlias1 := "qtedim" SELECT qtedim GO TOP SEEK cSerial REDEFINE LISTBOX oLbx1 FIELDS STR( qtedim->pcs, 9 ) , ; qtedim->type , ; qtedim->desc , ; STR( qtedim->len, 5 ) , ; STR( qtedim->wid, 5 ) , ; STR( qtedim->hgt, ...

... OF oSIdlg PROMPT "&Stocking Items", "&Totals" DIALOGS "STOCKINaw", "STOCKINbw" ;        ON CHANGE oLbx1:setfocus() ROUND 5 TRANSPARENT      // ON CHANGE    // Create the browse     REDEFINE  XBROWSE oLbx1 ;       DATASOURCE oStkSrv:aStkPar ...

... query and fields are used and re-associated with the same oLbx2 xBrowse .. here is the pseudo code : Create recordset oRs1 for the first xBrowse oLbx1 Create recordset oRs2... "Select Field1,Field2,Field3 where <some condition>" that ties back to the first recordset and xBrowse ...

Não sei o que há de errado nesta instrução: REDEFINE LISTBOX oLbx1 ; FIELDS Ds_Mar(cBmp), ( cAlias )->CODIGO, ( cAlias )->DESCRICAO ; HEADERS "","Cód", "Descrição" SIZES 30,70,150 ; CURSOR oHand ; ID 108 ALIAS cAlias ...

Grazie, ma non mi funziona lo stesso.

Mi da l'errore e dice che:
oLBX1:lExcelCellWise .... non lo trova

Io ho la versione di FWH 8.10, forse e' un po vecchia ?

Help

Ciao così funziona: @130,5 xBROWSE oLBX1 OF oDlg1 SIZE 390,170 ON DBLCLICK (varturno()); UPDATE pixel FONT fntArial NOBORDER ---- ADD COLUMN TO oLBX1 DATA gio2n ; HEADER "Lu." SIZE 40 PICTURE "@E 9.99" --- oLBX1:lExcelCellWise ...

Prueba asi, al hacer click en el 1er listbox le pasas el focus al 2do.listbox, oLbx2:SetFocus(), select area oLbx2, oLbx2:dbseek( oLbx1_tu_campo_clave ), oLbx2:refresh(), intenta y comenta, saludos...

... de prueba. De aca lo envio del browse: Redefine BtnBmp oBtn2[4] Id 104 Resource "BTO_PRINT" Of oDlg; Action (Print_AFP(),oBrw:Gotop(),oLbx1:Refresh()) y aca se recibe para la emision impresa. Function Print_AFP() STATIC oRepFam LOCAL AFont1, AFont2, Afont3 DEFINE FONT AFont1 NAME "ARIAL" ...

... ( shows Bitmaps with different Colors ) http://www.pflegeplus.com/pictures/Bmpres1.jpg oBrw:bLClicked := { | nRow, nCol | IIF( oLbx1:nArrayAt = 1, oBMP:SetBMP( "Black" ) , NIL ), ; IIF( oLbx1:nArrayAt = 7, oBMP:SetBMP( "Red" ), NIL ) } To display a Image ...