Dúvidas: Verificar se há forms filhos abertos dentro do form pai se houver não encerra o programa quando o usuário clica no Close do form pai e avisa para ele fechar

Delphi

25/11/2013

Olá estou tentando fazer com que o usuário só feche a aplicação se fechar todos forms abertos dentro do form pai,


eu consegui até agora apenas sabe se form ta aberto ou nao e exibir a mensagem mas não sei como manter o form pai aberto se ouver forms filho abertos.



coloquei esse codigo que fiz no evento OnClose do form pai (fsMDIForm)
Marques

Marques

Curtidas 0

Respostas

Marques

Marques

25/11/2013

codigo que fiz até agora

if Application.FindComponent('Form2') = nil then
begin
ShowMessage('Aviso !!! feche todas janelas abertas da aplicação');
end;
GOSTEI 0
Marques

Marques

25/11/2013

Consegui resolver, solução

if Form2 = nil then
begin
end
else begin
ShowMessage('Aviso !!! feche todas janelas abertas da aplicação');
Action := caNone;
end;
GOSTEI 0
Deivison Melo

Deivison Melo

25/11/2013

Finalizando Tópico!!!!
GOSTEI 0
POSTAR