Como inicio um programa antes de logar na maquina??

Delphi

15/03/2003

Caros colegas, estou com a seguinte dúvida...
Preciso que ao ligar um computador e o mesmo termine de carregar o sistema operacional, o meu programa execute automaticamente em modo invisivel(nao aparece para o cliente). Ele deve executar mesmo antes do usuario se logar na maquina. Alguem sabe se é possivel? E como eu faço isso???

Valeu Galera... :D :D :D


Luiz.claudio

Luiz.claudio

Curtidas 0

Respostas

Jfvicente

Jfvicente

15/03/2003

VC DEVE EDITAR O ARQUIVO SYSTEM.INI DO WINDOWS
E NA LINHA ´ SHELL=EXPLORER.EXE´ TROCAR PARA ´SHELL=C:\SEU PROGRAMA´


GOSTEI 0
Anonymous

Anonymous

15/03/2003

inclua seu programa no registro do sistema (Win9x me) em
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\RunServices


GOSTEI 0
Balceiro

Balceiro

15/03/2003

Olá...

Desenvolvi um programinha básico, gostaria que toda vez que ligasse o computador ele se inicializasse. Uso o windows 2000.


Obrigado.


GOSTEI 0
Fabio.hc

Fabio.hc

15/03/2003

Tente assim:

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); 
end; 



GOSTEI 0
Evandro.ogada

Evandro.ogada

15/03/2003

já usei esse código anteriormente e funciona legal para 98,
quando passei para o XP deu erro no kernel...
o que devo fazer para executar essa aplicação no XP?


GOSTEI 0
Fabio.hc

Fabio.hc

15/03/2003

Troque estas linhas:

reg.RootKey:=HKEY_USERS; 
reg.Openkey   (´\.DEFAULT\Software\Microsoft\Windows\CurrentVersion´,false); 


Por estas:

reg.RootKey:=HKEY_CURRENT_USER;
reg.Openkey   (´\Software\Microsoft\Windows\CurrentVersion´,false);



GOSTEI 0
POSTAR