Einzelnen Beitrag anzeigen

mm1256

Registriert seit: 10. Feb 2014
Ort: Wackersdorf, Bayern
642 Beiträge
 
Delphi 10.1 Berlin Professional
 
#3

AW: Dienst Starten/Stoppen Windows Server 2012

  Alt 27. Sep 2016, 21:00
Nicht schlimm, aber k.A. warum ServiceGetStatus/ServiceRunnig mit PChar und nicht auch mit String deklariert wirden.
Da steckt aber evtl. auch der Wurm drin, wenn z.B. der Rechnername (aus welchen Gründen auch immer) unter 2012 nicht stimmt oder richtig ermittelt wird. Wenn man das auf dem lokalen Rechner/Server aufruft, reicht auch "nil".

Delphi-Quellcode:
  SMHandle := OpenSCManager(nil, nil, SC_MANAGER_ALL_ACCESS);
  ...
  OpenService(SMHandle,PWideChar('ServiceName'),SERVICE_QUERY_STATUS);
  ...
Tut bei mir jedenfalls auf alles OS.
Gruss Otto PS: Sorry wenn ich manchmal banale Fragen stelle. Ich bin Hobby-Programmierer und nicht zu faul die SuFu zu benutzen
  Mit Zitat antworten Zitat