AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren

TService läuft nicht

Ein Thema von himitsu · begonnen am 19. Jul 2018 · letzter Beitrag vom 24. Jul 2018
Antwort Antwort
Seite 1 von 2  1 2   
Benutzerbild von himitsu
himitsu
Online

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
43.017 Beiträge
 
Delphi 12 Athens
 
#1

TService läuft nicht

  Alt 19. Jul 2018, 17:59
Moin,

wir haben bei einem Kunden ein kleines Problemchen,
unser Service läuft irgendwie garnicht mehr und uns gehen langsam die Ideen aus, woran es liegen könnte.

Berechtigungen geprüft ... scheinbar alles erlaubt
andere Anmeldeoptionen ausprobieren ... Lokales Sysemkonto und Adminkonto

noch Delphi XE
Windows Server 2008 R2
DataSnap, idHTTPServer und Kleinkram, aber bis dahin kommt es nicht mehr.

Beim Logging scheint es so, als wenn es im MSDN-Library durchsuchenStartServiceCtrlDispatcher hängen bleibt.
Normaler Weise kommt nach dem Delphi-Referenz durchsuchenTServiceApplication.Run direkt Delphi-Referenz durchsuchenTService.OnStart und dann Delphi-Referenz durchsuchenTService.OnExecute, aber im OnStart kommt es nie an. (dachten erst unser eigener Code bleibt im OnStart hängen)
Der Service bleibt einfach hängen und macht nichts. Nur ein Logging-Thread, welcher im TService.OnCreate gesartet wurde, läuft freudig weiter. (loggt kontinuierlich CPU-Auslastung, Speicherverbrauch und sowas ... sieht aber normal aus ... nichts los <1% Virtual=250MB FastMM=70MB)

Delphi-Quellcode:
{SvcMgr.}Application.CreateForm(TMyService, MyService);
   -> TMyService.OnCreate
{SvcMgr.}Application.Run;
   -> TServiceStartThread.Create
   -> WinSvc.StartServiceCtrlDispatcher
      -> TMyService.OnStart
      -> TMyService.OnExecute
      ...
Ach ja, seit einer ganzen Weile kommen auch Delphi-Referenz durchsuchenTService.LogMessage bei einigen Kunden nicht mehr in der Windows-Ereignisanzeige an.
Stattdessen taucht nur einmal eine Exception mit dem Text dieser LogMessage im Eurakalog-LogFile auf. Aber das passiert auch auf Systemen, wo der Service noch läuft.
Ist aber nicht ganz so schlimm ... dort sollten nur die gröbsten Stati und Fehlermeldungen für den Systemadmin auftauchen ... aber im eigenen Logfile stehen die auch nochmal, zwischen all den kleinen Meldungen.
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
my Delphi wish list : BugReports/FeatureRequests

Geändert von himitsu (19. Jul 2018 um 18:42 Uhr)
  Mit Zitat antworten Zitat
EWeiss
(Gast)

n/a Beiträge
 
#2

AW: TService läuft nicht

  Alt 19. Jul 2018, 18:06
Keine Ahnung was du genau meinst, wenn du damit die Dienste meinst..
Prüf mal ob dann Dienste deaktiviert wurden die für den spezifischen Dienst Voraussetzung sind damit er läuft.

gruss
  Mit Zitat antworten Zitat
Benutzerbild von himitsu
himitsu
Online

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
43.017 Beiträge
 
Delphi 12 Athens
 
#3

AW: TService läuft nicht

  Alt 19. Jul 2018, 18:16
Ja, einen Dienst ... ordentlich installiert usw.

Er wird manuell gestartet (wenn er liefe, würde er bei Systemstart auch automatisch gestartet),
dann bleibt er hängen und die Diensteverwaltung mecktert irgendwann, dass er nicht reagiere.

Die einzige Abhängigkeit (PostgreSQL) läuft, aber es ist egal, ob er mit oder ohne Abhängigkeiten installiert wurde.
Aber bis zum Aufbau der Verbindung zur Datenbank kommt er ja garnicht erst.
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
my Delphi wish list : BugReports/FeatureRequests

