Vamos a ver, mis conocimietos de servicios son prácticamente nulos pero la ayuda de Delphi dice:
Cita:
Empezado por ayuda de Delphi
OnExecute event (TService)
If you are not spawning a new thread to handle individual service requests in an OnStart event handler, this is where you implement the service. When the OnExecute event handler finishes, the service thread terminates. Most OnExecute event handlers contain a loop that calls the service thread’s ProcessRequests method so that other service requests are not locked out.
|
¿Dónde está el evento OnExecute? Sin un loop como el que indica la ayuda y el ejemplo que ahí mismo viene, pues parece lógico que el servicio se detenga.
// Saludos