Abrir sistema após ligar a máquina

Delphi

20/05/2004

Tenho o seguinte código:

uses registry;
var reg:TRegIniFile;

procedure TForm1.FormCreate(Sender: TObject);
var s,s2:string;
begin
Reg:=TRegIniFile.Create(´CBier´);
{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;

Devo incluir ou alterar algum código no registro do windows para funcionar corretamente ??

Obrigado

CBier


Cbier

Cbier

Curtidas 0

Respostas

Klaveren

Klaveren

20/05/2004

bem existem algumas maneira uma é adicionar o icone INICIAR/PROGRAMAS/INICIAR

OU NA CHAVE DO REGEDIT
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run


GOSTEI 0
POSTAR