Geändert von himitsu (19. Jul 2018 um 18:19 Uhr)
  Mit Zitat antworten Zitat
EWeiss
(Gast)

n/a Beiträge
 
#4

AW: TService läuft nicht

  Alt 19. Jul 2018, 18:19
Ja, einen Dienst ... ordentlich installiert usw.

Er wird manuell gestartet (wenn er liefe, würde er bei Systemstart auch automatisch gestartet),
dann bleibt er hängen und die Diensteverwaltung mecktert irgendwann, dass er nicht reagiere.
Darf man fragen welcher?
Möchte den dann hier mal prüfen und schauen welche Abhängigkeiten er hat.

gruss
  Mit Zitat antworten Zitat
Benutzerbild von himitsu
himitsu
Online

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
43.017 Beiträge
 
Delphi 12 Athens
 
#5

AW: TService läuft nicht

  Alt 19. Jul 2018, 18:26
Darf man fragen welcher?
Ein Selbstgeschriebener?

Delphi-Referenz durchsuchenSvcMgr.TService
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
my Delphi wish list : BugReports/FeatureRequests
  Mit Zitat antworten Zitat
EWeiss
(Gast)

n/a Beiträge
 
#6

AW: TService läuft nicht

  Alt 19. Jul 2018, 18:27
Darf man fragen welcher?
Ein Selbstgeschriebener?
Delphi-Referenz durchsuchenSvcMgr.TService
Ach so dann kann ich leider nicht weiter helfen.
Sorry

gruss
  Mit Zitat antworten Zitat
hoika

Registriert seit: 5. Jul 2006
Ort: Magdeburg
8.269 Beiträge
 
Delphi 10.4 Sydney
 
#7

AW: TService läuft nicht

  Alt 19. Jul 2018, 18:53
Hallo,
ich würde eine abgespeckte Version ohne Abhängigkeiten, also ohne DB-Server installieren.
Und schrittweise alles wieder rein.
Heiko
  Mit Zitat antworten Zitat
Thomas Horstmann

Registriert seit: 25. Apr 2007
86 Beiträge
 
Delphi 10.3 Rio
 
#8

AW: TService läuft nicht

  Alt 19. Jul 2018, 22:02
Hallo,
ich hatte ein ähnliches Problem. Bei mir lag es daran, dass der Windows-Dienstname den gleichen Namen haben muss, wie der Name von TServiceForm.
  Mit Zitat antworten Zitat
Benutzerbild von himitsu
himitsu
Online

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
43.017 Beiträge
 
Delphi 12 Athens
 
#9

AW: TService läuft nicht

  Alt 20. Jul 2018, 15:28
Die einzige Abhängigkeit (PostgreSQL) läuft, aber es ist egal, ob er mit oder ohne Abhängigkeiten installiert wurde.
ich würde eine abgespeckte Version ohne Abhängigkeiten, also ohne DB-Server installieren.
Ändert leider nichts.

Hallo,
ich hatte ein ähnliches Problem. Bei mir lag es daran, dass der Windows-Dienstname den gleichen Namen haben muss, wie der Name von TServiceForm.
In diesem Fall ist es so, also die Namen stimmen (ClassName, Name und DisplayName ... wobei natürlich nur die letzten Beiden geändert werden können),
auch wenn es bei uns möglich ist dass dieser abweicht, um den Service auch mehrmals installieren zu können und das funktionierte bis jetzt auch problemlos, sogar auf neueren Windows-Servern.

Ich hab grade geerkt, dass es auch noch Delphi-Referenz durchsuchenTService.ServiceStartName, aber das wird bei uns nicht gesetzt/geändert ... k.A. was standardmäßig da drin ist.
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
my Delphi wish list : BugReports/FeatureRequests
  Mit Zitat antworten Zitat
Benutzerbild von Luckie
Luckie

Registriert seit: 29. Mai 2002
37.621 Beiträge
 
Delphi 2006 Professional
 
#10

AW: TService läuft nicht

  Alt 20. Jul 2018, 18:26
Was sagt denn die Ereignisanzeige?
Michael
Ein Teil meines Codes würde euch verunsichern.
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 1 von 2  1 2   

Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 21:27 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