Hola amigos :
Esto me da error en la version 11.06 (no abre el dialogo, es el Brush porque si lo saco no da problema.)
Funcionaba OK con la 11.05
Las variables estan declaradas, no las pongo aqui por lo extenso. Tanbien tenia fonts definidos que aqui no los puse
para hacerlo mas corto.
De todas maneras el problema es el BRUSH con los Checkbox.
Saludos
Ruben Fernandez
Gracias...
FUNCTION PRUEBA()
LOCAL lFinRec:=.f.
DEFINE BRUSH oBrushNuevo RESOURCE "PAPER"
DEFINE DIALOG oDlgRI RESOURCE "INGRECIBO" TITLE "Ingreso de Recibo" BRUSH oBrusNuevo TRANSPARENT
REDEFINE checkbox oCheq1 VAR nRad1 ID 110 OF oDlgRI UPDATE
REDEFINE GET oGetI1 VAR nImp1 ID 120 of oDlgRI UPDATE PICTURE "999,999.99" WHEN nRad1
REDEFINE BUTTON oBt10 PROMPT "Salir" ID 130 OF oDlgRI ;
ACTION (lFinRec:=.t., oDlgRi:End())
ACTIVATE DIALOG oDlgRI CENTERED VALID LFinRec NOWAIT
oBrushNuevo:End()
Return(.F.)
Gracias...