Auto execução do Programa via Registro

Você precisa estar logado para dar um feedback. Clique aqui para efetuar o login
Para efetuar o download você precisa estar logado. Clique aqui para efetuar o login
Confirmar voto
0
 (0)  (0)

Veja nesta dica de Delphi: Auto execução do programa em Delphi via Registro

Auto execução do programa em Delphi via Registro

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;
 
Você precisa estar logado para dar um feedback. Clique aqui para efetuar o login
Receba nossas novidades
Ficou com alguma dúvida?