|
Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » Программирование и базы данных » Помогите с сохранением настроек проги |
|
Помогите с сохранением настроек проги
|
Новый участник Сообщения: 16 |
Профиль | Отправить PM | Цитировать Помогите, как сделать так, чтобы прога сохраняла значения CheckBox. Т.е. запускаю я прогу, помечаю CheckBox и закрываю прогу. Открываю вновь, и CheckBox стоит помеченным.
Пожалуйста растолкуйте поподробнее. |
|
Отправлено: 19:12, 15-05-2005 |
Старожил Сообщения: 300
|
Профиль | Сайт | Отправить PM | Цитировать Среда разработки?
|
Отправлено: 19:42, 15-05-2005 | #2 |
Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети. Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля. |
Новый участник Сообщения: 16
|
Профиль | Отправить PM | Цитировать Ах да, простите Borland Delphi 6.
|
Отправлено: 20:16, 15-05-2005 | #3 |
Старожил Сообщения: 300
|
Профиль | Сайт | Отправить PM | Цитировать Есть минимум 2 популярных способа:
1. Создание потомка класса и в его конструкторе/деструкторе загружать/сохранять информацию. В данном случае такой подход имхо громозок. 2. Обработка событий OnCreate и OnDestroy формы, на которой расположен контрол. Например следующим образом: procedure TForm1.FormCreate(Sender: TObject); var F: TiniFile; begin // открытие конфигурационного файла F := TiniFile.Create(Copy(Application.ExeName, 1, Length(Application.ExeName) - Length(ExtractFileExt(Application.ExeName))) + '.cfg'); // чтение значения для контрола CheckBox1 CheckBox1.Checked := F.ReadBool('main', CheckBox1.Name, False); // третий параметр - значение по умолчанию (напр. при первом запуске программы) // закрытие файла F.Free end; procedure TForm1.FormDestroy(Sender: TObject); var F: TiniFile; begin F := TiniFile.Create(Copy(Application.ExeName, 1, Length(Application.ExeName) - Length(ExtractFileExt(Application.ExeName))) + '.cfg'); F.WriteBool('main', CheckBox1.Name, CheckBox1.Checked); F.Free end; |
Отправлено: 03:17, 16-05-2005 | #4 |
Участник сейчас на форуме | Участник вне форума | Автор темы | Сообщение прикреплено |
| |||||
Название темы | Автор | Информация о форуме | Ответов | Последнее сообщение | |
Ошибка - Восстановить XP с сохранением программ и настроек | Lo-bl | Microsoft Windows 2000/XP | 5 | 21-02-2009 17:37 | |
ввод в домен ПК с сохранением локального профиля, сетвых дисков, настроек Win... | George-III | Microsoft Windows NT/2000/2003 | 3 | 06-08-2008 16:03 | |
Обновление англ версии сервера 2003 на русс.версию с Сохранением настроек | darevil | Microsoft Windows NT/2000/2003 | 4 | 12-09-2006 10:44 | |
Установка XP поверх XP с сохранением всех настроек. | cordlesspass | Microsoft Windows 2000/XP | 6 | 30-12-2004 13:14 | |
Помогите с сохранением .mp3 | Guest | Хочу все знать | 4 | 28-12-2002 14:35 |
|