Page 1 of 1
Cambiarle el color a un GET
Posted: Sun May 12, 2013 9:06 pm
by juan fco. vasquez Mendoza
Hola, intento cambiarle el color a un GET de esta forma y no cambia el color,
DEFINE DIALOG VENCOM01 resource "COMANDA"
DEFINE FONT fontc01 NAME "BOLD" SIZE 7,-18
redefine get OGCOM06 var totcom id 4054 OF VENCOM01 FONT fontc01 PICTURE "9,999,999.99" COLOR CLR_RED, CLR_RED
Activate Dialog vencom01 centered ON INIT INICIOM() VALID (SALIR())
Re: Cambiarle el color a un GET
Posted: Sun May 12, 2013 10:51 pm
by JavierVital
Prueba con :
SetGetColorFocus(Color)
Re: Cambiarle el color a un GET
Posted: Sun May 12, 2013 10:56 pm
by FranciscoA
Tambien puedes probar asi:
Code: Select all
REDEFINE GET oGtosAdmon VAR nGtosAdmon ID 132 OF oDlg PICTURE "99,999,999,999.99"
oGtosAdmon:bGotFocus := {||oGtosAdmon:SetColor( RGB(0,0,0), RGB(252,232,171) ) }
oGtosAdmon:bLostFocus := {||oGtosAdmon:SetColor( CLR_BLACK, CLR_WHITE ) }
Saludos.
Re: Cambiarle el color a un GET
Posted: Mon May 13, 2013 2:21 pm
by Patricio Avalos Aguirre
Hola
Lo puedes hacer tambien asi
Code: Select all
redefine get OGCOM06 var totcom id 4054 OF VENCOM01 FONT fontc01 PICTURE "9,999,999.99" COLOR CLR_RED, CLR_RED
OGCOM06:lDiscolors := .f.
Re: Cambiarle el color a un GET
Posted: Mon May 13, 2013 8:13 pm
by juan fco. vasquez Mendoza
Hey muchas gracias a todos, la ultima opción mas reducida de codigo, pero buenas las demas.
Gracias Mil...
Juan
Rep. Dom.