wie kann man sicherstellen das eine mit Delphi4.0 erstellte Exe nicht doppelt gestartet wird ??? also wie fragt man sowas ab ???
vielleicht auch wie kann man eventuell gestartete Processe also meine schon gestartete Exe abbrechen ??
Quelle: EasyDelphiHelper
Diese paar Zeilen Code verhindern, dass Dein Programm mehrmals gestartet werden kann.
Schreibe dies ans Ende Deiner Unit (am Besten Unit des Hauptformulars):
Initialization
mHandle:=CreateMutex(nil,True,'Programmname');
if GetLastError=ERROR\_ALREADY\_EXISTS then
Halt;
finalization
if mHandle0 then
CloseHandle(mHandle)
end.
Du musst natürlich noch die globale Variable mHandle: THandle deklarieren (z.B. da wo Form1: TForm1 steht).
Als ‚Programmname‘ kann eine beliebige Bezeichnung eingesetzt werden.
Florian
Danke : Anwendung nicht doppelt starten !!!
hat geklappt 