Array
(
)

Como Fechar Um Form Automaticamente Ao Abrir Outro?

Exvasp
   - 07 abr 2006

Estou com a seguinte dúvida:
Tenho um form principal(_MainForm) e os forms filhos(definidos em form Style para fsMDIChild): ou seja abrem dentro do form principal mas sempre ao abrir outro form Eu tenho que clicar no botão fechar. Como Fazer para que automaticamente feche o form aberto ao abrir outro quanto seleciono no menu do form principal?

Agradeço desde já a quem puder me ajudar


Edilcimar
   - 07 abr 2006

Coloque antes da chamada do form desejado
I : Word;
If MDIChildCount >= 1 then
Begin
With Form1 do
For I := MDIChildCount -1 downto 0 do
MDIChildren[I].Close;
End;


Paullsoftware
   - 07 abr 2006

pode tentar usando o Assigned

#Código

if Assigned(NomeDoForm) then
begin
//Comandos para tratá-lo
end;

:wink: