Fórum Componente herdado do mainmenu.Como faço ? #273612
22/03/2005
0
A duvida é a seguinte como faço pra adicionar uma propriedade para o item do mainmenu ?
Alexandre_sbo
Curtir tópico
+ 0Posts
22/03/2005
Alexandre_sbo
Gostei + 0
23/03/2005
Silviogs
vc pode criar um outro mainmenunovo herdando de mainmemu com a propriedade que deseja.
Silvio Guedes
Gostei + 0
23/03/2005
Isabelct
interface TMeuNovoMenu = class(TMainMenu) private FMinhaPropriedade: Integer; funtion SetMinhaPropriedade(Value: Integer): Integer; published property MinhaPropriedade: Integer read FMinhaPropriedade write SetMinhaPropriedade; end; . . . implementation funtion SetMinhaPropriedade(Value: Integer): Integer; begin FMinhaPropriedade := Value; end;
Depois você vai precisar associar a unit aonde você salvar este código a uma Package e instalar o seu componente na IDE do Delphi.
Gostei + 0
23/03/2005
Alexandre_sbo
O problema é que preciso acrescentar a property para o item,e o item é dá classe TmenuItem... do modo que vcs disseram naum funciona...
Gostei + 0
23/03/2005
Silviogs
vc pode criar uma classe derivada de tmenuitem usando o mesmo nome. Inclua a sua propriedade. Também inclua o novo componente.
EX. Type TMenuItem=class(Menus.TMenuItem)
neste caso vc esta declarando uma classe local derivada da Unit Menu.pas usando o mesmo nome.
Atenciosamente,
Silvio Guedes
Gostei + 0
23/03/2005
Alexandre_sbo
Gostei + 0
23/03/2005
Silviogs
estou saindo para passar o feriado fora, então quando voltar, seg. feira te posto o ex. ok.
Atenciosamente
Silvio Guedes
Gostei + 0
24/03/2005
Alexandre_sbo
Gostei + 0
29/03/2005
Silviogs
manda um e-mail para silvio.guedes@ig.com.br, que te envio os fontes deste exemplo ok!
Silvio Guedes
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)