subject:"\[delphi\-br\] Fechar Mdi"

Re: [delphi-br] Fechar Mdi

2005-10-13 Por tôpico Vitor Luiz Redes

*'; City := 'Curitiba'; Employee := 'Redsystem'; inherited Create( AOwner ) end; end. - Original Message - From: Ailton Branco To: delphi-br@yahoogrupos.com.br Sent: Tuesday, October 11, 2005 11:17 AM Subject: [delphi-br] Fechar Mdi Criei

[delphi-br] Fechar Mdi

2005-10-11 Por tôpico Ailton Branco

Criei minha tela no delphi 2005 desta forma procedure TPrincipal.Button1_Click(sender: System.Object; e: System.EventArgs); Var Tela : TModeloBase; begin Tela := TModeloBase.Create; Tela.MdiParent:= self; Tela.Show; end; mas quando eu pressiono novamente o botao o sistema cria mais uma tela