Formulário MDI Form
Como faço uma aplicação MDI?
Estou tentanto mas sempre que fecho o MDIChild ele fica minimizado ni fundo do MDI principal.
Estou tentanto mas sempre que fecho o MDIChild ele fica minimizado ni fundo do MDI principal.
Bleleca
Curtidas 0
Respostas
Josemarlourenco
30/05/2003
No evento OnClose do form MDIChild coloque o seguinte:
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
Action := caFree;
end;
Não esqueça que para exibir este form, vc deverá usar um código do tipo:
Procedure Exibir;
Var Form1: TForm1;
Begin
Form1 := TForm1.Create(Application);
Form1.Show;
End;
Josemar
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
Action := caFree;
end;
Não esqueça que para exibir este form, vc deverá usar um código do tipo:
Procedure Exibir;
Var Form1: TForm1;
Begin
Form1 := TForm1.Create(Application);
Form1.Show;
End;
Josemar
GOSTEI 0
Bleleca
30/05/2003
Obrigado!
GOSTEI 0