Saber si un servicio está en marcha
He implementado un servicio en Delphi (Service Application) y necesito alguna forma de saber si mi servicio está en marcha o no. De esta manera, si detecto que no está en marcha, puedo arrancarlo. ¿Existe alguna manera para saber si un servicio en concreto está en marcha? ¿O saber el estado en que se encuentra (activo, inactivo, en pausa, etc...)?
|
Obtener el estado de un servicio de Windows
Esto tengo localizado, aunque no lo probé:
Con la siguiente función obtendremos el estado de un servicio del Sistema Operativo (Iniciado, Detenido, Pausado, Iniciando, Deteniendo). Para ello añadiremos un formulario, dentro de éste colocaremos dos cuadros de texto (TEdit) y un botón (TButton). Un cuadro de texto será para especificar el nombre del servicio a comprobar y el otro para especificar la máquina en la que se comprobará. Puesto que esta función utiliza otra de la API de Windows llamada "OpenService", la cual se haya en la DLL: "advapi32.dll" , en el USES de la unidad colocaremos "WinSvc": Espero funcione. Saludos. |
La franja horaria es GMT +2. Ahora son las 08:02:08. |
Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi