Definir parametros en funciones de clases

Definir parametros en funciones de clases

Postby jvtecheto » Thu Apr 18, 2019 4:50 pm

Hola, que tal:

Una pregunta sobre las clases, estoy viendo como se definen y
observo que en la definicion de los metodos.
Por Ejemplo en la clase TAutoget de Daniel Garcia (Hay que dar las autorias)

METHOD KeyDown( nKey, nFlags )


METHOD OpenList() // Este metodo en su definicion no tiene parametros.

pero cuando se implementa , aparecen parametros.
METHOD OpenList( nKey, nFlags ) CLASS TAutoGet

local nTop := ::nBottom //* WIN_CHARPIX_H
local nLeft := ::nLeft //* WIN_CHARPIX_W

¿Cuando se tienen que declarar los parametros y cuando no?

Tambien observo que ::nBottom , no pertenece a la clase TAutoget, o sea no esta definido en DATA, enconces
¿A que se variable se refiere con ::nBottom?

Otra cosa que veo . Por ejemplo
Eval( ::bCloseList, Self )

Tengo entendido que :: es sinonimo de Self. Entonces.
¿A que se refiere con Self?

Gracias por vuestra ayuda amigos.

Jose.
Fwh 24.07 64 bits + Harbour 64 bits 3.2dev(r2407221137) + MSVC64
User avatar
jvtecheto
 
Posts: 592
Joined: Mon Mar 04, 2013 4:32 pm
Location: Spain

Re: Definir parametros en funciones de clases

Postby Antonio Linares » Thu Apr 18, 2019 5:21 pm

José,

> ¿Cuando se tienen que declarar los parametros y cuando no?

En la cabecera de la Clase (entre CLASS y ENDCLASS), el indicar los parámetros es opcional, pero muy recomendable el especificarlos para entender cada método los parámetros que precisa.

>
Tambien observo que ::nBottom , no pertenece a la clase TAutoget, o sea no esta definido en DATA, enconces
¿A que se variable se refiere con ::nBottom?
>

Cuando hacemos:

CLASS TAutoGet FROM TGet

las DATAs de TGet están también accesibles desde TAutoGet. Y asi sucesivamente.

> :: y Self

:: es lo mismo que Self:

Es una abreviatura
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 42063
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: Google [Bot] and 58 guests