OK So funktioniert es...
Delphi-Quellcode:
var
SecurityDesc: TSecurityDescriptor;
SecurityAttr: TSecurityAttributes;
begin
InitializeSecurityDescriptor(@SecurityDesc, SECURITY_DESCRIPTOR_REVISION);
SetSecurityDescriptorDacl(@SecurityDesc, True, nil, False);
SecurityAttr.nLength := SizeOf(SecurityAttr);
SecurityAttr.lpSecurityDescriptor := @SecurityDesc;
SecurityAttr.bInheritHandle := False;
Geladen := CreateMutex(@SecurityAttr, false,pchar('Global\'+ServiceDa));
error := GetLastError;
if error = ERROR_ALREADY_EXISTS
Ich gehe davon aus, dass ich alle
Mutex und Events mit dem Parameter aufrufen muss...
Werde ich mal testen...
Grüsse Mavarik
