Si creo una clase y uno de los metodos crea un dialogo, como hago para definir la acción de un boton, ahora lo estoy haciendo con codeblocks pero eso me obliga a definir variables
Code: Select all
CLASS XXX
METHOD VerDialogo()
ENDCLASS
METHOD VerDialogo
DEFINE DIALOGO ::oDialogo
REDEFINE BTNBMP .... ACTION ::oDialgo:End()
...
Code: Select all
bAction := {|| ::oDialogo:End()}
REDEFINE BTNBMP .... ACTION Eval(bAction)
gracias.