FiveTech Software tech support forums

Te pongo este ejemplo amigo, espero que te sirva, esta hecho con listbox oLbx4:bTextColor := { | nRow, nCol, nStyleLine | ColoresTexto( nRow, nCol, nStyleLine, oDlg2 ) } STATIC Function ColoresTexto( pnRow, pnCol, pnStyle, oFolder ) Local cColor, nPaso, i:=0, cCampo:="" ...

oTbw:bBkColor := {|nRow,nCol,nStyleLine| if(nStyleLine=0, nBckGrd(oTbw), if( nStyleLine =3 , nRGB( 64, 64, 255 ), BRW_HEADER )) } nStyleLine=3 (Header) Thanks For Your Help The example changes the colour of the content of the listbox. I ...

Where do I put the above for oLbx ? oTbw:bBkColor := {|nRow,nCol,nStyleLine| if(nStyleLine=0, nBckGrd(oTbw), if(nStyleLine=3 , nRGB( 64, 64, 255 ), BRW_HEADER )) } I tried to change Tbw/Brw to Lbx, but it does not work for oLbx. Regards ACWoo Using Fwh2101+bcc582+Harbour ...

... COLOR_BTNSHADOW ) // by CeSoTech ::nClrNFFore := ::nClrForeFocus // by CeSoTech Where do I put the above for oLbx ? oTbw:bBkColor := {|nRow,nCol,nStyleLine| if(nStyleLine=0, nBckGrd(oTbw), if(nStyleLine=3 , nRGB( 64, 64, 255 ), BRW_HEADER )) } I tried to change Tbw/Brw to Lbx, but it does not ...

... oBCmp:nClrPane := {|| IIF((oBCmp:cAlias)->(OrdKeyNo())%2==0,nRGB(248,248,248),nRGB(220,255,220))} //236,255,236 oBCmp:bTextColor:={|nRow,nCol,nStyleLine| IF(nCol>1 .AND. nStyleLine=0 .AND. (oDCmp)->Status=="C",CLR_HRED,)} oBCmp:bBkColor := {|nRow,nCol,nStyle| If( nStyle==0 ...

... oBCmp:nClrPane := {|| IIF((oBCmp:cAlias)->(OrdKeyNo())%2==0,nRGB(248,248,248),nRGB(220,255,220))} //236,255,236 oBCmp:bTextColor:={|nRow,nCol,nStyleLine| IF(nCol>1 .AND. nStyleLine=0 .AND. (oDCmp)->Status=="C",CLR_HRED,)} oBCmp:bBkColor := {|nRow,nCol,nStyle| If( nStyle==0 ...

... en browse normal... caso 1 http://img15.imageshack.us/img15/3006/brw1.jpg aqui el codigo: oBrw[x]:bBkColor := { | nRow, nCol, nStyleLine | ColoresCelda( nRow, nCol, nStyleLine, oFolder ) } oBrw[x]:bTextColor := { | nRow, nCol, nStyleLine | ColoresTexto( nRow, nCol, nStyleLine, ...

... this, change color and font oBGru:bBkColor := {|nRow,nCol,nStyle| IF( nStyle==0 .and. nCol==2, ; nRGB(255,135,15), ) } oBGru:bFont := {|nRow,nCol,nStyleLine| ; IF(nStyleLine==1 .AND. nCol==2,oFnt:hFont,) } regards Paco

... {|| (oDCos)->(OrdSetFocus("CUENTA")), ; oBCos:aHeaders[ 2 ] := "CUENTA" , ; oBCos:aHeaders[ 3 ] := "N o m b r e" , ; oBCos:bFont := {|nRow,nCol,nStyleLine| ; IF(nStyleLine==1 .AND. nCol==2,oFnt:hFont,) },; oBCos:cBuffer:="",; (oDCos)->(DbGoTop()),; oBCos:Refresh(),; SndPlaySound("Click.Wav") ...

En wbrowse de hernan hay un codeblock para es proposito

oLbx:bFont := {|nRow,nCol,nStyleLine| my_SetFont( nRow, nStyleLine , oLbx ,_NOLBX,NOLBX,oFont1,oFont2,condtota ) }

en xbrowse no hay para poner un codeblock ni a nivel de objto
browse ni de objetos columnas.


Gracias

... otro valor, los colores ser n los especi- // ficados en las respectivas varialbes de instancia de la clase. // Se env¡an 3 argumentos: {|nRow,nCol,nStyleLine| ... } // nStyleLine, puede asumir los siguientes valores: // 0 -> Celda standard normal // 1 -> Celda Header // 2 -> Celda Footer ...

... del valor logico del cmapo es el bitmap que usas. Karinha, asi pongo el color y uso el TWBROWSE de HDC oBrw:bTextColor := { | nRow, nCol, nStyleLine | IF(nStyleLine=0 .AND. (oDMov)->Borrado,CLR_HRED,) } salu2 Paco Gracias Francisco. Francisco, como hacer para dar un salto en las celdas ...

... del valor logico del cmapo es el bitmap que usas. Karinha, asi pongo el color y uso el TWBROWSE de HDC oBrw:bTextColor := { | nRow, nCol, nStyleLine | IF(nStyleLine=0 .AND. (oDMov)->Borrado,CLR_HRED,) } salu2 Paco

... que editan con wbrowse. unicamente unas observaciones: 1. ahi seria ajustar el alto de la fila cuando no quepa el combobox 2. en la edicion con nStyleLine=2 2.1 con font el dato se posiciona 1 pixel abajo 2.2 sin font el dato se posiciona 1 pixel arriba es casi imperceptible (fue lo mejor que ...

... desde el browse, no en la edicion, le puedes indicar en que columna y listo, creo es mas facil... prueba a hacer esto: oBrw:bFont := {|nRow,nCol,nStyleLine| CambiaFuente( nRow, nCol, nStyleLine, oFont[1], oFont[2], oFont[3] ) } Function CambiaFuente( nRow, nCol, nStyle, oF1, oF2, oF3 ) local ...