Ora, simples! Crie uma classe base que já implemente a interface, e depois
herde dessa classe base!
Num pode fazer isso naum?
Sds.
________________________________
> To: delphi-br@yahoogrupos.com.br
> From: vinic...@msisolucoes.com.br
> Date: Tue, 3 Feb 2009 08:19:53 -0200
> Subject: Re: [delphi-br] Dúvida em Herança
>
>
> Eu tentei com interface tbem...mas no meu caso não vai adiantar...eu
>
> tenho que implementar os métodos da interface em todas as classes que
>
> herdam dela, e eu não queria fazer isso, no meu caso acho que somente
>
> herança múltipla me ajudaria mesmo...
>
> Vocês tem alguma idéia do que seria a saída mais elegante ?
>
>
>
> Rubem Nascimento da Rocha escreveu:
>
>>
>
>>
>
>> O q vc quer fazer chama-se herança múltipla de classes, ou seja, algo
>
>> assim:
>
>>
>
>> type
>
>> TEditbase = class(TCustomEdit, TClassBase)
>
>>
>
>> e isso em Object Pascal não é possível, pq o Object Pascal não suporta
>
>> herança múltipla. O que vc deveria ter feito era criar uma interface
>
>> contendo as declarações dos métodos que vc implementou em TClassBase
>
>> e, depois, criar um componente descendente de TCustomEdit e que
>
>> implementasse essa interface.
>
>>
>
>> type
>
>> IClassBase = interface
>
>> { declare aqui os métodos que existem em TClassBase }
>
>> end;
>
>>
>
>> TEditBase = class(TCustomEdit, IClassBase)
>
>> { aqui, além de declarar os métodos de IClassBase, e seus escopos
>
>> apropriados (private, protected ou public), vc os implementaria
>
>> também! }
>
>> end;
>
>>
>
>>
>
>>
>
>> TEditBase = class(TEdit, IClassBase)
>
>> { aqui, além de declarar os métodos de IClassBase, e seus escopos
>
>> apropriados (private, protected ou public), vc os implementaria
>
>> também! }
>
>> end;
>
>>
>
>> Em Object Pascal, uma classe pode implementar 'n' interfaces, mas só
>
>> pode ser descendente de apenas uma única classe.
>
>>
>
>> Boa sorte.
>
>> Sds.
>
>>
>
>> ________________________________
>
>>> To: delphi-br@yahoogrupos.com.br
>
>>> From: vinic...@msisolucoes.com.br
>
>>> Date: Mon, 2 Feb 2009 14:02:50 -0200
>
>>> Subject: [delphi-br] Dúvida em Herança
>
>>>
>
>>>
>
>>> Pessoal, tenho uma classe derivada de TWinControl, com vários métodos
>
>>>
>
>>> implementados, chamada de TClassBase
>
>>>
>
>>> Agora eu quero fazer um componente derivado de TEdit, com as
>
>>>
>
>>> características da TClassBase
>
>>>
>
>>> Isso é possível ???
>
>>>
>
>>>
>
>>>
>
>>> Obrigado.
>
_________________________________________________________________
Cansado de espaço para só 50 fotos? Conheça o Spaces, o site de relacionamentos
com até 6,000 fotos!
http://www.amigosdomessenger.com.br
