Recupération des Registres

Bonjour,

Je developpe une application sous builder 6 et j'utilise des registres pour le parametrage. Je cherche à faire une fonction qui m'enregistre automatiquement tous les registres à la fermeture de l'application dans un fichier .reg.

Merci d'avance, Nyco

Dans l aide Tregistry

Pour lire

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19

#include <Registry.hpp>   AnsiString GetRegistryValue(AnsiString KeyName) { AnsiString S; TRegistry *Registry = new TRegistry; try { Registry->RootKey = HKEY_LOCAL_MACHINE; // false car ne voulons pas le créer s'il n'existe pas Registry->OpenKey(KeyName, false); S = Registry->ReadString("VALUE1"); } __finally { delete Registry; } return S; }

---

ou
pour ecrire

Code:

---

1 2 3 4 5 6

TRegistry *Reg = new TRegistry; Reg->RootKey = HKEY_CURRENT_USER; Reg->OpenKey("\\Software\\Microsoft\\Windows\\CurrentVersion\\RunOnce", true) Reg->WriteString("MyApp","\"" + ParamStr(0) + "\""); Reg->CloseKey(); delete Reg;

---

donc dans ton cas , tu ecris pendant et à la fin tu lis tout , tu envoies çà dans un memo et tu fais un savetofile() .

Voilà pas compliqué