FiveTech Software tech support forums

... (editrubro(olbx,.F.), olbx:Refresh()); 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

... ) } 1-Quite esta parte olbm:bSeek := {|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( ...

... 300 ACTION Blinking( oBrw ) ACTIVATE TIMER oCLITimer Function Blinking( oBrw ) if ! oBrw:lFocused oBrw:nClrNFBack := iif( oBrw:nClrNFBack==oBrw:nClrBackFocus,oBrw:nClrBackFocus,CLR_BLACK) oBrw:nClrNFFore := iif( oBrw:nClrNFFore==oBrw:nClrBackFocus,CLR_BLACK,oBrw:nClrBackFocus) oBrw:Refresh() ...

Thanks For Your Help ::nClrBackHead := GetSysColor( COLOR_BTNFACE ) ::nClrForeHead := GetSysColor( COLOR_BTNTEXT ) ::nClrBackFocus := GetSysColor( COLOR_HIGHLIGHT ) ::nClrForeFocus := GetSysColor( COLOR_HIGHLIGHTTEXT) // CeSoTech CLR_WHITE ::nClrFBack := ::nClrBackHead // by CeSoTech ...

... | nold := n , n += nwant ,; n := MAX ( 1, MIN ( n, EVAL ( oBrw:bLogicLen ) ) ), 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 ...

... = { || 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 ) }

... := {60,210,190,190,190,160,90,100,180,60} 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) ...

... 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 == VK_RETURN,(xRetVal := ...

... ","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))} ...

... ","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))} ...

... 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) oLbx:nLineStyle := 1 oLbx:nLineHeight ...

... "CBU" 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 ...

Hola Mario. Mira si te funciona esto: oLbx:nClrText := RGB(0,0,0) // text oLbx:nClrPane := RGB(235,225,45) // background //Apuntador oLbx:nClrBackFocus := {|| GetSysColor( COLOR_ACTIVECAPTION ) } //fondo oLbx:nClrForeFocus := {|| CLR_WHITE } //texto o asi: /* Cabeceras: oBjeto:nClrBackHead ...

... 100, 280; SIZE 342,176; FONT oFont OF oDlg; ON CHANGE E_Loca(oDlg); PIXEL oLbx:nClrBackHead:=nRgb(0,130,250) oLbx:nClrForeHead:=nRgb(0,0,0) oLbx:nClrBackFocus:=nRgb(0,100,255) oLbx:nClrForeFocus:=nRgb(255,255,255) oLbx:nClrText= { || iif( deleted(), CLR_GRAY, CLR_BLUE ) } oLbx:nClrPane := {|| ...

... del API de Windows. * Corrección: En la clase TCBrowse, uso adecuado de bloques de código para los colores en las DATAs nClrForeFocus y nClrBackFocus. * Mejoras y correcciones en la clase TXBrowse: a) Soporte para las clases heredadas en los comandos. Los comandos XBROWSE estaban llamando ...