Criação dinâmica de Form

19/05/2003

1

Olá!

Tenho dois botões: ´btnForm2´ que cria o form ´frmForm2´ e ´btnForm3´ que cria o form ´frmForm3´.

Pergunta: como fazer para que direcionando o evento OnClick dos dois botões eu possa criar os forms respectivos sem ter que repetir o código para criar cada form?

Cicero


Responder

Posts

19/05/2003

Vmotta

Olá!

Tenho dois botões: ´btnForm2´ que cria o form ´frmForm2´ e ´btnForm3´ que cria o form ´frmForm3´.

Pergunta: como fazer para que direcionando o evento OnClick dos dois botões eu possa criar os forms respectivos sem ter que repetir o código para criar cada form?

Cicero

tenta isso :

coloque a tag do btnForm2 = 0 e do btnForm3 = 1, depois
no evento onClick de um dos botoes coloca :

if (Sender as TButton).tag = 0 then
// cria formulario frmForm2
else
// cria formulario frmForm3

direcione o outro botao para essa mesa procedure

isso deve resolver

T+

Vitor


Responder