Como localizar tela(janela) da aplicacão ja aberta!
21/05/2008
0
form1:=tform1.create(self);
try
form1.showmodal;
finally
form1.free;
form1:=nil;
end;e crie um form para consultas em geral, e chamo ela atraves de um tecla geral de atalho em todo o sistema, o problema é que eu consigo criar esta tela mais de uma vez, uma por cima da outra e eu quero evitar isso, como eu poderia fazer?
Procurei mas nao encontrei nada que pude-se resolver meu problema.
Xtreme
Posts
21/05/2008
Eniorm
if (SeuForm = Nil) then
SeuForm := TSeuForm.Create(Nil); // eu prefiro passar nil
try
SeuForm.ShowModal;
finally
SeuForm.Release;
SeuForm := Nil;
end;27/05/2008
Xtreme
if (SeuForm = Nil) then
SeuForm := TSeuForm.Create(Nil); // eu prefiro passar nil
try
SeuForm.ShowModal;
finally
SeuForm.Release;
SeuForm := Nil;
end;Até tentei mas não deu certo! Valeu pela ajuda, estou querendo poder abrir minhas janelas sem ficar preso no showmodal, podendo abrir mais de uma janela por vez, mas não a mesma duas vezes.
27/05/2008
Eniorm
o form principal da aplicação deve ser MDIForm
o restante MDIChild
vc faz assim neste caso
if NomeForm = Nil then NomeForm := TNomeForm.Create(Nil); NomeForm.Show;
no evento [b:aa900ffcc9]OnClose [/b:aa900ffcc9]de cada form MDIChild vc usa:
Release; NomeForm := Nil;
27/05/2008
Emerson Nascimento
if Application.FindComponent(´Form1´) = nil then Application.CreateForm(TForm1, Form1) else Form1.BringToFront; Form1.WindowState:=wsNormal;
Clique aqui para fazer login e interagir na Comunidade :)
