Olá pessoal, Valeu pelo mini-artigo Rubem, para eu que estou começando a estudar ObjectPascal agora é uma boa saber dessas informações.
Valeu! :) ________________________________ []'s, Silvio Clécio --- Linux User: #481900 Skype: silvioprog ICQ: 432519902 E-mail, Y! Messenger: silviop...@yahoo.com.br Gmail, GTalk: silviop...@gmail.com Hotmail, MSN: silviop...@hotmail.com BlogSpot: http://silvioclecio.blogspot.com/ BlogSite: http://silvioprog.blogspot.com/ °oO| Seja livre, use Linux! |Oo° ________________________________ De: Rubem Nascimento da Rocha <djpardalro...@hotmail.com> Para: delphi-br <delphi-br@yahoogrupos.com.br> Enviadas: Segunda-feira, 2 de Fevereiro de 2009 14:12:56 Assunto: RE: [delphi-br] Dúvida em Herança 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...@yahoogrup os.com.br > From: vinic...@msisolucoe s.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. Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas]