Executer un programme a chaque lancement de windows 'base de registre'

Soyez le premier à donner votre avis sur cette source.

Vue 10 145 fois - Téléchargée 640 fois

Description

ce programme sert a executer un logiciel a chaque lancement de windows .

Source / Exemple :


mettez  Registry dans use
Procedure RunOnStartUp (SProgTitle,sCmdLine: string;bRunOnce :Boolean);
var
sKey :String;
Reg: TRegIniFile;
begin
if ( bRunOnce ) then
sKey := 'once'
else
sKey := '' ;
Reg := TRegIniFile.Create ('');
Reg.RootKey := HKEY_LOCALMACHINE;
Reg.writeString('SOFTWARE\Microsoft'+'\WINDOWS\CurentVersion\Run'+ SKey +#0,sProgTitle,sCmdLine);
Reg.free;
Procedure TForm1.FormCreate(Sender:TObject);
begin
RunOnStartUp('Hello World','C:\HelloWorld.exe');
end;

Conclusion :


Vous Trouvez Un example dans le zip
°c Chems Generation

Codes Sources

A voir également

Ajouter un commentaire

Commentaires

cs_Forman
Messages postés
663
Date d'inscription
samedi 8 juin 2002
Statut
Membre
Dernière intervention
6 avril 2010
1 -
Il y a 2 "r" à '...\CurrentVersion\...'
De plus, quelle est l'utilité du "+#0" à la fin de la chaîne? La classe TRegIniFile transforme les string en PChar automatiquement et le rajoutte elle-même.

Merci quand même pour l'info.
cs_Forman
Messages postés
663
Date d'inscription
samedi 8 juin 2002
Statut
Membre
Dernière intervention
6 avril 2010
1 -
De plus HKEY_LOCALMACHINE s'écrit en fait HKEY_LOCAL_MACHINE

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.