Como fechar um formulário MDIChild usando um botão.

Delphi

14/04/2004

Amigos,
como faço para fechar um MDIChild usando um botão q está nele.


Orlando Frade

Orlando Frade

Curtidas 0

Respostas

Adilsond

Adilsond

14/04/2004

Voce fecha normalmente com close. O detalhe está no evento OnClose, nele coloque: Action := caFree;


GOSTEI 0
Lucas Silva

Lucas Silva

14/04/2004

procedure Tform1.Button1Click(sender: TObject)
begin
  Close;
end;


e no evento onclose do form coloque
form1 := nil;
Action := caFree;


GOSTEI 0
POSTAR