Como fazer um aplicativo em Delphi, iniciar como serviço ?

Delphi

03/04/2003

Como fazer um aplicativo em Delphi, iniciar como serviço ?

Tenho um programa em Delphi, e gostaria ele assim que ligasse a máquina, ele começasse a execução, antes mesmo do login da máquina.
Acho que este tipo de aplicativo é chamado como serviço.
Como posso fazer isso ?


Cxrocha

Cxrocha

Curtidas 0

Respostas

Anonymous

Anonymous

03/04/2003

Coloque uma chave no registro do windows com seu Programa:

uses registry;
var reg:TRegIniFile;
procedure TForm1.FormCreate(Sender: TObject);
var
s,s2:string;
begin
Reg:=TRegIniFile.Create(´LloydSoft´);
{HKEY_USERS\.DEFAULT\Software\Microsoft\Windows\CurrentVersion\Run}
S:=ExtractFileDir(Application.ExeName);
S2:=ExtractFileName(Application.ExeName);
S:=S+´\´+S2;
reg.RootKey:=HKEY_USERS;
reg.Openkey (´\.DEFAULT\Software\Microsoft\Windows\CurrentVersion´,false);
reg.WriteString(´Run´, ´Logo´, s);
button1.click;
end;


GOSTEI 0
Anonymous

Anonymous

03/04/2003

Ao inves de criar uma aplicacao comum, vá em File/New/Other/New/Application Service

E pra instalar o servico, vá no prompt de comando e digite C:\CaminhoTal\SeuServico.exe -install


GOSTEI 0
Anonymous

Anonymous

03/04/2003

[quote:9bf638561d=´BON JOVI´]Ao inves de criar uma aplicacao comum, vá em File/New/Other/New/Application Service

E pra instalar o servico, vá no prompt de comando e digite C:\CaminhoTal\SeuServico.exe -install[/quote:9bf638561d]

Muito obrigado pela dica BON JOVI.
Mas tenho ainda uma dúvida. Se já tenho uma aplicação pronta, como faço ?


GOSTEI 0
Jck

Jck

03/04/2003

[quote:278576e113=´BON JOVI´]Ao inves de criar uma aplicacao comum, vá em File/New/Other/New/Application Service

E pra instalar o servico, vá no prompt de comando e digite C:\CaminhoTal\SeuServico.exe -install[/quote:278576e113]

Mas o service application não funciona só nos Windows baseados na plataforma NT (NT 4, 2000, XP e Server 2003)


GOSTEI 0
Dudujuan

Dudujuan

03/04/2003

po...seu abri o prompt e executei esse comando, mas da a seguinte mensagem: nomedoarquivo.exe não é reconhecido como um comando interno ou externo, um programa operável ou um arquivo em lotes

alguém sabe o porque?


GOSTEI 0
Dudujuan

Dudujuan

03/04/2003

ok...ja resolvi o problema de instalação...
tenho um programa que possui vásrios forms. Um deles é para cadastro de clientes no BD. ao gravar um cliente, eu quero que o service execute outro programa independente.
onde coloco os códigos?


GOSTEI 0
POSTAR