![]() |
![]() |
| Paypal | FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
|||||||
| Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Buscar | Temas de Hoy | Marcar Foros Como Leídos |
![]() |
|
|
Herramientas | Buscar en Tema | Desplegado |
|
|
|
#1
|
|||
|
|||
|
Gracias! Es que los enlaces que hay en los comentarios de arriba no estan bien.
Un saludo! |
|
#2
|
|||
|
|||
|
Hola, se que es un post viejo pero, ROMAN, mira estoy utilizando tu unidad, y funciona muy bien lo unico es que la excepcion no es silenciosa para mi, si me restaura o da el foco a la primera instancia pero lo hace mandando un mensage de error, tal vez la cosa este en que estoy usando windows vista!, tambien utilizo Delphi 2007. Saludos y gracias por tu unidad.
El error dice lo siguiente: Application Error Exception EAbort in module "nombre poyecto".exe at 002BE4F6. Operation Aborted. |
|
#3
|
||||
|
||||
|
Aunque está escrito en Builder C++, lo puedes traducir a delphi. Es posible que te sirva de ayuda:
Evitar dos instancias de una aplicación Saludos. |
|
#4
|
|||
|
|||
|
Cita:
Código:
var
programa: integer;
begin
if GlobalFindAtom('Repetido') = 0 then
Programa := GlobalAddAtom('Repetido');
else begin
ShowMessage('No puedes ejecutar el programa mas de una vez');
end;
end;
Greeting |
![]() |
| Herramientas | Buscar en Tema |
| Desplegado | |
|
|
|