FiveTech Software tech support forums

... XBROWSE oBrw OF oWnd ; DATASOURCE oQry ; COLUMNS aCols ; LINES CELL AUTOSORT SIZE -10,-10 PIXEL FONT oFont WITH OBJECT oBrw :bClrRowFocus := oBrw:bClrSelFocus :nRowHeight := 25 :nHeaderLines := 4 :nHeaderHeight := 70 :oHeaderFonts := oFont :nFooterHeight := 20 :nFooterLines := 2 :nStretchCol := ...

... := MARQSTYLE_HIGHLROW // Con cursor de todo el renglón oBrw:nColDividerStyle := LINESTYLE_RAISED oBrw:nRowDividerStyle := LINESTYLE_RAISED oBrw:bClrSelFocus := {|| { nRGB( 0, 0, 0), nRGB(128,255,128) } } // para barra de linea selecc cuando el control tiene el foco oBrw:lColDividerComplete := ...

... := MARQSTYLE_HIGHLROW // Con cursor de todo el renglón oBrw:nColDividerStyle := LINESTYLE_RAISED oBrw:nRowDividerStyle := LINESTYLE_RAISED oBrw:bClrSelFocus := {|| { nRGB( 0, 0, 0), nRGB(128,255,128) } } // para barra de linea selecc cuando el control tiene el foco oBrw:lColDividerComplete := ...

... CELL olbx1:l2007:=.t. olbx1:gotop() olbx1:bClrStd:={|| aClrCol [ olbx1:keyno%2+1]} olbx1:bClrSel:={|| { nRGB( 0, 0,255), aGradBarSel } } olbx1:bClrSelFocus := { || { CLR_BLACK, aGradBarSelFocus } } olbx1:nColDividerStyle := LINESTYLE_BLACK olbx1:nMarqueeStyle := 3 olbx1:lcoldividercomplete:=.f. ...

bClrStd, bClrSelFocus

... ), CLR_HRED, nClrBackBrw ),;                           MY_PAARS } }   endif   cClrBack     := Eval( oBrwSel:bClrSelFocus )[ 2 ]  //  I don't know what this is doing   oBrwSel:SetChecks()   oBrwSel:bRClickHeaders := { || XbrColSelector( ...

... un proyecto con ella. No lo hemos probado extensamente así que los comentarios son bienvenidos. * xbrowse.prg: - Desde FWH2008, bClrStd, bClrSel, bClrSelFocus se evalúan con dos parámetros, a saber, los objetos browse y column. El objeto column es nulo cuando browse evalúa los bloques. Sin embargo, ...

... can easily build a project using it. We have not extensitevely tested it so feedback is welcome. * xbrowse.prg: - Since FWH2008, bClrStd, bClrSel, bClrSelFocus are evaluated with two parameters, viz., browse and column objects. column object is nil when browse evaluates the blocks.However, if a ...

... setting and see if the problem is fixed: oBrw:lContrastClr := .F. 4) If the problem still persists, please let us see your codeblocks: bClrStd, bClrSelFocus Dear Rao, I add oBrw:lContrastClr := .F. Still got problem. Look my codeblocks: bClrStd, bClrSelFocus below: oListBox:bClrStd = {||If(oListBox:KeyNo() ...

... setting and see if the problem is fixed: oBrw:lContrastClr := .F. 4) If the problem still persists, please let us see your codeblocks: bClrStd, bClrSelFocus

... .t. //Ineed the value zero FOR i := 1 TO LEN(:aCols) oCol := :aCols[ i ] oCol:nWidth := 30 if i >1 oCol:bClrStd := ChangeColor( oBrw, i ) oCol:bClrSelFocus := {|| { CLR_BLACK, { { 1, RGB( 252, 235, 220 ), RGB( 255, 0,0 ) } }}} endif NEXT :CreateFromCode() :aCols[ 1 ]:nWidth := 100 :aCols[ 1 ...

... .t. //Ineed the value zero FOR i := 1 TO LEN(:aCols) oCol := :aCols[ i ] oCol:nWidth := 30 if i >1 oCol:bClrStd := ChangeColor( oBrw, i ) oCol:bClrSelFocus := {|| { CLR_BLACK, { { 1, RGB( 252, 235, 220 ), RGB( 255, 0,0 ) } }}} endif NEXT :CreateFromCode() :aCols[ 1 ]:nWidth := 100 :aCols[ 1 ...

... ; } @ 0,0 XBROWSE oBrw OF oWnVta ; DATASOURCE oQry ; COLUMNS aCols ; LINES CELL AUTOSORT WITH OBJECT oBrw :bClrRowFocus := oBrw:bClrSelFocus :nRowHeight := 25 :nHeaderLines := 3 :nHeaderHeight := 60 :oHeaderFonts := oFont :nFooterHeight := 20 :nFooterLines := 2 :nStretchCol := ...

bClrSelFocus // when the browse has focus
bClrSel // when browse is not in focus

bClrSel,; // default color pair for selected row
bClrSelFocus,; // default color pair for selected row when control has focus