Override Method

Projeto [x]Harbour - Compilador de código aberto compatível com o Clipper.

Moderador: Moderadores

Avatar do usuário
sygecom
Administrador
Administrador
Mensagens: 7131
Registrado em: 21 Jul 2006 10:12
Localização: Alvorada-RS
Contato:

Override Method

Mensagem por sygecom »

Olá Pessoal,

Alguém sabe como contornar o uso de OVERRIDE METHOD no harbour, pelo que pude ver ainda não existe esse recurso disponível no Harbour.

É bem útil para sobrescrever funções e method de uma classe.
Leonardo Machado
xHarbour.org + Hwgui + PostgreSql
rossine
Usuário Nível 3
Usuário Nível 3
Mensagens: 325
Registrado em: 06 Ago 2007 09:57
Localização: Divinópolis-MG

Override Method

Mensagem por rossine »

Olá Leonardo,

Tem que incluir isto no teu fonte:

#include "xhbcls.ch"

Teu exemplo funcionado aqui: http://groups.google.com/group/harbour- ... 04f74b72e#

Abraços,

Rossine.
Rossine.

Harbour 3.4, MingW / Msvc, QT, Qt5xhb, GtQtc, DbfCdx, MySql/MariaDB.
Avatar do usuário
sygecom
Administrador
Administrador
Mensagens: 7131
Registrado em: 21 Jul 2006 10:12
Localização: Alvorada-RS
Contato:

Override Method

Mensagem por sygecom »

Obrigado Rossine, deu certo.
Leonardo Machado
xHarbour.org + Hwgui + PostgreSql
Avatar do usuário
Itamar M. Lins Jr.
Administrador
Administrador
Mensagens: 7929
Registrado em: 30 Mai 2007 11:31
Localização: Ilheus Bahia
Curtiu: 1 vez

Override Method

Mensagem por Itamar M. Lins Jr. »

Repassando...
#xcommand METHOD <msg> SUBCLASS <ivar> => ;
MESSAGE <msg> TO <ivar>

or if you want to froce SELF as method result:

#xcommand METHOD <msg> SUBCLASS <ivar> => ;
MESSAGE <msg> INLINE ::<ivar>:<msg>, Self

best regards,
Przemek
É isso mesmo ?
Eu não trabalho com classes "ainda"

Saudações,
Itamar M. Lins Jr.
Saudações,
Itamar M. Lins Jr.
Responder