Delphi - Aplicacion solo se ejecute una vez

Hola!!!!
Como se puede hacer para que la aplicacion solo pueda estar siendo ejecutada una vez en el ordendador. Lei hace tiempo que esto se podia controlar, pero no encuentro como.
Un saludo

En el registro de windows existe una clave llamada "RunOnce", para q una aplicacion se ejecute solo una vez tienes q poner su nombre en esa clave..

Si es muy importante, yo tengo implementada una unidad para hacer lo que quieres, de forma que si la aplicacion ya está corriendo minimizada, por ejemplo, al intentar correrla de nuevo lo que hace es traerla a primer plano, te la puedo enviar por Email.La unidad es pequeña pero no lo suficiente para ponerla en el foro.No me gusta contestar de forma particular ya que el resto se queda sin nada, pero as veces no hay otra solucion.
Suerte

Muchas gracias Delfino y BigLuis.
Bueno en principio no creo que tenga problemas para hacer lo del registro Registro de Windows con la clase TRegistry... si eso ya te comento BigLuis...
Saludos y reitero las gracias!!!!!!!

Hum!!! Con la clave RunOnce parece que lo que se consigue es que windows te ejecute la aplicacion solo la primera vez que reinicializas.

No hay alguna propiedad o metodo de Application para que solo se pueda ejecutar una instacia del programa a la vez? Me suena que era por ahi

Saludos

hay diferentes formas de hacerlo.
una es buscando el nombre de la clase principal del programa con la funcion API FindWindow, supon que se llama TfrmPrincipal

var hApp: cardinal;
..
hApp := FindWindow('TfrmPrincipal', nil);
if hApp <> 0 then CrearInstancia()

eso lo puedes poner por ejemplo en el archivo dpr si hApp es igual a 0 creas el programa que es Application no se que.
no tengo delphi instalado aqui

Lo tengo chicos... asi:

program MyApp;
uses
Windows,Forms,
MyApp1 in 'MyApp1.pas' {Form1};

var
Mutex : THandle;
{$R *.RES}

begin
Mutex := CreateMutex(nil, True, 'MyAppName');
if (Mutex <> 0) and (GetLastError = 0) then
begin
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.Run;
if Mutex <> 0 then
CloseHandle(Mutex);
end;
end.

No habia leido lo tuyo MaCo!!!
Gracias de todas formas (y voy a dejar de acaparar el foro por un rato no? ;p) )

Existe un componente llamado OnlyOne, lo pones en tu aplicacion y listo, si el usuario trata de abrir nuevamente tu aplicacion simplemente no lo hace puesto que ya esta... Suerte, si no lo encuentras escribeme y te lo mando... ok?