Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.05.06;
Скачать: CL | DM;

Вниз

Win Registry. Почему не работает? Помогите   Найти похожие ветки 

 
Reticent ©   (2002-04-22 18:12) [0]

Доброго времени суток!

Помогите, пожалуйста найти ошибку. Надо считать записанное в регистре.

if l_Registry.ValueExists("visible")
then DB_CurrentUser.UI.Filter.visible := l_Registry.ReadBool("visible"); // <-- тут работает безупречно

if l_Registry.KeyExists ("DBCheckListBoxEx_Stati")
then begin
l_Registry.OpenKey(REGISTRY_KEY + "\UI\Filter\DBCheckListBoxEx_Stati", True);
for i:=1 to 20 do
DB_CurrentUser.UI.Filter.DBCheckListBoxEx_Stati[i] := l_Registry.ReadBool(IntToStr(i)); // <-- а вот тут говорит что не может считать данные из "1"
l_Registry.CloseKey;
end;

Почему не может то?!? не пойму. Записываю данные в обоих случаях одинаково, считывать, вроде тоже хочу одинаково. Индекс, по моему с единицы начинается. Хотя не имеет значения, т.к. "1" - это не последний элемент.
DB_CurrentUser.UI.Filter.DBCheckListBoxEx_Stati : array[1..20] of bool;

Помогите Мастера.

С всего хорошего.


 
Reticent ©   (2002-04-22 18:45) [1]

Пожалуйста помогите.



Страницы: 1 вся ветка

Текущий архив: 2002.05.06;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.01 c
1-17583
PaRL
2002-04-22 15:43
2002.05.06
Координаты


7-17720
alla
2002-02-07 16:36
2002.05.06
Запись в сом порт


4-17723
stormick
2002-02-27 21:51
2002.05.06
Диалог


4-17733
Cobalt
2002-02-27 15:19
2002.05.06
Доступ к чужим окнам


6-17650
Elf(new)
2002-02-20 12:22
2002.05.06
Смена имени пользователя без перезагрузки...