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

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

Как сохранить состояние CheckBox, radiobutton, edit [D7, WinXP]

ZLG ©   (2004-09-05 17:52:00) 

Не подскажите как сохранить состояние этих компонентов в какой нибудь файл, а потом соотве-но считать этот файл при запуске программы, можно пожалуйста пример кодом на дельфи. заранее спасибо

---

ZLG   (2004-09-05 18:12:00) [1]

спасибо

---

begin...end   (2004-09-05 18:01:00) [2]

uses IniFiles;

var
 IniFile: TIniFile;
 CheckBox: TCheckBox;

...

procedure Save;
begin
 IniFile := TIniFile.Create('C:\Config.ini');
 try
   IniFile.WriteBool('CheckBox', 'Checked', CheckBox.Checked);
 finally
   IniFile.Free;
 end;
end;

procedure Load;
begin
 IniFile := TIniFile.Create('C:\Config.ini');
 try
   CheckBox.Checked := IniFile.ReadBool('CheckBox', 'Checked', False);
 finally
   IniFile.Free;
 end;
end;

---

Наверх