ServiceApplication

← →
Creator___ (2005-03-02 14:10) [0]

Вот такая загвоздка. Создаю ServiceApplication, вставляю код на onStart, в котором создаю tcp/ip сервер (TidTCPServer), и ставлю ему active := true. Сервис выполняет код и выгружается, говоря при этом, что ему нечего делать. Подскажите, как сделать, что бы он оставался в памяти и ждал подключения по TCP/IP.

← →
Reindeer Moss Eater © (2005-03-02 14:13) [1]

Выполнился код между begin и end.
Сервису больше нечего делать.
А что ему делать, в самом деле, если все сделано?

← →
Creator___ (2005-03-02 14:16) [2]

Да ну нафиг? А я не знал.... Ой-ой. Как его заставить ожидать подключения? Просьба отвечать только уверенным людям.

← →
Reindeer Moss Eater © (2005-03-02 14:17) [3]

Не надо никого заставлять ждать.
Надо недопустить выхода из begin/end.

← →
Creator___ (2005-03-02 14:18) [4]

Вот это ответ. Спасибо.

В [1] то же был ответ.

Неправильно если используется ServiceStart то в нем надо просто запускать свой поток, а в ServiceStop его останавливать и освобождать. Также неплохо реализовать ServiceShutdown. По желанию ServicePause и ServiceContinue.
А недопускать выхода из begin end надо в OnExecute(незабывать ProcessRequests)! Оба метода реализации сервиса правильны. Но мне больше нравится с onStart onStop, потоки удобнее отлаживать.

ServiceApplication Найти похожие ветки