Работа с реестром в Delphi


С чего начать.

Для начала в раздел uses необходимо подключить модуть Registry


Как писать.

Вот пример процедуры которая читает данные из одного параметра реестра и записывает их в другой.


Procedure ButtonClick(sender:tobject)

Var Registry:TRegistry;

Key:string;

begin

Registry:=Registry.Create//создаём обект

Registry.RootRey:=HKEY_CURRENT_USER;

Registry.OpenKey('software/microsoft/windows/CurrentVersion/Explorer',true);//открываем ключ

Key:=Registry.ReadString('Logon User Name');//Читаем данные из Logon User Name в Key:String

Registry.RootKey:=HKEY_LOCAL_MACHINE;

Registry.openKey('SowtWare/My Key',true);//открываем и создаём ключ

Registry.WriteString('MyName',Key);//Записываем данные в параметр MyName

end;


Скочать пример программы для разгона WinXP через реестр.EXE & Исходник

Используются технологии uCoz