Fórum Abrir sistema após ligar a máquina #233256
20/05/2004
0
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
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
Curtir tópico
+ 0
Responder
Posts
20/05/2004
Klaveren
bem existem algumas maneira uma é adicionar o icone INICIAR/PROGRAMAS/INICIAR
OU NA CHAVE DO REGEDIT
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run
OU NA CHAVE DO REGEDIT
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)