Heredando la TPrinter
Posted: Fri Nov 21, 2008 8:24 am
Porqué cuando heredamos una clase de la TPrinter es necesario pasar como parámetro "Self" a los metodos.
me explico :
Alguna pista.. ?
me explico :
Code: Select all
CLASS TRptConc FROM TPrinter
METHOD Dialog()
METHOD Go()
METHOD Head()
METHOD Foot()
METHOD Body()
ENDCLASS
...
PRINT Self PREVIEW
PAGE
::Head() //al ejecutar esta linea arroja un error de parametros
::Head(Self) // cuando mando el objeto, ahi si funciona
ENDPAGE
ENDPRINT
METHOD Head(oPrn) CLASS TRptConc
oPrn:cmSay( 3.0,9.0, "testtttt".... )
::cmSay( 3.0,9.0, "testtttt".... ) //se supone que esta linea deberia tener el mismo efecto que la anterior... pq no es asi,???
Return Self