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

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

Мастера, подскажите , в чем ошибка [D5, Win2k]

Reticent ©   (2002-06-13 15:27:00) 

Доброе время суток!

Почему Registry.GetValueNames(temp_val); не работает?
Мой код:
var
temp_val: TStrings;
...
if l_Registry.KeyExists (REGISTRY_KEY + "\UI\Filter\DBCheckListBoxEx_Stati")
then begin
l_Registry.OpenKey (REGISTRY_KEY + "\UI\Filter\DBCheckListBoxEx_Stati", True);
l_Registry.GetValueNames(temp_val); <-- тут вылетает !?
for i:=0 to temp_val.Count do
...

Всего хорошего!

---

Reticent   (2002-06-13 16:10:00) [1]

всем спасибо!! огромное! я все же решился испробовать TStringList. Сработало!!!
Thanks!

---

Внук   (2002-06-13 16:04:00) [2]

Да, это моя опечатка :)

---

Reticent   (2002-06-13 16:02:00) [3]

> Внук

у меня s в конце, т.е. TStrings

---

Внук   (2002-06-13 15:56:00) [4]

Наоборот, должен. TString абстрактный, а TStringList - его реальный наследник

---

Reticent   (2002-06-13 15:52:00) [5]

эээ... да да , забыл написать
перед
if l_Registry.KeyExists (REGISTRY_KEY + "\UI\Filter\DBCheckListBoxEx_Stati")

стоит temp_val:=TStrings.Create;

а TStringList я же не могу использовать, т.к. в GetValueNames(TStrings должен быть)

---

Reticent   (2002-06-13 15:48:00) [6]

ведь GetValueNames() возвращает кол-во эл-ов в текущем ключе. Или я не прав?

---

Игорь Шевченко   (2002-06-13 15:47:00) [7]

TStrings - абстрактный класс. Лучше TStringList
Экземпляр класса создается где-нибудь ?

---

Наверх