Função para todos os forms

Delphi

29/07/2003

Bom dia a todos.

Tenho uma calculadora e gostaria que esta fosse disponível para todos os forms. Existe alguma forma de disponibilizá-la sem ter que colocar ´calculadora.show´ em todos os forms?

Grato pela atenção.


Hacson Menezes

Hacson Menezes

Curtidas 0

Respostas

Motta

Motta

29/07/2003

vc pode fazer por herança, se todos os forms forem herdeiros de um que tem a chamada todos terão.

eu façõ algo parecido , porém é um botão no form principal de um mdi


GOSTEI 0
Rômulo Barros

Rômulo Barros

29/07/2003

O Motta tem toda razão. O mais fácil seria criar formulários a partir de outro já existente. Entretanto, acho que vc não fez isso. Então, tente o seguinte:

Para cada formulário, coloque um botão que chamará a calculadora.

No formulário Principal, de o nome do botão de ´btnCalculadora´;
No evento OnClick deste botão, insira o código que chamará a calculadora.

Agora nas Units de todos os outros formulários, mande usar a Unit do Formulário Principal.

E, no botão de cada formulário(Com Exceção do formulário Principal), Indique o evento OnClick para ´frmPrincipal.btnCalculadora.Click´

Espero ter ajudado...


GOSTEI 0
POSTAR