![]() |
|
|
![]()
|
|
| Marriage |
|
|||
![]() Опытный ![]() ![]() Профиль Группа: Участник Сообщений: 842 Регистрация: 4.5.2004 Где: Таганрог Репутация: нет Всего: 2 |
Столкнулся с такой проблемой ...
Грид сохраняет данные в реестр .... Пытаюсь сделать кнопку сброса настроек, но ничего не получается ... Может я что-то упустил ???? procedure TfrmUseFrame.ToolButton10Click(Sender: TObject); var reg: TRegistry; begin reg := TRegistry.Create; reg.RootKey := HKEY_CURRENT_USER; try If Reg.DeleteKey('Software\SoftMaster\uvrach\naz_windows') then ShowMEssage('НАстройки возвращены в исходное состояние.') Else Begin ShowMEssage('Данные настроек не обнаружены!!!'); End; except ShowMEssage('Не хватает прав!!!'); end; reg.CloseKey; reg.free; gr_kons.LoadFromRegistry(gr_kons.RegistryPath); gr_kons.Repaint; end; -------------------- Praemonitus, praemunitus |
|||
|
||||
| ~FoX~ |
|
|||
![]() НЕ рыжий!!! ![]() ![]() ![]() ![]() Профиль Группа: Участник Клуба Сообщений: 2819 Регистрация: 8.10.2003 Где: Зеленоград Репутация: 4 Всего: 68 |
Marriage
А что именно не получается? Ошибка вылетает или просто ключик не удаляется или удаляется, но появляется снова? |
|||
|
||||
| Marriage |
|
|||
![]() Опытный ![]() ![]() Профиль Группа: Участник Сообщений: 842 Регистрация: 4.5.2004 Где: Таганрог Репутация: нет Всего: 2 |
Не удается вернуть все в исходное положение ....
Никаких ошибок не выскакивает ... В реестре ключик удаляется ... Это сообщение отредактировал(а) Marriage - 27.10.2004, 13:01 -------------------- Praemonitus, praemunitus |
|||
|
||||
| Marriage |
|
|||
![]() Опытный ![]() ![]() Профиль Группа: Участник Сообщений: 842 Регистрация: 4.5.2004 Где: Таганрог Репутация: нет Всего: 2 |
НАшел способ с переоткрытием формы, на которой расположен грид ...
А можно как нить без этого??? -------------------- Praemonitus, praemunitus |
|||
|
||||
| <Spawn> |
|
|||
![]() Око кары:) ![]() ![]() ![]() ![]() Профиль Группа: Экс. модератор Сообщений: 2776 Регистрация: 29.1.2003 Где: Екатеринбург Репутация: 2 Всего: 64 |
MarriageЧто подразумевается по "Не удается вернуть все в исходное положение ...."?
-------------------- "Для некоторых людей программирование является такой же внутренней потребностью, подобно тому, как коровы дают молоко, или писатели стремятся писать" - Николай Безруков. |
|||
|
||||
| Medved |
|
||||
![]() Эксперт ![]() ![]() ![]() ![]() Профиль Группа: Завсегдатай Сообщений: 7209 Регистрация: 15.9.2002 Где: Kazakhstan, Astan a Репутация: 1 Всего: 154 |
В свойстве OptionsBehavior устанавливаешь edgoStoreToRegisty в true. Затем прописываешь путь к ключу реестра в свойство RegistryPath.
А в ручную сохранить настройки:
Загрузить:
-------------------- |
||||
|
|||||
| Marriage |
|
|||
![]() Опытный ![]() ![]() Профиль Группа: Участник Сообщений: 842 Регистрация: 4.5.2004 Где: Таганрог Репутация: нет Всего: 2 |
Прошу прощения, что не следил за ответами...
После LoadFromRegestry нужно форму переоткрыть, на которой грид расположен???? А то делал LoadFromRagestry, а грид каким был, таким и остался ... Хотя в Regestrypath был путь с другими настройками ... -------------------- Praemonitus, praemunitus |
|||
|
||||
| Medved |
|
|||
![]() Эксперт ![]() ![]() ![]() ![]() Профиль Группа: Завсегдатай Сообщений: 7209 Регистрация: 15.9.2002 Где: Kazakhstan, Astan a Репутация: 1 Всего: 154 |
Маялся с такой фигней, что сделал, уже не помню, исходники у клиента. Помоему, там какой-то метод надо применять для обновления, или как вы сказали "нужно форму переоткрыть". Не... не вспомню. Надо копать...
-------------------- |
|||
|
||||
| Гость_Ivan |
|
|||
|
Unregistered |
Подскажите как сделать: необходимо получить значения и параметры в ветки реестра и их количество, их количество переменное, меняется со времене и на всех компьютерах может быть разное
|
|||
|
||||
![]()
|
| Правила форума "Delphi: Базы данных и репортинг" | |
|
|
Запрещено: 1. Публиковать ссылки на вскрытые компоненты 2. Обсуждать взлом компонентов и делиться вскрытыми компонентами Обязательно указание: 1. Базы данных (Paradox, Oracle и т.п.) 2. Способа доступа (ADO, BDE и т.д.)
FAQ раздела лежит здесь! Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Vit, Петрович. |
| 0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
| 0 Пользователей: | |
| « Предыдущая тема | Delphi: Базы данных и репортинг | Следующая тема » |
|
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |