FiveTech Software tech support forums

... "," FEC.EXP. "; COLOR "R+/BG+" //oLbx:refresh() oLbx:aJustify={.t.,.f.,.t.,.t.,.t.,.t.} oLbx:nLinestyle=11 oLbx:nClrbackhead=nRGB(0,150,151) oLbx:nClrforehead=nRGB(78,20,240) oLbx:nClrforefocus=nRGB(249,216,32) oLbx:nClrbackfocus=nRGB(249,29,83) oLbx:bgotfocus = {|| oGet1:setfocus()} //oLbx:nClrpane:={||iif((ordkeyno())%2==0,RGB(0,213,213),rgb(0,150,151))} ...

... FEC.EXP. "; COLOR "R+/BG+" oLbx:refresh() oLbx:aJustify={.t.,.f.,.t.,.t.,.t.,.t.,.t.} oLbx:nLinestyle=11 oLbx:nClrbackhead=nRGB(0,150,151) oLbx:nClrforehead=nRGB(78,20,240) oLbx:nClrforefocus=nRGB(249,216,32) oLbx:nClrbackfocus=nRGB(249,29,83) oLbx:nClrpane:={||iif((ordkeyno())%2==0,RGB(0,213,213),rgb(0,150,151))} ...

Estou usando Twbrowse do Fwh712, mas, no estou conseguindo por Cor nos heads.

oBrw:nClrBackHead := CLR_BLUE
oBrw:nClrForeHead := CLR_WHITE

No muda las Cores...continuam las cores de Default.

Saluds

... // ::nClrFFore y ::nClrFBack -> Color RGB de texto y fondo respectiva- // mente de los (Pies) Footers. Son analogas a las // variables ::nClrForeHead y ::nClrBackHead, usadas en // las Cabeceras (Headers). //14) BUG Arreglado en metodo ::LDblClick(). No se procesaba el bloque // ::bDblClick ...

... //MsgInfo( "despues del listbox" ) oBrow:refresh() oBrow:aJustify={2,2,0,2,2} oBrow:nLinestyle=11 oBrow:nClrbackhead=nRGB(0,213,213) oBrow:nClrforehead=nRGB(0,150,151) oBrow:nClrforefocus=nRGB(249,216,32) oBrow:nClrbackfocus=nRGB(249,29,83) oBrow:nClrpane:={||iif((ordkeyno())%2==0,RGB(0,213,213),rgb(0,150,151))} ...

... ADS compatibility will be critical. I've tried other ways to work with the header background color in WBROWSE also and it does not respond to the nClrForeHead, nClrBackHead values, at least with VISTA. It appears that some of the data values were actually hardcoded and cannot be changed. You saw ...

... 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| Val_nKey(nKey,oBCliente)} ...

... queria... He estado mirando algunas funciones para cambiar el color de las cabeceras. En concreto encontré dos: oBrw:nClrBackHead:=CLR_BLUE oBrw:nClrForeHead:=CLR_WHITE Esto me funciona perfectamente pero el problema es que me pinta todas las cabeceras del browse. Existe alguna forma en la que ...

... CLR_WHITE ; SIZE GETSYSMETRICS( SM_CXSCREEN ) , GETSYSMETRICS( SM_CYSCREEN ) - 30 OF OWND1 OBRW:nClrBackHead := CLR_YELLOW // header OBRW:nClrForeHead := CLR_HBLUE // header ACTIVATE WINDOW OWND1 MODAL AFONT:END() Hth Richard

Ugo wrote:7) In WBrowse.prg:
::nClrForeHead := GetSysColor( COLOR_BTNTEXT ) // Why CLR_BLACK???

This modification is in Redefine() Method.

... // oItem:cPrompt := cPrompt // oItem:nImage := nImage AAdd( ::aItems, oItem ) return oItem 7) In WBrowse.prg: ::nClrForeHead := GetSysColor( COLOR_BTNTEXT ) // Why CLR_BLACK??? 8 ) In Window.prg I have added a new method: METHOD ARefresh() // added by ...

... oSoC:NCLRPANE:={||IIF((ORDKEYNO())%2==0,RGB(176,196,222 ), RGB(70,130,180 ))} oSoC:nClrBackHead:=RGB(0,0,255) oSoC:nClrForeHead:=RGB(255,255,255) oSoC:nClrPane:={ || iif(AUTOS->nivel=10,nClr1,nClr2)} // oSoC:nClrPane:={ || iif(AUTOS->nivel=1,nClr1,RGB(176,196,222 ...

... ALIAS aAlias[12] ; CURSOR oCurdedo; PIXEL @ oBrw:nHeight+20,10 BUTTON "Agrega" OF oDlg PIXEL ; ACTION (oBrw:Edit() ) SIZE 50,Nil oBrw:nClrForeHead := CLR_WHITE oBrw:nClrBackHead := CLR_BLUE oBrw:nClrPane:={||iIF((oBrw:cAlias)->(OrdKeyNo())%2==0,nRGB(242,247,252),nRGB(226,226,208))} ...

... , ; C_RESERVA (oDlg, dFecha1, .f.), oDlg:REFRESH() ) oLbx:nClrPane:={|| IIF((oLbx:cAlias)->(OrdKeyNo())% 2==0,CELE,GRIS)} oLbx:nClrForeHead := AZUL // gracias Raymundo oLbx:bKeyDown:={|nK| IIF ( nK != VK_RETURN, , (FINCAS( "Reserva", tReserva->CON_INM) , oDlg:End()))} oLbx:aHeaders:=aDia ...

... oB:nClrForeFOCUS:=CLR_BLACK Pero no puedo cambiar los colores del encabezado, utilizo lo siguiente : oB:nClrBackHead:=CLR_BLUE oB:nClrForeHead:=CLR_WHITE ( ESTO NO FUNCIONA, SIEMPRE PONE FONDO BLANCO Y LETRAS NEGRAS) y tampoco puedo cambiar los colores del renglon cuando "no esta ...