Hola a todos.
Antes que nada dar las gracias por ayudar a entender un poco mas este mundo maravilloso del delphi.
Bueno a lo que voy he creado e instalado un servicio en windows 2003 server que apartir de un fichero que esta en un sitio ftp actualiza una base de datos de SQL Server 2005. Funciona perfecto en el momento de instalarlo o si ejecuto el exe directamente pero al reiniciar el ordenador el servicio se inicia y si miro el administrador de tareas el exe se esta ejecutando pero no actualiza la base de datos es como si estubiera en pausa.
Este es el codigo del servicio a ver si alguien me puede decir que hago mal o darme alguna idea.
Código Delphi
[-]
program ServicioRes1;
uses
SvcMgr,
SysUtils,
Unit1 in 'Unit1.pas' ,
UVariables in 'UVariables.pas';
{$R *.RES}
begin
if not Application.DelayInitialize or Application.Installing then
Application.Initialize;
Application.CreateForm(TServiceRes1, ServiceRes1);
Application.Run;
while True do
begin
sleep(300000);
ServiceRes1.ActualizarReservas;
end;
end.
Bueno un saludo para todos.