Certains programmes doivent être configurés pour démarrer au démarrage, j'ai donc écrit une fonction pour faciliter une utilisation future pour votre référence.
Copiez le code comme suit :
procédure TMainForm.SetAutoRun(ok: booléen);
var
Reg:TRegistry; //Définissez d'abord une variable Reg de type TRegistry
commencer
Reg:=TRegistry.Create;
essayez //Créez une nouvelle clé
Reg.RootKey:=HKEY_LOCAL_MACHINE; //Définit la clé racine sur HKEY_LOCAL_MACHINE
Reg.OpenKey('Software/Microsoft/Windows/CurrentVersion/Run',true);//Ouvrir une clé
si ok alors commence
Reg.WriteString('SMS Service',ExpandFileName(ParamStr(0))); //Écrivez le nom et la valeur des données dans la clé Reg.
ShowMessage('Inscription réussie !');
fin
sinon commencer
reg.DeleteValue('Service SMS');
ShowMessage('Supprimer avec succès !')
fin;
Reg.CloseKey; //Fermer la clé
enfin
Reg.Gratuit ;
fin;
fin;
exemple:
SetAutoRun(true); //Démarrage de l'enregistrement
SetAutoRun(false); //Supprimer le démarrage