Fórum Fechar todos os forms da aplicação #201993
18/12/2003
0
Oi pessoal, estou precisando saber como fazer pra fechar todos os forms d minha aplicação. Tentei fazer o seguinte:
Há alternativa mehor?
Muito obrigado pela atenção, sucesso
for i := 0 to Application.ComponentCount - 1 do
if Application.Components[i].InheritsFrom(TForm) then
// Qual o comando q eu ponho aki pra fechar?
Há alternativa mehor?
Muito obrigado pela atenção, sucesso
Tnaires
Curtir tópico
+ 0
Responder
Posts
18/12/2003
Tnaires
Opa galera precisa mais não
É assim:
Sucesso
É assim:
for i := 0 to Application.ComponentCount - 1 do
if Application.Components[i].InheritsFrom(TForm) then
(Application.Components[i] as TForm).Close;
Sucesso
Responder
Gostei + 0
18/12/2003
Beppe
Usando o objeto Application não fecha forms criados com Owner diferente. Você pode usar Screen então.
for I := 0 to Screen.FormCount - 1 do Screen.Forms[I].Close;
Responder
Gostei + 0
18/12/2003
Tnaires
Valeu Ataliba!
Essa maneira é bem mais enxuta.
Té +
Essa maneira é bem mais enxuta.
Té +
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)