VPF::Ошибка при записи в реестр Win98 - Форум программистов

SerGreY

Дата 1.2.2007, 17:21 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

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

Репутация: нет
Всего: нет

Работа с реестром выглядит примерно так:

Код


reg := TRegistry.Create;
reg.RootKey := HKEY_CURRENT_USER;
reg.OpenKey('Software\MyApp', True);
reg.WriteString('RegLine1', 'aaaaa' );
reg.Free;

В WindowsXP все работает отлично, а при запуске под Windows98 появляется ошибка "Failed to set data for "RegLine1"".

Это сообщение отредактировал(а) Girder - 5.2.2007, 22:48

Guedda

Дата 2.2.2007, 00:41 (ссылка)

(нет голосов)

Загрузка ...

Подрывник

Профиль
Группа: Завсегдатай
Сообщений: 3137
Регистрация: 27.12.2005
Где: Ростов-на-Дону

Репутация: 14
Всего: 78

Цитата(SerGreY @ 1.2.2007, 17:21

)

В WindowsXP все работает отлично, а при запуске под Windows98 появляется ошибка "Failed to set data for "RegLine1"".

Значит запись в реестр запрещена, так как ошибка повествует об ошибке записи в реестр именно параметра RegLine1. А начальная инициализация проходит нормально. Обратитесь к администратору, он откроет Вам доступ.

--------------------

Ll 2

Alexeis

Дата 2.2.2007, 02:10 (ссылка)

(нет голосов)

Загрузка ...

Амеба

Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 109
Всего: 459

Цитата(Guedda @ 2.2.2007, 00:41

)

Обратитесь к администратору, он откроет Вам доступ.

Насколько я помню в 98 еще не было такой строгой системы привелегий для пользователей.
функции
reg.OpenKey('Software\MyApp', True);
reg.WriteString('RegLine1', 'aaaaa' );

Возвращают результат операции. Неплохо бы его узнать. Принципиально таких ограничений нет. Вероятно производиться попытка записи в несуществующий параметр или что-то типа того. Желательно определить номер строки на которой возникает исключение.

--------------------

Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать

Akella

Дата 2.2.2007, 09:01 (ссылка)

(нет голосов)

Загрузка ...

Творец

Профиль
Группа: Модератор
Сообщений: 18485
Регистрация: 14.5.2003
Где: Корусант

Репутация: 36
Всего: 329

попробуй получить текст ошибки

Код


reg.WriteString('RegLine1', 'aaaaa' );
MessageBox(Application.activeFormHandle, PAnsiChar(SysErrorMessage(GetLastError)), 'Ошибка!', MB_ICONWARNING or MB_OK);

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »