Cambiarle el color a un GET

[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())

[JavierVital]

Prueba con :

SetGetColorFocus(Color)

[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.

[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.
 

[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.