Não, a procedure Show retorna imediatamente, logo este código não serve para
janelas MDI.
Você pode fazer o controle através das variaveis
algo como:
if FmForm = Nil then
begin
FmForm := TFmForm.Create(Application)
FmForm.Show;
end;
else
FmForm.SetFocus;
e a Destruição fica a cargo do evento OnClose
begin
Action := caFree;
end;
Se não me engano é isso mesmo. Nunca trabalhei com MDI :D
Francisco Thiago de Almeida
Enter&Plug Informática
Divisão: Desenvolvimento e Banco de dados
MSN: [EMAIL PROTECTED]
Skype: enterplug_thiago
----- Original Message -----
From: "[> Mutuka <]" <[EMAIL PROTECTED]>
To: <delphi-br@yahoogrupos.com.br>
Sent: Thursday, June 09, 2005 7:42 PM
Subject: Re: Re: [delphi-br] Fechar Form
se eu usar o Show em vez do showmodal ele ira esperar fechar o formulario...
pois em minha aplicacao pode abrir outros forms junto voltando para o
principal
Francisco Thiago <[EMAIL PROTECTED]> escreveu:Olá.
Olha, a melhor coisa a se fazer é
-> Retirar os Forms do AutoCreate
-> Chamar os Forms dessa forma
with TClasseDoForm.Create(Self) do
try
ShowModal;
finally
Release;
{
Usar o Free não é muito indicado, pois ele destroi imediatamente o form,
enquanto o release "espera" até que tudo no form esteja "concluído" para
depois destruí-lo
}
end;
E no OnClose de todos os forms (ou do seu form padrão, caso use herança)
colocar o código
Action := caFree;
Espero ter ajudaddo
Thiago
Catiúscia A. Barrilli da Cruz <[EMAIL PROTECTED]> wrote:
Bom Dia !
Amados, gostaria de saber qual a melhor forma para abrir formulários e
fechá-los.
Estou tendo um probleminha com relação a isso, pois há duas máquinas com
win98, uma com 64 e outra com 128 de RAM, ambas dão um erro dizendo: "não há
armazenamento suficiente" ou "não há recursos disponíveis p/ efetuar a
aplicação".
Esse erro dá quando abrem a tela de cadastro de propostas, nessa tela,
chama-se mais 4 telas (a pedido da cliente), uma p/ adicionar acessórios,
outra p/ adicionar produtos, outra p/ adiconar os detalhes da forma de
pagamento e mais uma para incluir outras formas do pagamento.
Gostaria de saber qual a melhor forma para estar abrindo e fechando essas
telas "extras".
Desde já agradeço.
Cati
"...Não pense de si mesmo além do que convém..." Rm 12.3
Nada está fora do alcance da oração, exceto o que está fora da vontade de
Deus.
[As partes desta mensagem que não continham texto foram removidas]
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
---------------------------------
Links do Yahoo! Grupos
Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do
Yahoo!.
__________________________________________________
Do You Yahoo!?
Tired of spam? Yahoo! Mail has the best spam protection around
http://mail.yahoo.com
[As partes desta mensagem que não continham texto foram removidas]
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
Links do Yahoo! Grupos
__________ Informação do NOD32 1.1135 (20050609) __________
Esta mensagem foi verificada pelo NOD32 Sistema Antivírus
http://www.nod32.com.br
[As partes desta mensagem que não continham texto foram removidas]
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
Links do Yahoo! Grupos
____________________________________________________
Yahoo! Mail, cada vez melhor: agora com 1GB de espaço grátis!
http://mail.yahoo.com.br
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
---------------------------------
Links do Yahoo! Grupos
Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do
Yahoo!.
Leandro...
[> Mutuka <]
__________________________________________________
Converse com seus amigos em tempo real com o Yahoo! Messenger
http://br.download.yahoo.com/messenger/
[As partes desta mensagem que não continham texto foram removidas]
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
Links do Yahoo! Grupos
____________________________________________________
Yahoo! Mail, cada vez melhor: agora com 1GB de espaço grátis!
http://mail.yahoo.com.br
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
Links do Yahoo! Grupos
<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
