| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Работа с реестром [D7, WinXP]

tigra ©   (2006-03-17 06:48:00) 

Привет всем!
Записываю в реестр в нужную ветку  цифирю таким вот образом:
Registry:=TRegistry.Create;
 with Registry do
   begin
     OpenKey('\Software',True);
     OpenKey('Proect',True);
     OpenKey('Terr',True);
     WriteInteger('Terr',7);
     CloseKey;
Потом хочу ее слить из Terr таким образом:
Registry:=TRegistry.Create;
 Registry.OpenKey('\Software',False);
 Registry.OpenKey('Proect',False);
 Terr:=Registry.ReadInteger('Terr');
 Terr:=1;
На что выдается ошибка "Filed to get data for Terr"
Подскажите где трабл?
Пасиба заранее всем :)

---

КиТаЯц   (2006-03-17 10:48:00) [1]

На будущее: просто бросьте моду обзывать разделы и параметры одинаково

---

clickmaker   (2006-03-17 09:51:00) [2]

> tigra   (17.03.06 09:35) [5]

так, для справки. Ключи можно открывать не по одному
Registry.OpenKey('Software\Proect\Terr', False)

---

tigra   (2006-03-17 09:35:00) [3]

Млин!!! Извиняйте, я заметил, исправил, а цитату не бросил. Из серии "А бабулька свистела?" "Нет..." "А чего вы тогда приперлись?" :))))
Всем БОЛЬШОЕ СПАСИБА за отклики :))))

---

balepa   (2006-03-17 08:30:00) [4]

> Registry:=TRegistry.Create;
> Registry.OpenKey('\Software',False);
> Registry.OpenKey('Proect',False);
> Registry.OpenKey('Terr',False);
> Terr:=Registry.ReadInteger('Terr');

А я то и не заметил что он его не открывает, и удивлялся почему у меня работает а у него нет.

---

КиТаЯц   (2006-03-17 08:22:00) [5]

Записываю в реестр в нужную ветку  цифирю таким вот образом:
Registry:=TRegistry.Create;
with Registry do
  begin
    OpenKey('\Software',True);
    OpenKey('Proect',True);
    OpenKey(' Terr',True);
    WriteInteger(' Terr',7);
    CloseKey;

Потом хочу ее слить из Terr таким образом:
Registry:=TRegistry.Create;
Registry.OpenKey('\Software',False);
Registry.OpenKey('Proect',False);
Registry.OpenKey('Terr',False);
Terr:=Registry.ReadInteger(' Terr');

---

balepa   (2006-03-17 07:12:00) [6]

Попробуй добавить
Reg.RootKey:= HKEY_LOCAL_MACHINE;

---

balepa   (2006-03-17 07:10:00) [7]

А где Registry.Free ?

---

Наверх