Hallo...
ich verhindere auf folgende art und weise, das mein Programm nur einmal gestartet werden kann:
Delphi-Quellcode:
unit mutex;
interface
implementation
uses windows,Dialogs,sysutils,login;
var mHandle: THandle;
// Mutexhandle
Initialization
mHandle := CreateMutex(
nil,True,'
Stryyke Client');
if GetLastError = ERROR_ALREADY_EXISTS
then begin
Halt;
end;
finalization // ... und Schluß
if mHandle <> 0
then
CloseHandle(mHandle)
end.
jetzt würde ich aber ganz gerne bei der laufenden Anwendung eine funktion aufrufen, weiß aber nicht wie ich das machen kann?
Alse wenn mein Prog schon läuft, dann soll die Anwendung (dort wo jetzt Halt; steht) eine Funktion bei der laufenden instanz aufrufen. Kann man das irgendwie machen?