SOBRE Eventos y clases
Publicado: Dom Nov 27, 2005 9:05 am
En una clase de mantenimiento, como tengo varios metodos que varian en
funcion del apartado del programa, los he creado como eventos y desde donde
la llamo los asigno por ejemplo :
CLASE LLAMANTE :
WITH OBJECT TMantenimiento():New()
.......
:Build_Report := { |lPreview,lSetup|
::Build_Report(lPreview,lSetup) }
END WITH
y mas abajo en esta clase llamante :
METHOD Build_Report( lPreview, lSetup )
..........
Bueno pues en la clase TMAntenimiento tengo un popup en el cual una de sus
opciones llama a ::Build_Report( .T., .F. ) y poniendo un logdebug en el
metodo build_report de la clase llamante me he fijado de que el primer
parametro lo recibe vacio, ni .T. ni .F..
En TMantenimiento declare ::Build_report como EVENT Build_report( lPreview,
lSetup ).
¿ Que estoy haciendo mal ?
Un saludo
funcion del apartado del programa, los he creado como eventos y desde donde
la llamo los asigno por ejemplo :
CLASE LLAMANTE :
WITH OBJECT TMantenimiento():New()
.......
:Build_Report := { |lPreview,lSetup|
::Build_Report(lPreview,lSetup) }
END WITH
y mas abajo en esta clase llamante :
METHOD Build_Report( lPreview, lSetup )
..........
Bueno pues en la clase TMAntenimiento tengo un popup en el cual una de sus
opciones llama a ::Build_Report( .T., .F. ) y poniendo un logdebug en el
metodo build_report de la clase llamante me he fijado de que el primer
parametro lo recibe vacio, ni .T. ni .F..
En TMantenimiento declare ::Build_report como EVENT Build_report( lPreview,
lSetup ).
¿ Que estoy haciendo mal ?
Un saludo