FiveTech Software tech support forums

... codigo... //este es el browse que utilizo: TWBrowse():lHScroll:= .F. @ 6, 2 LISTBOX Brw1 ; FIELDS "" ; ALIAS (CALIAS) ; OF oWndChild ; UPDATE Brw1:SetCols( bro_campo, bro_subtit) Brw1:bDropOver = { | uDropInfo, nRow, nCol, nKeyFlags | ; Brw1:Add( uDropInfo ), MsgBeep() } Brw1:lCellStyle = .T. Brw1:lAutoEdit ...

... creating automatically the columns. Columns can also be generated from predefined arrays of: data, headings and sizes, using the "TSBrowse" method SetCols(). 13.- "TSBrowse" supports several RDD'S: DBFCDX, COMIX, ADS, SIX, DBFNTX, as well as objects like oDbf, oCtx, oTree and Arrays. (other RDD's ...

... uSeekValue ) METHOD Report( cTitle, lPreview ) METHOD ReSize( nSizeType, nWidth, nHeight ) METHOD nRowCount() METHOD SetArray( aArray ) METHOD SetCols( aData, aHeaders, aColSizes ) METHOD SetFilter( cField, uVal1, uVal2 ) METHOD SetTree( oTree ) METHOD ShowSizes() METHOD SetSizes() METHOD Skip( ...

... 0007:15F6 000B2H GETDLGCODE CODE 0007:16A8 000EEH GETDLGCODE CODE 0007:1796 0006AH GETDLGCODE CODE 0007:1800 0017EH _AFIELDS CODE 0007:197E 001B1H SETCOLS CODE 0007:1B30 00089H SHOWSIZES CODE 0007:1BBA 00105H _DRAWICON CODE 0007:1CC0 0010AH ISCOLVISIB CODE 0007:1DCA 00162H DRAWHEADER CODE 0007:1F2C ...

... 0007:15F6 000B2H GETDLGCODE CODE 0007:16A8 000EEH GETDLGCODE CODE 0007:1796 0006AH GETDLGCODE CODE 0007:1800 0017EH _AFIELDS CODE 0007:197E 001B1H SETCOLS CODE 0007:1B30 00089H SHOWSIZES CODE 0007:1BBA 00105H _DRAWICON CODE 0007:1CC0 0010AH ISCOLVISIB CODE 0007:1DCA 00162H DRAWHEADER CODE 0007:1F2C ...

... segun las bodegas que necesites, y despues en la definicion del browse usas esos vectores: REDEFINE LISTBOX oBrw fields ID 999 OF oDlg ; oBrw:SetCols( vec_field1, vec_enc1, vec_size1 ) oBrw:aJustify :=vec_justif Saludos,

... 0005:FDA4 0005EH GETDLGCODE CODE 0005:FE02 0005EH GETDLGCODE CODE 0005:FE60 000B5H GETDLGCODE CODE 0006:0000 001F4H _AFIELDS CODE 0006:01F4 00231H SETCOLS CODE 0006:0426 001B6H SETCOLS CODE 0006:05DC 00109H SHOWSIZES CODE 0006:06E6 0017FH SHOWSIZES CODE 0006:0866 00198H ISCOLVISIB CODE 0006:09FE ...

... wAlias3:="MOVART" REDEFINE LISTBOX oBrw fields ID 999 OF oDlg ; COLOR CLR_BLACK, CLR_WHITE ; FONT oFont ALIAS (WALIAS) UPDATE oBrw:SetCols( VEC0_FIELD1, VEC0_ENC1, VEC0_SIZE1 ) Respecto a usar redefines con ids tenes que utilizar algun editor de recursos como el resource workshop ...

... wAlias3:="MOVART" REDEFINE LISTBOX oBrw fields ID 999 OF oDlg ; COLOR CLR_BLACK, CLR_WHITE ; FONT oFont ALIAS (WALIAS) UPDATE oBrw:SetCols( VEC0_FIELD1, VEC0_ENC1, VEC0_SIZE1 ) Respecto a usar redefines con ids tenes que utilizar algun editor de recursos como el resource workshop ...