Ja dieses File von dir hab ich auch mal in ein Testproggie eingebunden.
Aber der Aufruf ist noch so ein Ding:
ServiceGetStatus(sMachine, sService: AnsiString): DWord;
sMachine ist das der PC-name? sService wär dann z.B. 'nachrichtendienst'
Delphi-Quellcode:
.....
begin
ServiceGetStatus('mypc', 'nachrichtendienst');
end;