if FrmAgenda=nil then Application.CreateForm(TFrmAgenda, FrmAgenda); FrmAgenda.Show; Referente a segunda questão não sei se existe algo mais facil do q criar um vetor onde sempre que vc abrir um formulario carregar este vetor e criar um item de menu dinamico, ao clicar no item, vc tera o indice do vetor. Eduardo
-----Mensagem original----- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Luis Gustavo Enviada em: sábado, 10 de setembro de 2005 13:44 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Controle de Janelas para mostrar a janela que ja esta aberta use o seguinte se a janela não estiver aberta ele vai criar a janela dinamicamente e se ja estiver aberta ira mostrar, mas vc deve tirar o formulario do autocreate. mas para ver qual ta aberta eu não sei begin if FrmAgenda=nil then begin Application.CreateForm(TFrmAgenda, FrmAgenda); FrmAgenda.Show; end else begin FrmAgenda.show; end; espero ter ajudado ----- Original Message ----- From: "galvao_em" <[EMAIL PROTECTED]> To: <delphi-br@yahoogrupos.com.br> Sent: Friday, September 09, 2005 2:17 PM Subject: [delphi-br] Controle de Janelas > Olá pessoal, to desenvolvendo um sistema e ao chamar os formulários, ao > invés de usar o "SHOWMODAL", eu quero utilizar apenas o "SHOW", mas > quero que se uma janela estiver aberta e se tentar abrir ela novamente > ao invés de abrir uma nova quero que a janela que já esta aberta venha > para a frente das outras, quero também criar um menu que me diga quais > as janelas estão abertas e ao clicar nele ele me traga a janela > selecionada para a frente. alguém pode me ajudar com isto? > > Att. > > Rodrigo Galvan > > > > > > _______________________________________________________ > Yahoo! Messenger com voz: PROMOÇÃO VOCÊ PODE LEVAR UMA VIAGEM NA CONVERSA. > Participe! www.yahoo.com.br/messenger/promocao > > > -- > <<<<< 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! Messenger com voz: PROMOÇÃO VOCÊ PODE LEVAR UMA VIAGEM NA CONVERSA. Participe! www.yahoo.com.br/messenger/promocao -- <<<<< 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] Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE <http://br.rd.yahoo.com/SIG=12f2sc62g/M=365837.7000707.7924794.2369893/D =brclubs/S=2137111264:HM/Y=BR/EXP=1126377834/A=2950750/R=2/id=noscript/S IG=10tift5qr/*http://br.movies.yahoo.com/> _____ 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] <mailto:[EMAIL PROTECTED]> * O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo! <http://br.yahoo.com/info/utos.html> . [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: http://br.yahoo.com/info/utos.html
