FiveTech Software tech support forums

Hi,

Is there any way to have a 2 colours one for each line in tcbrowse with / wihtou lcellstyle

Antonio

... := 30 dbServi:nLineHeight := 20 dbServi:aHJustify := { 0, 0, 0 } dbServi:lAdjLastCol := .F. dbServi:lAdjBrowse := .T. dbServi:lCellStyle := .T. nkey es la llave compuesta, alguna otra manera pero sin el set filter, que estoy haciendo mal

... SIZES 65,65,65; HEADERS "Desc","Exist","Cod"; ID 110 OF oDlg; ON DBLCLICK ModExi(oDlg) oBrw:lCellStyle:=.t. oBrw:SetColor(CLR_HRED,CLR_YELLOW) REDEFINE GET oRub VAR vRub ID 107 OF oDlg PICTURE '@!'; VALID{||Valcheck()}; WHEN{||VerRubro()} REDEFINE ...

... oBCliente:nColAct:=1 oBCliente:nLineStyle:=6 oBCliente:lCellStyle:=.T. oBCliente:nClrForeHead:=CLR_BLUE oBCliente:aColSizes := {80,260} oBCliente:bLDblClick:={|| Sol_Datos(.F.)} oBCliente:bKeyDown:={|nKey| ...

... report", .T. ),; * oRs:MoveFirst(),; * oRs:Move( nRec - 1 ) ) ADD COLUMN TO oBrw; DATA oRs:Fields( "file_name" ):Value; HEADER "File_name" oBrw:lCellStyle = .T. oBrw:bLogicLen = { || oRs:RecordCount } oBrw:bGoTop = { || oRs:MoveFirst() } oBrw:bGoBottom = { || oRs:MoveLast() } oBrw:bSkip = { ...

... "%Cost", "Sel Price", "" ; FIELDSIZES 80, 60, 60, 0 of oDlg2 oLbx:SetArray(aItems) // This enables the Cell navigation style for the browse oLbx:lCellStyle := .T. // To perform and edit Cell operation using left double click oLbx:bLDBLclick := { |nRow, nCol, nKeyFlags| ; ColVarChg(@oLbx, @aItems), ...

... 0 },; { "TEST2", "C", 10, 0 } } ) USE BUGTEST DEFINE WINDOW oWnd @ 0, 0 LISTBOX oBrw FIELDS oBrw:lCellStyle = .T. oWnd:oClient = oBrw ACTIVATE WINDOW oWnd; MAXIMIZED CLOSE RETURN NIL Try to move one cell right and you will see that a ...

... las funciones similares Msg... cuando visualizan una fecha usando xHarbour. * Corrección: Pequeqa corrección sobre la clase TWBrowse cuando se usa lCellStyle como ".T." y un bloque de código como color de fondo. * Corrección: En FWPPC, la función GetWindowText() estaba corrompiendo la memoria del ...

... * Fix: Minor fix on MsgInfo() and similar Msg... functions when displaying a date using xHarbour. * Fix: Minor fix on Class TWBrowse when using lCellStyle as true and a codeblock for the background color. * Fix: FWPPC, function GetWindowText() was corrupting the Pocket PC memory. Now it is ok! ...

... font ofont size 330, 120 update pixel listrubros:ajustify:={.f.,.f.,.f.} listrubros:cAlias := "ARRAY" listrubros:setarray(arubros) listrubros:lcellstyle:=.t. listrubros:nlinestyle:=1 Un saludo Marcelo Jingo

... "Nombre","Desc" SIZE 240,200 PIXEL OF _oWnd ; ON CLICK (EditCelda(oBrw,aPicture,aCampos)) ; FONT oFnt oBrw:lCellStyle:=.t. // por celda oBrw:aJustify:={.f.,.t.} // Justifica el texto a la derecha o ala izquierda de cada campo ACTIVATE ...

olbx:ncolAct
guarda el número de columna actual


olbx:lcellstyle := .t.
olbx:bLClicked:={|nRow,nCol|MSGALERT(olbx:ncolact)}


Un saludo

Marcelo Jingo

... alta resolución (como PNGs). * Corrección: En FWH/FW++/FWC3 y FWPPC, la clase TWBrowse pinta correctamente los colores de fila seleccionados, si lCellStyle es usado. * Mejora: La función FixSays() estaba causando problemas en algunas versiones de Windows. Ahora está correcta. * Mejora: La clase ...

... New: Added high resolution icons and bitmaps (as PNGs). * Fix: FWH/FW++/FWC3 and FWPPC, Class TWBrowse properly paints the selected row colors if lCellStyle is used. * Enhancement: function FixSays() was causing some troubles on some Windows versions. now it is ok. * Enhancement: Class TWBrowse ...

... ID 301 OF ::oDlg ::oBrw:SetODBF( ::oMainDb ) ::oBrw:bKeyDown := {| nKey | ::BrwKeyDown ( nKey ) } ::oBrw:bChange := {|| ::DisplayData() } ::oBrw:lCellStyle := .t. BrwGrade( ::oBrw ) ADD TO ::oBrw DATA ::oMainDb:CODE ; TITLE "CODE" ; SIZE 49 METHOD ReGet() CLASS TA_Acc_Cust REDEFINE GET ::oMainDb:oNAME ...