/ Forside / Teknologi / Udvikling / Delphi/Pascal / Nyhedsindlæg
Login
Glemt dit kodeord?
Brugernavn

Kodeord


Reklame
Top 10 brugere
Delphi/Pascal
#NavnPoint
oldwiking 603
jrossing 525
rpje 520
EXTERMINA.. 500
gandalf 460
gubi 270
DJ_Puden 250
PARKENSS 230
technet 210
10  jdjespers.. 200
Tjek om Service er kørende....
Fra : Henning E. Lund


Dato : 28-07-02 08:18

Hej NG.

Hvordan tjekker man om en bestemt service er kørende i Delphi, samt hvor dan
starter man servicen op, hvis den ikke er kørende???

Jeg bruger Delphi 5 interprise.

mvh.

Henning.



 
 
Gunnar Martensen (30-07-2002)
Kommentar
Fra : Gunnar Martensen


Dato : 30-07-02 11:26

Hej, Henning.

Når jeg afbryder en service, bruger jeg følgende procedure:

procedure DeleteService;
var hService,hSCManager : THAndle;
ServiceStatus : TServiceStatus;
begin
hSCManager:=OpenSCManager(nil,nil,SC_MANAGER_ALL_ACCESS);
hService :=
OpenService(hSCManager,'SkyService',SERVICE_ALL_ACCESS{STANDARD_RIGHTS_REQUI
RED});
ControlService(hService,SERVICE_CONTROL_STOP,ServiceStatus);
DeleteService(hService);
CloseServiceHandle(hService);
CloseServiceHandle(hSCManager);
end;


mvh
unnar Martensen


"Henning E. Lund" <Enemark@NOSPAMmail.net4you.dk> skrev i en meddelelse
news:3d439ab9$0$668$f5c28336@nntp04.dk.telia.net...
> Hej NG.
>
> Hvordan tjekker man om en bestemt service er kørende i Delphi, samt hvor
dan
> starter man servicen op, hvis den ikke er kørende???
>
> Jeg bruger Delphi 5 interprise.
>
> mvh.
>
> Henning.
>
>



Søg
Reklame
Statistik
Spørgsmål : 177552
Tips : 31968
Nyheder : 719565
Indlæg : 6408847
Brugere : 218887

Månedens bedste
Årets bedste
Sidste års bedste