Service startet nicht

[CCRDude]

Zitat von himitsu:

Über NET START im Debugger gestartet funktioniert nicht.

Hmmm... liegt das Kompilat denn auf einem lokalen Laufwerk? Also nicht im Netz oder einem gesubsteten Laufwerk?

Bei mir funktioniert es nämlich (mit Delphi XE) sehr zuverlässig, habe damit gerade in den letzten 8 Wochen etliches debugged. Erinnere mich grob daran, daß der Service natürlich schon installiert sein muss, und der ImagePath stimmen muss (ich habe für Debug und Release getrennte Pfade, d.h. ein installiertes Release würde Debug "unmöglich" machen - dann springt er halt auch mit F7 gar nicht erst in den Code). Das sind meine zwei Hauptfehler beim Testen gewesen.

Zitat von himitsu:

Irgendwie erkennt TService anscheinend, daß es nicht als "Dienst" im SYSTEM-Konto läuft und startet dann garnicht erst.

Aber damit TService etwas tun kann, muss der Code ja schon ausgeführt werden. Dann hilft es eventuell, halt direkt mit F7 statt Breakpoints ins Debuggen zu starten und ganz von Anfang durchzusteppen.

Allerdings kann ich wie gesagt meine Services, die mit ObjectName=LocalSystem sowohl in Delphi konfiguriert als auch im System eingetragen sind, zu debuggen.

Wie das mit Delphi 2010 ist, weiß ich leider nicht, nur daß es unter Delphi 2006 (hatte ich davor) nicht so einfach klappte.

Jetzt mit IDA Pro (oder einem anderen Debugger Deiner Wahl) auch noch das "net" zu debuggen, um zu sehen, ob und wie er in Dein Kompilat springt, wäre vermutlich etwas übertrieben, würde mir sonst nur als letzte Lösung einfallen.

[himitsu]

EXE direkt im Debugger gestartet liegt auf einem SUBST-Laufwerk.
Der installierte Service aber auf einer normalen Partition.

Also starten tut es erstmal, aber .Run beendet sich eben immer gleich wieder.

[mkinzler]

Und wenn du die Exe mal testweise auf ein lokales Laufwerk packst?

[CCRDude]

Wenn Du schreibst, daß .Run sich eben immer gleich wieder beendet, heißt das also, daß Du in den Debugger kommst? Links hast Du blaue Punkte neben den Codezeilen und irgendwo stehst Du an einem Breakpoint in Deinem Code?

Dann kompilier im Zweifel mit Debug-DCUs (im die RTL mitdebuggen zu können), und wenn er aus .Run sofort wieder rausspringt, stepst Du halt mit F7 rein, und hast außerdem Breakpoints auf allen Deinen Events im TService.

[Daniela.S]

Vielleicht kannst mit MadExcept mehr herausfinden?
Map Datei mit allen Debug Infos dazu und Code Info erhöhen...

Debuggen geht dann zwar nicht, aber sollte helfen zu sehen wo er genau hängt


Tante Edit, Link http://madshi.net/

[himitsu]

Als Service und auch beim Debuggen (über dieses NET START) liegt alles auf einem lokalen Laufwerk.
Außer die Quellcodes, aber die findet Delphi ja.

zu MadExcept EurekaLog und Co:
Wie gesagt, es stürtz nichts ab, es gibt keine Exceptions ... es bleibt ganz einfach hängen.

[mkinzler]

Aber halt auf einem gemappten Laufwerk.

[Daniela.S]

Bei MadExcept gibt es die Einstellung "check for frozen main thread -> freeze timeout (sec)"

Einen Versuch wäre es wert...

[himitsu]

Zitat von mkinzler:

Aber halt auf einem gemappten Laufwerk.

Nee, gerade das ist eines der Laufwerke, welche "original" sind.

[QuickAndDirty]

Wir haben solche Probleme auch manchmal...
bis her lag es meistens an
-Rechten...selbst der Admin hatte nicht genug rechte für bestimmte temp Dateien oder ähnliches...wegen bekloppter Gruppenrichtlinien...
Der Fehler passiert dann schon in der initialization der unit...bäh
-unvorhergesehene Fehler mit Showmessage o.ä. ...z.B. Units die implizit eingebunden werden und mit Showmessage Fehler ausgeben....bähh
-komische Einstellungen in den Einstellungsdateien...z.b. Pfade mit Netzwerklaufwerken oder Subst-gemappte-Laufwerke!

hast du den Timeout für deinen Dienst mal rauf gesetzt ? Vielleicht braucht er wirklich länger.