Как работать с реестром Windows? |
Previous Top Next |
Вот небольшой пример работы с системным реестром;
Code: |
uses Registry, Windows;
procedure TForm1.Button1Click(Sender: TObject); var Registry: TRegistry; begin { создаём объект TRegistry } Registry := TRegistry.Create; { устанавливаем корневой ключ; напрмер hkey_local_machine или hkey_current_user } Registry.RootKey := hkey_local_machine; { открываем и создаём ключ } Registry.OpenKey('software\MyRegistryExample',true); { записываем значение } Registry.WriteString('MyRegistryName','MyRegistry Value'); { закрываем и освобождаем ключ } Registry.CloseKey; Registry.Free; end;
// для удаления ключа используется функция Registry.DeleteKey |
©Drkb::02268
Взято из http://forum.sources.ru