Thema: Delphi Anwendung als Service

Einzelnen Beitrag anzeigen

delphinia

Registriert seit: 16. Feb 2006
444 Beiträge
 
Delphi 11 Alexandria
 
#1

Anwendung als Service

  Alt 5. Okt 2007, 21:54
Ich habe mich nun mit dem Thema Service beschäftigt.
Nach dem ich ich ja nicht über die SvcMgr verfüge, wurde ich auf
Assarbad's NT Service Tutorial verwiesen.

OK soweit....

Aber leider habe ich wenn ich das Demo "sample_svc" ausführe so wie es von Assarbad ist
eine 100%ige auslastung des Systems über die gesamte Dauer!
Das ist bisschen heftig!

Wen ich dann

Delphi-Quellcode:
 repeat
    if not paused then
    begin end;
  until stopped;
entferne ist zwar keine 100%ige auslastung mehr aber auch erscheint eine Fehlermeldung!
Der Dienst wurde gestartet und dann angehalten............

Hmmm wer kann da helfen?


Ok noch eine Frage: Wie kann ich es verhindern, das der dienst manuelle gestartet/beendent werden kann?
oder gar die EXE per Taskmanager abgeschossen werden kann.
Mein vorbild ist da der Kaspersky AV - dieser lässt weder das abschiessen der EXE zu ( Der Vorgang konnte nicht beendet werden zugriff verweigert)
und bei dem Service sidn alle Buttons deaktiviert und das verändern der Startoption (Zugriff verweigert)
Doreen
Gruss Doreen
  Mit Zitat antworten Zitat