Hudson, não uso actionlist, mas para você fazer isso, poderia simplesmente compartilhar o evento com todos os botões. Ou seja, todos os botões usariam o mesmo evento e executariam o mesmo código.
Hudson escreveu: > > > Depende... > > Eu uso o Actionlist para reduzir o codigo e facilitar manutenção.... > > vamos dizer que temos 2, 3 ou mais ação que nos leva ao mesmo lugar... > > feito colocar um cod para cada um deles faço no actionlist e ligo ao > componente..... > > Exe.: > > chamando um form MDI > isso no botão 1 > Form1 := TFrom1.Creator(Self); > > isso no botão 2 > Form1 := TFrom1.Creator(Self); > > isso no botão 3 > Form1 := TFrom1.Creator(Self); > > isso no botão 4 > Form1 := TFrom1.Creator(Self); > > pode ver que todos os 4 leva o mesmo codigo: > para evitar de criar eventos para cada ação o actionlist vc usa somente > uma vez e pronto > > espero ter ajudado. > > Atenciosamente Hudson Dias > www.alcancedigital.com.br > MSN: [EMAIL PROTECTED] <mailto:hudson_bh%40hotmail.com> > Skype: hudson_bh > Tele: (31)3434-6304 > > ----- Original Message ----- > From: Red Mosquito > To: [EMAIL PROTECTED] > <mailto:lista-delphi%40yahoogrupos.com.br> ; > delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br> > Sent: Wednesday, September 19, 2007 5:01 PM > Subject: [delphi-br] Vantagens do ActionList > > Srs, > > Peguei um sistema em delphi7 para manutenção. Percebi que na maioria dos > programas existe um ActionList, e o evento OnClick dos botões estão > relacionados com o ActionList ( actExecute ). Pergunto : Qual a vantagem > disso ? Por que o programador não colocou diretamente no OnClick do botão > tudo o que deveria ser feito, que no entanto se encontra no referido > actExecute relacionado ? > > Obrigado, > > Junior > > [As partes desta mensagem que não continham texto foram removidas] > > [As partes desta mensagem que não continham texto foram removidas] > > _______________________________________________________ Yahoo! Mail - Sempre a melhor opção para você! Experimente já e veja as novidades. http://br.yahoo.com/mailbeta/tudonovo/
