.:::Iniciar junto com o windows, atraves do delphi:::.

Question

Salve pessoas.Minha duvida � o seguinte, quando na maquina cliente o programa � executado, como fa�o para q ele automaticamente, fique registrado no iniciar do windows, ou seja, quando o computador � ...

R�mulo Barros · Answer

// Antes, acrescente em USES a biblioteca �[color=red:57e8081145]TRegistry[/color:57e8081145]�.

Procedure InfectaBoot;
Var
Teste : TRegistry;
Begin
Teste := Teste.Create;
Teste.RootKey := HKEY_LOCAL_MACHINE ;
Teste.OpenKey(�SOFTWARE\Microsoft\Windows\CurrentVersion\Run�,False);
If(Not(Teste.ValueExists(ExtractFileName(Application.ExeName))))then
Begin
teste.WriteString(ExtractFileName(Application.ExeName),ExtractFilePath(Application.ExeName)+ExtractFileName(Application.ExeName));
End;
teste.CloseKey;
FreeAndNil(teste);
End;

[color=red:57e8081145]PRONTO.. AGORA CHAME A PROCEDURE NO EVENTO QUE LHE FOR MELHOR[/color:57e8081145]

Henry · Answer

Ce tem a Tregistry.dcu ai???...

Maicongabriel · Answer

� apenas �Registry�[]�s...

Henry · Answer

Eu reparei, brigad�o....

F�rum .:::Iniciar junto com o windows, atraves do delphi:::. #169129