Ops... Danilo... Em 18/04/07, Eduardo Silva dos Santos <[EMAIL PROTECTED]> escreveu: > > Opa Banilo, que bom que deu certo, sucesso ae. > > Em 17/04/07, Danilo Marques <[EMAIL PROTECTED]> escreveu: > > > > Eduardo muito obrigado pela sua dica ... deu certo. > > > > Otima dica ... > > > > Danilo > > > > -----Mensagem Original----- > > From: "Eduardo Silva dos Santos" [EMAIL PROTECTED]<eduardo.drd%40gmail.com> > > Date: Tue, 17 Apr 2007 21:42:17 -0300 > > To: delphi-br@yahoogrupos.com.br <delphi-br%40yahoogrupos.com.br> > > Subject: Re: [delphi-br] Abrindo apenas uma aplicação > > > > > tente isso no DPR do seu projeto, > > > > > > > > > program Project1; > > > > > > uses > > > Forms, > > > Windows, > > > Dialogs, > > > Unit1 in ' Unit1.pas' {Form1}; > > > > > > > > > {$R *.RES} > > > > > > > > > Var HprevHist : HWND; > > > > > > begin > > > Application.Initialize; > > > > > > HprevHist := FindWindow(Nil, PChar('TheProgrammer')); > > > > > > if HprevHist = 0 then begin > > > Application.Title := 'TheProgrammer'; > > > Application.CreateForm(TForm1, Form1); > > > Application.Run; > > > end else > > > MessageDlg('Você não pode executar outra cópia do aplicativo', > > > mtInformation, [mbOK], 0); > > > > > > end. > > > > > > > > > > > > Em 17/04/07, Claudio O2 < [EMAIL > > > PROTECTED]<claudio%40o2tecnologia.com.br>> > > escreveu: > > > > > > > > Amigo, o pacote de componentes da LMD tem um que faz isso. É o > > > > TLMDOneInstance. > > > > Rápido e fácil.É só ativá-lo e pronto. Toda vez que você for abrir > > algum > > > > executável ele verifica se já não tem uma instância do mesmo e se > > tiver > > > > dá mensagem que já existe e aborta a nova abertura. > > > > > > > > []´s > > > > > > > > Danilo Marques escreveu: > > > > > > > > > > Pessoal estou desenvolvendo uma aplicação e não posso deixar o > > usuario > > > > > abrir a aplicação quantas vezes ele quiser ,se ja tiver uma > > aplicação > > > > > rodando apresenta a mensagem ao usuario que ja existi uma > > aplicação > > > > > aberta. > > > > > > > > > > Ex.: O usuario abre a aplicação e minimiza para a bandeja do > > sistema > > > > > ao lado do relogio e esquece , a hora que ele vai abrir de novo a > > > > > aplicação ela deve apresentar uma mensagem que ja esta aberta e > > não > > > > > abrir , forçando o usuario assim abrir a que esta minimizada na > > bandeja. > > > > > > > > > > Se alguem pode me ajudar agradeço , > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > Danilo Molina > > > > > Grupo B Aplicativos - www.grupob.info > > > > > 3724-5401 / 81165257 > > > > > > > > > > > > > > > > > > -- > > > > > > > > > > > > > > > > > > > > -- > > > Eduardo Silva dos Santos > > > DRD Sistemas. > > > (27) 3218-4201 > > > MSN: [EMAIL PROTECTED] <eduardo.drd%40gmail.com> > > > Site: http://www.drdsistemas.com/ > > > > > > > > > [As partes desta mensagem que não continham texto foram removidas] > > > > > > > > > > > > > Danilo Molina > > Grupo B Aplicativos - www.grupob.info > > 3724-5401 / 81165257 > > > > > > > > > > -- > Eduardo Silva dos Santos > DRD Sistemas. > (27) 3218-4201 > MSN: [EMAIL PROTECTED] > Site: http://www.drdsistemas.com/ >
-- Eduardo Silva dos Santos DRD Sistemas. (27) 3218-4201 MSN: [EMAIL PROTECTED] Site: http://www.drdsistemas.com/ [As partes desta mensagem que não continham texto foram removidas]