FiveTech Software tech support forums

... ID 181 OF oDlg ; font ofont1 oLbx:nClrBackHead:=nRgb(0,130,250) oLbx:nClrForeHead:=nRgb(0,0,0) oLbx:nClrBackFocus:=nRgb(0,100,255) oLbx:nClrForeFocus:=nRgb(255,255,255) porque no me cambia el color de los títulos

... ; oSay31:Refresh()),)))} oBrw:nClrText := {|| SelColor(1,nItem)} oBrw:nClrPane := {|| SelColor(2,nItem)} oBrw:nClrForeFocus := {|| SelColor(3,nItem)} On key press {Enter].. fuction called ..To edit columns...

... := {|lRet| olbm:DbfSeek(.T.) } oLbm:bkeydown := {|nkey,nflags| iif(nKey = VK_RETURN, nBut:setfocus(),.f.)} olbm:nClrBackFocus := CLR_CYAN olbm:nClrForeFocus := CLR_WHITE REDEFINE BUTTON NBUT ID 102 ACTION (lacepto := .t.,odlg:end()) REDEFINE BUTTON ID 103 ACTION( clientes( olbm, .t.,odbf),olbm:refresh()) ...

... ::nClrBackHead := GetSysColor( COLOR_BTNFACE ) ::nClrForeHead := GetSysColor( COLOR_BTNTEXT ) ::nClrBackFocus := GetSysColor( COLOR_HIGHLIGHT ) ::nClrForeFocus := GetSysColor( COLOR_HIGHLIGHTTEXT) // CeSoTech CLR_WHITE ::nClrFBack := ::nClrBackHead // by CeSoTech ::nClrFFore := ::nClrForeHead ...

... n - nOld } oBrw:bLogicLen := { | | LEN ( oDlg:aControls ) } oBrw:nClrBackFocus := nRGB ( 250, 250, 016 ) && Color del Fondo Amarillo oBrw:nClrForeFocus := nRGB ( 016, 032, 250 ) && Color del Texto Azul oBrw:nLineStyle := 5 && Try different line styles !!! oBrw:lCellstyle ...

... = { || IIF( invdet->posted, CLR_WHITE, CLR_BLACK ) } oLbx1:nClrPane = { || IIF( invdet->posted, CLR_GREEN, CLR_WHITE ) } oLbx1:nClrForeFocus = { || IIF( invdet->posted, CLR_WHITE, CLR_WHITE ) } oLbx1:nClrBackFocus = { || IIF( invdet->posted, CLR_GREEN, CLR_BLUE ) }

... oLbx:bSkip = { | nRecs | oMae:Skipper( nRecs ) } oLbx:nLineStyle := 3 oLbx:lAdjlastcol:= .F. oLbx:nClrBackFocus := CLR_CYAN oLbx:nClrForeFocus := CLR_WHITE REDEFINE RADIO oRad VAR nOrden ID 108, 107, 112 OF oDlg; ON CHANGE Orden(nOrden,oLbx,oMae,oMemos,oDomcli,oClitrans) // Al ...

... oLbx FIELDS "" ; SIZE 65 + (nLen * 2),65 + nLen ; of oDlg ; ON DBLCLICK (xRetVal := eval( bReturnExp ),lExit := TRUE, oDlg:End()) oLbx:nClrForeFocus := CLR_WHITE oLbx:nClrBackFocus := CLR_BLUE oLbx:nClrBackHead := CHEADBACK oLbx:nClrForehead := CHEADFRONT oLbx:bKeyChar := {|nKey| iif(nKey ...

... al Que pertenece ","Plan Mts", "Real Mts" ; FIELDSIZES 80,250,100,100 ; ID 102 OF oDlg oBrw:nClrForeFocus:= {|| CLR_YELLOW } oBrw:nClrBackFocus:= {|| CLR_GREEN } oBrw:bRClicked = { || oLbx:ShowSizes() } oBrw:aJustify := {.F.,.F.,.F.,.F.} oBrw:NCLRPANE:={||IIF((ORDKEYNO())%2==0,RGB(230,230,230),RGB(190,215,190))} ...

... al Que pertenece ","Plan Mts", "Real Mts" ; FIELDSIZES 80,250,100,100 ; ID 102 OF oDlg oBrw:nClrForeFocus:= {|| CLR_YELLOW } oBrw:nClrBackFocus:= {|| CLR_GREEN } oBrw:bRClicked = { || oLbx:ShowSizes() } oBrw:aJustify := {.F.,.F.,.F.,.F.} oBrw:NCLRPANE:={||IIF((ORDKEYNO())%2==0,RGB(230,230,230),RGB(190,215,190))} ...

... oBrw[1]:bChange := { || browse2(which,oRangss,oBrw) } oBrw[2]:nClrText = { || IIF(client->rent_sale,CLR_HBLUE,CLR_BLACK) } oBrw[2]:nClrForeFocus= { || IIF(client->rent_sale,CLR_HGREEN,CLR_WHITE) } oBrw[2]:bLDblClick := {|| sales1(which,oRangos,oBrw,aVar) } oBrw[1]:CreateFromCode() ...

... like so: oBrw[1]:bChange := { || browse2(which,oRange,@oBrw) } oBrw[2]:nClrText = { || IIF(client->rent_sale,CLR_HBLUE,CLR_BLACK) } oBrw[2]:nClrForeFocus = { || IIF(client->rent_sale,CLR_HGREEN,CLR_WHITE) } oBrw[1]:SetArray( aRangos, .t. ) oBrw[2]:bLDblClick := {|| show_client(which,oBrw[1]:nRowSel,oRange,@oBrw,aVar), ...

... code oLbx := TWBrowse():ReDefine(PoAddBrw,{||eval(bData)},; oDlg,aHead,aSizes,,,,,{||eval(bClick)},,,,,CBRWPOCOLOR) oPoitms:SetBrowse(oLbx) oLbx:nClrForeFocus := CBRWFORE oLbx:nClrBackFocus := CBRWBACK oLbx:nClrBackHead := CHEADBACK oLbx:nClrForehead := CHEADFRONT oLbx:aJustify := eval(bAdjust) ...

... ID 102 of oFold:adialogs[3] UPDATE oBrw:bSkip = { | nRecs | obanpro:Skipper( nRecs ) } oBrw:nLineStyle := 3 oBrw:nClrBackFocus := CLR_CYAN oBrw:nClrForeFocus := CLR_WHITE //////////////////////////////////////////////////////////////////// En cambio así sí funciona FUNCTION Brwprove //principal ...

... 16, 95, 100, 14, 8 ; SIZE 119, 120 OF oDlgClient // Lets use different row colors oLbx:nClrText = { || SelColor( Clientes->Nivel ) } oLbx:nClrForeFocus = { || SelColor( Clientes->Nivel ) } ... static function SelColor( nNivel ) local nColor := CLR_BLACK do case case nNivel == 1 nColor ...