FiveTech Software tech support forums

... := .T. :lColDividerComplete := .T. :lIncrFilter := .F. :nStretchCol := STRETCHCOL_WIDEST :bClrSel := { || { CLR_BLACK, CLR_HGRAY } } :bClrStd := {|| IIf( oBrw:KeyNo() % 2 == 0, { CLR_BLACK, RGB( 198, 255, 198 ) }, { CLR_BLACK, RGB( 232, 255, 232 ) } ) } END AEval( oBrw:aCols, {|o| ...

... d los registros oBrw:lContrastClr := .f. oBrw:lHScroll := .f. oBrw:nHeadStrAligns := AL_CENTER // alinea al centro las cabeceras de columnas oBrw:bClrStd := {|| { iif(!empty(Neteo->FechaPago),CLR_GREEN,CLR_RED),CLR_WHITE } } oBrw:bclrSel := {|| { iif(!empty(Neteo->FechaPago),CLR_GREEN,CLR_RED),CLR_WHITE ...

... Altura del footer oBrw:nFooterLines := 2 // Número de líneas en el footer oBrw:bClrHeader := {|| { nRGB(000,000,000), nRGB(128,255,128) } } oBrw:bClrStd := {|| If( oBrw:KeyNo() % 2 == 0, { CLR_BLACK, RGB( 224, 236, 255 ) }, { CLR_BLACK, RGB( 189, 211, 253 ) } ) } oBrw:bClrFooter := {|| { nRGB(000,000,000), ...

... Altura del footer oBrw:nFooterLines := 2 // Número de líneas en el footer oBrw:bClrHeader := {|| { nRGB(000,000,000), nRGB(128,255,128) } } oBrw:bClrStd := {|| If( oBrw:KeyNo() % 2 == 0, { CLR_BLACK, RGB( 224, 236, 255 ) }, { CLR_BLACK, RGB( 189, 211, 253 ) } ) } oBrw:bClrFooter := {|| { nRGB(000,000,000), ...

... COLSIZES 150,150,250; ARRAY acDatos UPDATE FOOTERS LINES AUTOCOLS 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 ...

bClrStd, bClrSelFocus

Buenos días Usando XBrowse, estas 3 opciones para lograr el efecto pijama oBrw:bClrStd:= { || { CLR_Txt, { CLR_Fdo1, CLR_Fdo2 }[ oBrw:KeyNo % 2 +1 ] } } oBrw:bClrStd:= { || { CLR_Txt, if( oBrw:KeyNo % 2 == 0, CLR_Fdo1, CLR_Fdo2 ) } } oBrw:bClrStd:= { || { CLR_Txt, ...

...                 If( oCol:oBrw:KeyNo % 2 == 0, aClr1, aClr2 ) ) }END  2) We know bClrStd returns a color pair { nClrText, nClrBack } If instead of returning a single color as nClrText, if we return an array of colors, those colors ...

coloring alternate rows we can do oBrw:bClrStd := { || { CLR_BLACK, If( oBrw:KeyNo % 2 == 0, nColor1, nColor2 ) } } how can we color the columns alternately? For a sample if I wish colorized only the 4th colomn I made Function Alternate_Columns(nColor1,oBrw)  ...

... fácilmente 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 ...

... library. You 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, ...

Gracias Francisco!! Efectivamente, tenía un error conceptual de donde debía poner el bClrStd. En realidad siempre tenemos que indicarle la condición. Sino solo toma los valores del primer registro del xbrowse Lo solucioné de esta forma (parecido a lo que vos me propones) ...

Gracias Francisco!! Efectivamente, tenía un error conceptual de donde debía poner el bClrStd. En realidad siempre tenemos que indicarle la condición. Sino solo toma los valores del primer registro del xbrowse Lo solucioné de esta forma (parecido a lo que vos me propones) ...

... en la columna 8 quiero mostrar lo siguiente: - Si en la base de datos la forma de pago es Giro, y está pagada, (Color fuente y fondo normal) :bClrStd:= { || { CLR_BLACK, If( oLbx:KeyNo % 2 == 0, nRGB(242,247,252),nRGB(226,226,208) ) } } - Si en la base de datos la forma de pago es Giro y no ...

For I=1 To [Numeros de columnas] If I=8 oBrw:aCols[I]:bClrStd:={|| If(((aAlias[22])->clasef="1" .and. (aAlias[22])->estado="1" ),{CLR_BLACK,nRGB(250,219,216)}, {CLR_BLACK,If( oLbx:KeyNo % 2 == 0, nRGB(242,247,252),nRGB(226,226,208) ...