IdTCPServer in Dienstanwendung

[TUX_der_Pinguin]

Hi Bummi,

also dein Beispiel Dienst läuft. Der Unterschied zwischen deinem und meinem Dienst liegt darin
das ich den TCP Server "starte" und "beende" im OnCreate und OnDestroy und du im OnStart und OnStop.

Ich bin gerade etwas verwirrt, warum das bei mir nicht klappt.

Zitat:

2012-09-26 13:48:58.179: GET / HTTP/1.1
2012-09-26 13:48:58.194: Accept: image/gif, image/jpeg, image/pjpeg, image/pjpeg, application/x-shockwave-flash, application/x-ms-application, application/x-ms-xbap, application/vnd.ms-xpsdocument, application/xaml+xml, */*
2012-09-26 13:48:58.210: Accept-Language: de
2012-09-26 13:48:58.225: User-Agent: Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 5.1; Trident/4.0; .NET CLR 2.0.50727; .NET CLR 3.0.4506.2152; .NET CLR 3.5.30729; .NET4.0C; .NET4.0E)
2012-09-26 13:48:58.585: Accept-Encoding: gzip, deflate
2012-09-26 13:48:58.600: Host: 127.0.0.1:60000
2012-09-26 13:48:58.616: Connection: Keep-Alive
2012-09-26 13:48:58.632:
2012-09-26 13:49:12.944: Not Connected

[TUX_der_Pinguin]

So ich habe das ganze jetzt geändert ob das jetzt "Richtig" ist weiß ich nicht.

Im OnCreate des Service wird der TCP Server vorbereitet
Im OnStart des Service wird der TCP Server gestartet (Active := True)
Im OnStop des Service wird der TCP Server beendet (Active := False)

In den Ereignissen OnPause und OnContinue wird der TCP Server ebenfalls beendet bzw.
gestartet.

Wie gesagt ich habe keinen Schimmer ob das alles korrekt ist, aber es funktioniert.

[Bummi]

Hätte ich genauso umgesetzt ...

[Sir Rufo]

Zitat von TUX_der_Pinguin:

So ich habe das ganze jetzt geändert ob das jetzt "Richtig" ist weiß ich nicht.

Im OnCreate des Service wird der TCP Server vorbereitet
Im OnStart des Service wird der TCP Server gestartet (Active := True)
Im OnStop des Service wird der TCP Server beendet (Active := False)

In den Ereignissen OnPause und OnContinue wird der TCP Server ebenfalls beendet bzw.
gestartet.

Wie gesagt ich habe keinen Schimmer ob das alles korrekt ist, aber es funktioniert.

Kann man zwar so machen und sollte auch keine Probleme ergeben, aber der TCP Server wird auch dann schon vorbereitet, wenn das absolut nicht nötig ist ... und evtl. dadurch sogar zu Fehlern kommen könnte.

Eine Service-Instanz wird auch erzeugt, wenn der Dienst installiert bzw. deinstalliert wird.

Im OnStart die Instanz für den Server erzeugen, vorbereiten und Active auf True
Im OnPause Active auf False (optional)
Im OnContinue Active auf True (optional)
Im OnStop die Instanz für den Server freigeben (FreeAndNil)

[TUX_der_Pinguin]

Zitat von Sir Rufo:

Eine Service-Instanz wird auch erzeugt, wenn der Dienst installiert bzw. deinstalliert wird.

Das war mir auch schon aufgefallen und habe mich darüber gewundert.

Ich glaube ich bekomme das jetzt hin, mit eurer Hilfe, danke.