hi,
ich entwickle gerade eine applikation bei der ich nicht möchte das sie an einem rechner mehrmals gestartet werden kann...
hier im forum hab ich folgende
unit gefunden
Delphi-Quellcode:
unit NichtDoppeltStarten;
interface
implementation
uses windows,Dialogs,sysutils;
var mHandle: THandle;
// Mutexhandle
Initialization
mHandle := CreateMutex(
nil,True,'
xxxxx');
// 'xxxxx' Der Anwendungsname ist hier einzutragen
if GetLastError = ERROR_ALREADY_EXISTS
then begin
// Anwendung läuft bereits
{showMessage('Anwendung läuft bereits!!!!!');}
// Wenn du deine Meldung willst, mach die Klammern weg
Halt;
end;
finalization // ... und Schluß
if mHandle <> 0
then
CloseHandle(mHandle)
end.
{Dieter Hirt}
so etwas ähnliches möchte ich jetzt auch in meinem programm einbinden...
und zwar soll die abfrage ob das programm schon läuft so früh wie möglich erfolgen!!!
an welcher stelle muss ich da dann die abfragen einbauen??? im oncreate ereigniss meiner hauptform??? oder gehts noch früher???