F�rum MDI - Verificar form aberto #202873

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

Curtir t�pico

+ 0

Responder

Posts

25/12/2003

Danielclubedelphi

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.

Responder

Gostei + 0

25/12/2003

Lucas Silva

MDIChildren[j].Name;

Lucas!

Responder

Gostei + 0

26/12/2003

Wbb

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

wbb

Responder

Gostei + 0