Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: WinAPI и системное программирование > Чтение/запись в реестр

Автор: RaIDeR 12.8.2005, 23:23

Здраствуйте ! Как считать/записать данные в реестр ? (в моём случае строку)
Я знаю что нужно использовать ф-ции RegOpenKey, RegSetValue ... но что-то у
меня не получается (( можно пример ? smile

Автор: p0s0l 12.8.2005, 23:33

http://forum.vingrad.ru/index.php?showtopic=33445
Добавлено @ 23:36
+ скачать DRKB, всё равно пригодится
Статья там: "Как работать с реестром средствами API?"

Также (мало ли не знал) есть уже готовый класс TRegistry для работы с реестром...

Автор: Dimannn 13.8.2005, 12:31

А смысл использовать WinApi. Подключи unit Registry. Используй переменную TRegistry.
Там всё легче и понятней

Автор: RaIDeR 13.8.2005, 23:22

p0s0l, cпасибо !
-
А вот как записовать:

Код


function RegWriteString(KeyRoot: HKEY; const KeyPath, StrName, StrValue: String) : Boolean;
var
  Key: HKEY;
begin
  Result := 
  RegOpenKey(KeyRoot, PChar(KeyPath), Key) = ERROR_SUCCESS;
  RegSetValueEx(Key, PChar(StrName), 0, REG_SZ, PChar(StrValue), Length(StrValue));
  RegCloseKey(Key);
end;

Использование:

Код


procedure TForm1.Button1Click(Sender: TObject);
begin
  if RegWriteString(HKEY_LOCAL_MACHINE, 'SOFTWARE\Microsoft\Windows\CurrentVersion\Run', 'MyTrayProg', ParamStr(0)) then ShowMessage('Записано !');
end;

2 Dimannn:
Ты мне лучше скажи в чём смысл использовать модуль Registry ?
Как видишь ф-ции не сложные ...