Eklatante Probleme mit Debuggen

[jaenicke]

Gut, in dem Fall war es 32-Bit. Ob es bei 64-Bit einen Unterschied macht, weiß ich nicht.

[bobokonijn]

Was für mich gut funktioniert in solchen Fällen ist den Debugger erst *nach* Programmstart mit dem Programm zu verbinden (Run-> Attach To Process). Ggf muss man im Programm eine Messagebox einbauen damit das Programm absichtlich anhält und man die Zeit hat, den Debugger zu verbinden.

[jaenicke]

Zitat von bobokonijn:

Was für mich gut funktioniert in solchen Fällen ist den Debugger erst *nach* Programmstart mit dem Programm zu verbinden (Run-> Attach To Process). Ggf muss man im Programm eine Messagebox einbauen damit das Programm absichtlich anhält und man die Zeit hat, den Debugger zu verbinden.

Oder:

Delphi-Quellcode:

while not  IsDebuggerPresent do
  Sleep(10);

Das funktioniert auch bei Diensten.

[dummzeuch]

Zitat von jaenicke:

Zitat von bobokonijn:

Was für mich gut funktioniert in solchen Fällen ist den Debugger erst *nach* Programmstart mit dem Programm zu verbinden (Run-> Attach To Process). Ggf muss man im Programm eine Messagebox einbauen damit das Programm absichtlich anhält und man die Zeit hat, den Debugger zu verbinden.

Oder:

Delphi-Quellcode:

while not  IsDebuggerPresent do
  Sleep(10);

Das funktioniert auch bei Diensten.

Interessante Methode, aber sie birgt die Gefahr, dass man einfacher vergessen kann, es wieder zu löschen. Dann wundert man sich, weshalb das Programm hängt, kann das aber im Debugger nicht nachvollziehen, und sucht sich einen Wolf, nur um am Ende mit dem Kopf auf der Tischkante zu landen, wenn man seine Dummheit bemerkt hat.

[jaenicke]

Das ist natürlich richtig, aber wenn man alle Änderungen überprüft und z.B. vor und nachher ein paar Leerzeilen und/oder eine Compilerwarnung einfügt, kann das kaum passieren.

Im Dienst fällt mir z.B. gar keine andere sinnvolle Variante ein, wenn man den Start des Dienstes debuggen möchte.

[himitsu]

Da der normale Code des TService sofort wieder stoppt, wenn das Programm nicht aus dem Service-Host gestartet wird, hatte ich den Code mal etwas nachgebaut.
Dann noch ein kleines Dummy-Fenster, damit man den Dienst "sieht" und was Einfaches zum Beenden hat.

Somit lässt es sich auch einfach über Debugger oder normals starten. (beim Kunden auch mal "manuell" und mit einigen Logausgaben im Consolenfenster, falls es dort mal wieder Probleme beim Starten gibt)
Wenn nur über Debugger, dann ginge auch IsDebuggerPresent, aber hier einfach mit einem Parameter gelöst, damit es auch einzeln starten kann.


Das TService vom Windows ist eh etwas "beschränkt".
z.B. läßt sich der Dienst nur einmal registrieren&installieren (außer man schmuggelt z.B. noch einen Start-Parameter mit rein)

[MyRealName]

Beim Service gibt es doch diesen DDService, der noch mehr Methoden als TService implementiert, den kann man auch debuggen...