Ejecutar el .exe una sola vez

[cricri2999]

Cómo hago para que mi aplicacion.exe se ejecute solo una vez, es decir si ya está correindo y le dan doble clic al .exe no se habra de nuevo.

Salu2

[delphi.com.ar]

Te recomiendo este hilo: http://www.clubdelphi.com/foros/showthread.php?t=3662

[Zeta]

La suite de componentes Jedi tiene un componente llamado JvAppInstances, se lo coloca en el formulario principal y listo, ya está activado.


Saludos

P.D.: Este post no corresponde a una noticia

[roman]

En mi página puedes bajar la unidad uiapp.pas. No hay que insertar ninguna componente ni programar nada, basta que la agregues en el uses del dpr:

Código Delphi [-]
program Project1;

uses
  UIApp,
  Forms,
  Unit1 in 'Unit1.pas' {Form1};

{$R *.res}

begin
  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  Application.Run;
end.

Al dar doble clic en el .exe se activa automáticamente la primera instancia.

Empezado por Zeta

P.D.: Este post no corresponde a una noticia

Cierto, gracias por el aviso. Lo muevo al foro Varios.

// Saludos

[Thoronluin]

Hola Roman:

Sigo todos los pasos, pero me sigue lanzado copias del programa. Hago la traza del programa y veo que en el momento en que me debería saltar el programa por ya existir una mutex creado, no lo hace. Pasa a la condición ELSE de:

Código Delphi [-]
if GetLastError = ERROR_ALREADY_EXIST then

Saludos y gracias por adelantado.

[Thoronluin]

Hola de nuevo:

Investigando sobre los mutex y haciendo ejemplos, volví al código y revisé la parte del mutex, hice un par de pruebas que fueron funcionando y crecí hasta donde estaba al principio y esta vez funcionó misteriosamente.

No sé si hacer como los pilotos de la segunda guerra mundial y achacarselo a los gremlins (o al delphi) o directament reconocer mi fallo .

Saludos y gracias.

[WALTERMAN90]

Muy bueno lo tuyo roman, apenas lo agregué funcionó de maravilla, es lo que buscaba, muchas gracias.