Модераторы: Snowy, bartram, MetalFan, bems, Poseidon, Riply
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Чтение/запись в реестр, как ? 
:(
    Опции темы
RaIDeR
Дата 12.8.2005, 23:23 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 116
Регистрация: 20.6.2005

Репутация: нет
Всего: 4
Здраствуйте ! Как считать/записать данные в реестр ? (в моём случае строку)
Я знаю что нужно использовать ф-ции RegOpenKey, RegSetValue ... но что-то у
меня не получается (( можно пример ? smile
PM MAIL   Вверх
p0s0l
Дата 12.8.2005, 23:33 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Г-н Посол
****


Профиль
Группа: Экс. модератор
Сообщений: 3668
Регистрация: 13.7.2003
Где: 58°38' с.ш. 4 9°41' в.д.

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

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


--------------------
С уважением, г-н Посол.
PM   Вверх
Dimannn
Дата 13.8.2005, 12:31 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 318
Регистрация: 14.4.2005
Где: Владимир

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


--------------------
Хотите быстро и без проблем опубликовать вашу программу в сети за 5 минут?
Тогда потратьте пару минут чтобы посмотреть, что предлагает OpenProject.org.ru
PM MAIL ICQ   Вверх
RaIDeR
Дата 13.8.2005, 23:22 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 116
Регистрация: 20.6.2005

Репутация: нет
Всего: 4
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 ?
Как видишь ф-ции не сложные ...

Это сообщение отредактировал(а) RaIDeR - 13.8.2005, 23:26
PM MAIL   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: WinAPI и системное программирование"
Snowybartram
MetalFanbems
PoseidonRrader
Riply

Запрещено:

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Delphi обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи
  • 99% ответов по WinAPI можно найти в MSDN Library, оставшиеся 1% здесь

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, bartram, MetalFan, bems, Poseidon, Rrader, Riply.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: WinAPI и системное программирование | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0466 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.