Entwickler-Ecke :: Thema anzeigen - Programm nur einmal starten

NTM - Do 25.01.07 11:24
Titel: Programm nur einmal starten

Hallo zusammen,
ich habe eine kleines Problem und zwar ich möchte das meine Prog nur einmal gestarte werden kann. Momentan ist es so das man das Prog mehrfach starten kann und bei schließen des Prog trotzdem im Task Menü bestehen bleibt.Das heißt schließe ich alle Prog die ich geöffnent habe sind Sie trotzdem noch der Task vorhanden.
Ich schließe das Prog mit dem Befehl Terminate aber trotzdem bleibt das Prog in der Task sichtbar.

Ich bedanke mich schon einmal im vorraus

Moderiert von jasocul: Topic aus Datenbanken verschoben am Do 25.01.2007 um 11:17

ZeitGeist87 - Do 25.01.07 11:54

Hallo!

Einfach ne neue Unit erstellen

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:

unit IrgendeinUnitName;

 interface

 implementation

 uses windows,Dialogs,sysutils;

 var mHandle: THandle;    // Mutexhandle

 Initialization
   mHandle := CreateMutex(nil,True,'DerNameDeinerAnwendung'); // Anwendungsname
   if GetLastError = ERROR_ALREADY_EXISTS then
   begin
     messagedlg('Anwendung läuft bereits!', mtwarning, [mbok], 0);
     Halt;
   end;

 finalization   // ... und Schluß
   if mHandle <> 0 then
     CloseHandle(mHandle)
end.

Lg
Stefan

Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2025 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!