Fórum Fechar todos os MDIChild, como? #274837
31/03/2005
0
Alguem sabe de uma funcao, que caso exista um mdichild ou varios mdichild, a funcao os feche?
desde ja agradeco
[]s
desde ja agradeco
[]s
Titanius
Curtir tópico
+ 0
Responder
Posts
31/03/2005
Massuda
No seu form principal...
procedure TForm1.CloseAllClick(Sender: TObject);
var
I: Integer;
begin
for I := MDIChildCount-1 downto 0 do
MDIChildren[I].Close;
end;
Responder
Gostei + 0
31/03/2005
Titanius
Valeu.. funcionou :D
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)