Page 1 of 1

poner color a control GET con campo MEMO? (SOLUCIONADO)

Posted: Thu Nov 19, 2015 2:07 am
by Armando
Amigos del foro:

En la versión FWH0810 con el siguiente código le pongo color a un control GET
con campo MEMO

Code: Select all | Expand


            aGets[13]:bGotFocus()  := {|o| o:SetColor(RGB(0,0,0),RGB(197,205,255))}
            aGets[13]:bLostFocus() := {|o| o:SetColor(RGB(0,0,0),RGB(255,255,255))}
 


Pero en la versión FWH1412 ya no funciona, cómo puedo ponerle color
al control GET con campo MEMO??

Saludos

Re: Cómo poner color a control GET con campo MEMO?

Posted: Thu Nov 19, 2015 5:25 am
by alexpdasilva
Olá Amigo,


Tente:

redefine Get aoGetsBem[04] var aDadosBem[04] MEMO id 204 of oFld:aDialogs[6] when( !lSai_0012 .and. lEditaBem ) update COLORS nRgb(0,0,220),nRgb(253,252,213)
aoGetsBem[04]:bLostFocus := { || aoGetsBem[04]:SetColor( CLR_BLACK, CLR_WHITE) }
aoGetsBem[04]:bGotFocus := { || aoGetsBem[04]:SetColor( CLR_BLACK, nRGB( 255,255,45 )), aoGetsBem[04]:setsel(0,0), aoGetsBas[12]:setpos(0) }
aoGetsBem[04]:cToolTip := 'Informe a Descrição do BEM (Ex: Imóvel na Rua São Paulo, 23 - Bairro Centro)'

Um abraço,

Alexandre Pereira

Re: Cómo poner color a control GET con campo MEMO?

Posted: Thu Nov 19, 2015 2:12 pm
by Armando
Alexandre:

Muito obrigado, tudo bem!

Um abraço