Gute Idee!
Aber nach dem ich dieses Stück wie folgt geändert habe war ich verwirrter als vorher :
Delphi-Quellcode:
sh := OpenSCManager(nil,nil,SC_MANAGER_ALL_ACCESS);
if not sh > 0 Then
begin
MessageBox(0,Pchar('OpenSCManager : '+SyserrorMessage(GetLastError)),'Error Handling',MB_ICONERROR);
result := false;
Exit;
end;
Die MessageBox sagt : " OpenSCManager : Der Vorgang wurde erfolgreich beendet "
Wie kann der Vorgang erfolgreich beendet worden sein, wenn der
Handle leer ist ? :S