![]() |
Wahlweise mehrfachen Programmstart verhindern
Hallo allerseits,
ich verwende in meiner Anwendung folgenden Code:
Delphi-Quellcode:
welcher auch einwandfrei funktioniert.
initialization
mHandle := CreateMutex(nil, true, 'anwendung.exe'); if (GetLastError = Error_Already_Exists) then halt; finalization if mHandle <> 0 then CloseHandle(mHandle); Jetzt möchte ich in das Programm einen Schalter einbauen, wo der Anwender selbst auswählen kann, ob er zulassen möchte, dass die Anwendung mehrfach gestartet werden kann oder nicht. Gibt es hier eine Möglichkeit ??? mfg Herbert |
Re: Wahlweise mehrfachen Programmstart verhindern
Bei den JEDIs gibts 'ne Komponente, die das kann.
|
Re: Wahlweise mehrfachen Programmstart verhindern
Zitat:
das ist immer gleich so 'n Haufen Zeugs bei den Jedis... |
Re: Wahlweise mehrfachen Programmstart verhindern
Delphi-Quellcode:
initialization
mHandle := CreateMutex(nil, true, 'anwendung.exe'); if (GetLastError = Error_Already_Exists) and not FindCmdLineSwitch('nolimit', ['-','/'], True) then halt; finalization if mHandle <> 0 then CloseHandle(mHandle); |
Re: Wahlweise mehrfachen Programmstart verhindern
Danke erstmal für die Antworten.
Ich habe jetzt den Tipp von shmia eingebaut - funktioniert einwandfrei. Allerbesten Dank dafür !!! mfg Herbert |
Re: Wahlweise mehrfachen Programmstart verhindern
Zitat:
![]() Das ist keine Komponente, die installiert werden muss. IMHO ist diese Klasse das Beste, was es zum Thema "Programm nur einmal starten" gibt. |
Re: Wahlweise mehrfachen Programmstart verhindern
Zitat:
ich möchte dieses Paket nicht extra installieren... |
Re: Wahlweise mehrfachen Programmstart verhindern
Zitat:
Die Klasse bzw. Unit hat Abhängigkeiten zu 3 weiteren Units aus der JCL. Du solltest die JCL ruhig installieren; ich kann das nur empfehlen. Die JCL ist sozusagen alles das, was Borland bei seiner RTL vergessen oder übersehen hat. Hier waren Delphi Cracks (z.B. Robert Rossmair) am Werke; das lohnt sich wirklich. |
Re: Wahlweise mehrfachen Programmstart verhindern
Liste der Anhänge anzeigen (Anzahl: 1)
Hier ist ein Beispiel wie es geht.
Das Beispiel ist schon älter, könnte aber (mit geringen Anpassungen) funktionieren. Ich hoffe es hilft. Diese Unit bitte NICHT downloaden, nehmt die unit von meinem nächsten Posting. Die habe ich analysiert, korrigiert und "dechiffriert". Sie funktioniert nun! |
Re: Wahlweise mehrfachen Programmstart verhindern
Liste der Anhänge anzeigen (Anzahl: 1)
So, jetzt habe ich das vorhergehende Beispiel überarbeitet.
Jetzt funktioniert es mit D6 auf W2K auf jeden Fall. Viel Spaß damit. |
Alle Zeitangaben in WEZ +1. Es ist jetzt 19:52 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz