Desculpem, mas encontrei o erro e tudo está perfeito. Grato pela atenção.
- Original Message -
From: Adolfo Stotz
To: delphi-br@yahoogrupos.com.br
Sent: Friday, January 11, 2008 11:14 AM
Subject: Re: [delphi-br] Re: Não permitir uma segunda execução do programa
Usei o cod
Usei o codigo abaixo
var
MutexHandle : THandle;
hwind : HWND;
begin
MutexHandle := CreateMutex(nil,True,'MCTAgente');
if (MutexHandle <> 0) then
begin
if GetLastError = ERROR_ALREADY_EXISTS then
begin
Application.MessageBox('Este programa já está em execução!','Café
Colonia
segue um link com exemplo :
http://forum.clubedelphi.net/viewtopic.php?t=86289&highlight=impedir+++programa&sid=5efc285c5abec089bbb5b66dd3d120a1
- Original Message -
From: Adolfo Stotz
To: delphi-br@yahoogrupos.com.br
Sent: Friday, January 11, 2008 2:08 AM
Subject: [delphi-b
3 matches
Mail list logo