MDI - Verificar form aberto

Delphi

24/12/2003

Olá Pessoal!

Numa aplicação MDI, como é possível saber a partir de um FormFilho se outro FormFilho está aberto?

Já pesquisei aqui no forum e encontrei algumas respostas a respeito, porém nestas respostas eram apresentadas maneiras de identificar a partir do FormPai se um FormFilho está aberto. Quando tentei aplicar a mesma regra de FormFilho para FormFilho, deu erro e não consegui corrigir.

Alguém pode dar uma ajudinha?
Grato.
wbb

OBS.: A maneira que encontrei e utilizo sem problemas de FormPai para FormFilho é:

var
   OldCursor : TCursor;
   j : integer;
begin
   for j := 0 to MDIChildCount - 1 do
   begin
      if MDIChildren[j] is Tform2 then
      begin
         MDIChildren[j].Show;
         Exit;
      end;
   end;

   OldCursor := Screen.Cursor;
   Screen.Cursor := crHourglass;

   try
      Application.CreateForm(Tform2, form2);
   finally
      Screen.Cursor := OldCursor;
   end;


Ela identifica se o FormFilho está aberto ou não. Se estiver aberto mas não estiver ativo, ele passa a ser ativado. Se o FormFilho não estiver aberto, ele é criado.


Wbb

Wbb

Curtidas 0

Respostas

Danielclubedelphi

Danielclubedelphi

24/12/2003

por acaso o erro é q vc compila e da erro falando q naum encontrou isso: ´ MDIChildren´ ?

se for coloque o nome do form pai na frente: Form1.mdichildren.

ou coloque uma função no form pai e todos os filhos chamam ela de lá mesmo.


GOSTEI 0
Lucas Silva

Lucas Silva

24/12/2003

MDIChildren[j].Name;


Lucas!


GOSTEI 0
Wbb

Wbb

24/12/2003

É isso mesmo danielclubedelphi!
Funcionou da maneira que você indicou.
Obrigado.

wbb


GOSTEI 0
POSTAR