Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Win32/Win64 API (native code) (https://www.delphipraxis.net/17-win32-win64-api-native-code/)
-   -   Delphi Dienst deaktivieren (https://www.delphipraxis.net/2113-dienst-deaktivieren.html)

DieHardMan 7. Jan 2003 16:05


Dienst deaktivieren
 
Hi,
weiss jemand wie man einen Dienst aka Service deaktivieren kann, also wie man den Starttyp ändern kann. Wie man welche beendet, stopt usw. weiss ich.

thx

sakura 7. Jan 2003 17:01

In der Registry

HKLM\SYSTEM\CurrentControlSet\Services\[nameDesService]

Eintrag ist vom Typ DWORD, Name ist Start, Werte:
Delphi-Quellcode:
  {$EXTERNALSYM SERVICE_BOOT_START}
  SERVICE_BOOT_START           = $00000000;
  {$EXTERNALSYM SERVICE_SYSTEM_START}
  SERVICE_SYSTEM_START         = $00000001;
  {$EXTERNALSYM SERVICE_AUTO_START}
  SERVICE_AUTO_START           = $00000002;
  {$EXTERNALSYM SERVICE_DEMAND_START}
  SERVICE_DEMAND_START         = $00000003;
  {$EXTERNALSYM SERVICE_DISABLED}
  SERVICE_DISABLED             = $00000004;

DieHardMan 7. Jan 2003 18:11

Is ja easy, man muss ja nur den Services key runterasseln und den DisplayName auslesen. :P

F.W. 6. Jun 2004 14:20

Re: Dienst deaktivieren
 
Wie rasselt man den denn runter? Gibts da ne Art FindFirst/Next für die Registry?

mirage228 6. Jun 2004 14:21

Re: Dienst deaktivieren
 
Zitat:

Zitat von F.W.
Wie rasselt man den denn runter? Gibts da ne Art FindFirst/Next für die Registry?

Hi,

nein, gibt es nicht, aber es gibt TRegistry.GetKeyNames ;)

mfG
mirage228

Bernhard Geyer 6. Jun 2004 14:31

Re: Dienst deaktivieren
 
Schau mal den Beitrag von A. Kosch zum Thema Programm(Service) unter Windows 2000 beenden an.
Es ist sinnvoller über die offizielle API-Schnittstelle zu gehen, als in irgendwelchen Registry-Einträgen einstellungen vorzunehmen. Dies können sich mit der nächsten Windows-Version komplett ändern.

Luckie 6. Jun 2004 14:34

Re: Dienst deaktivieren
 
Es geht aber nicht um das Starten und Stoppen, sondern um das ändern des Starttyps.

Bernhard Geyer 6. Jun 2004 14:44

Re: Dienst deaktivieren
 
Dann kann man sich mal etwas in der Unit WinSvc.pas die Funktion ChangeServiceConfig. Dort gibt es einen Parameter dwStartType, welcher höchstwahrscheinlich den Starttyp festlegt.

F.W. 6. Jun 2004 14:51

Re: Dienst deaktivieren
 
Danke!


Alle Zeitangaben in WEZ +1. Es ist jetzt 06:35 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz