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

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

у меня неполучаетсмя присваивать значения TRegistry.RootKey? [D6, WinXP]

ctranik ©   (2006-01-11 17:41:00) 

Всем привет

У меня такой вопрос

Как в цикле , менять значение свойства "Rootkey" класса  TRegistry
ну что типа такого

var
reg:TRegisty;
hk:array[0..6] of Hkey;
i:integer;

begin

reg:=TRegistry.Create;
hk[0]:=HKEY_LOCAL_MACHINE;
hk[1]:=HKEY_Current_User;
hk[2]:=HKEY_Classes_Root;
hk[3]:=HKEY_Users; hk[4]:=HKEY_Current_Config;
hk[5]:=HKEY_PERFORMANCE_DATA;
hk[6]:=HKEY_DYN_DATA ;

for i:= 0 to 6 do
    reg.rootkey:=hk[z];
    .......
    .......
end;

reg.free;

у меня неполучаетсмя присваивать значения ?

---

IceBeerg   (2006-01-12 17:17:00) [1]

...или i на z

---

begin...end   (2006-01-11 17:54:00) [2]

> ctranik   (11.01.06 17:41)

> у меня неполучаетсмя присваивать значения ?

Почему Вы так решили? Возникает какая-то ошибка?

Код, в принципе, верный, только z надо заменить на i.

---

Наверх