Para Daniel, manu y fernando GET........

Para Daniel, manu y fernando GET........

Postby Wneskers » Sat Apr 29, 2006 6:14 pm

Estimados amigos tengo lo siguiente

statil function cambia (ofld)
ofld:setoption(2)
ofld:noption:2
olfd:refresch()

lo aplique en el programa para que cambie automaticamente a la carpeta del folder, lo hace bien, pero no se me ubica automaticamente en el primer get de ese folder ¿como haria para que se ubique?

y lo siguiente: como hago para que un get tenga un color diferente mientras tenga el foco, apesar que ya lo he definido por ejemplo:

REDEFINE GET oCod ID 110 ;
COLOR Rgb(128,128,128) (255,255,0).

EN ESTE EJEMPLO YA DEFINE EL COLOR QUE TENDRA PERO QUIERO ES QUE EL COLOR LO TENGA DESPUES QUE PIERDA EL FOCO Y MIENTRAS LO TIENE QUE SEA POR EJEMPLO DE AMARILLO Y NEGRO,

de antemano muchas gracias por los concejos dados anterior mente
Wneskers
 
Posts: 15
Joined: Wed Mar 29, 2006 2:46 pm
Location: Maracay. Venezuela

Postby DanielPuente » Sun Apr 30, 2006 7:41 am

Wneskers:

Respecto al foco en el get del folder:

oFld:aDialogs[2]:bGotFocus:={ || oCodPro:SetFocus() }

Respecto al color del get podes modificar la clase tget de fivewin:

-En METHOD GotFocus() CLASS TGet al final agregas:

::SetColor(nRgb(15,15,15),nRgb(208,218,242)) // agregado daniel

antes de:

Super:GotFocus()

return 0


-Y en METHOD LostFocus() CLASS TGet, al final:

::SetColor(nRgb(15,15,15),nRgb(255,255,255)) // agregado daniel

return nil


Sino en cada get:

oGet:bGotFocus:={|| oGet:SetColor(nRgb(15,15,15),nRgb(208,218,242))}
oGet:bLostFocus:={|| oGet:SetColor(nRgb(15,15,15),nRgb(255,255,255))}

Saludos,
Daniel Puente
Mar del Plata, Argentina
danielpuente@speedy.com.ar
puenteda@hotmail.com
DanielPuente
 
Posts: 108
Joined: Sun Oct 09, 2005 6:12 pm
Location: Mar del Plata - Argentina


Return to FiveWin para CA-Clipper

Who is online

Users browsing this forum: No registered users and 13 guests