Fórum Pegando os forms #261543

11/12/2004

0

Galera...
Em tempo de execução, eu crio alguns formularios
frm := tFrm.Create(Self);

Eles sao sempre criados a partir de um certo form...
Gostaria de obter todos os forms criados por esse mesmo...

Ah!!! Quando eu fechar o form e os outros estiverem abertos eles serao tirados da memoria automaticamente?!

Abraços


Tremonti

Tremonti

Responder

Posts

11/12/2004

Tremonti

Nao, tudo bem...
Eu faço isso no on close

Action := cafree;
frm := NIL;

Mas keria saber se o form que criou faz isso?!

Em relação a outra pergunta é que eu crio os forms a partir de só UM form...

e tipow, na hora de fechar quero saber se existe algum aberto...
Se tem como eu saber entendeu?!

Abraços


Responder

Gostei + 0

11/12/2004

Sandra

:) Olá Tremonti!!

Você quer saber quais são os forms abertos para, ao encerrar o programa, fechar todos eles, não é?

Se for, pode utilizar assim:

Var
  i: Integer;
begin
  For i := 0 to ComponentCount-1 do
    if Components[i].ClassName = ´TForm´ then begin
      Components[i].Close;
      Inc(i);
    end;
end;


Não testei o código, mas é mais ou menos por aí. Boa sorte!


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar