FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Buscar | Temas de Hoy | Marcar Foros Como Leídos |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Duración de un servicio en el administrador de tareas.
Hola Gente:
estuve investigando para poder ejecutar un servicio en windows desde delphi 2007. Logre hacerlo siguiendo el siguiente link que recomendaron en este mismo sitio http://www.devarticles.com/c/a/Delph...e-in-Delphi/1/ El problema que tengo es que el servicio en cuestión se queda en el administrador de tareas de windows unos 10 a 15 segundos y luego se cierra. Alguno me podría dar alguna ayuda al respecto. Les dejo el código que ejecuto para que se guíen: Código Delphi [-]procedure ServiceController(CtrlCode: DWord); stdcall; begin Service1.Controller(CtrlCode); end; function TService1.GetServiceController: TServiceController; begin Result := ServiceController; end; procedure TService1.ServiceExecute(Sender: TService); begin Timer1.Enabled := True; while not Terminated do ServiceThread.ProcessRequests(True); // wait for termination Timer1.Enabled := False; end; procedure TService1.ServiceStart(Sender: TService; var Started: Boolean); begin Timer1:=TTimer.Create(nil); Timer1.Interval := 10000; end; procedure TService1.ServiceStop(Sender: TService; var Stopped: Boolean); begin Timer1.Free; Timer1:=nil; end; procedure TService1.Timer1Timer(Sender: TObject); const FileName = 'c:\logdate.txt'; var F: TextFile; begin AssignFile(f,FileName); if FileExists(FileName) then Append(f) else Rewrite(f); Rewrite (f); writeln(f,DateTimeToStr(Now)); CloseFile(f); end; Desde ya muchisimas gracias. Última edición por mcalmanovici fecha: 25-06-2008 a las 19:52:59. Razón: Mal el link |
Herramientas | Buscar en Tema |
Desplegado | |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Ocultar aplicación del administrador de tareas | compaqdavid | Varios | 7 | 03-01-2007 05:29:44 |
Administrador de tareas | Iskariote0087 | API de Windows | 7 | 31-12-2006 20:26:36 |
Administrador de tareas - recuento de indentificadores | mole | API de Windows | 2 | 25-08-2006 09:41:52 |
como ocultar un proceso del administrador de tareas | ivoloco | API de Windows | 1 | 14-01-2006 04:21:07 |
Activar Administrador de Tareas | CARSOFT_AR | Varios | 4 | 23-11-2005 20:12:58 |
|