Свойство Caption не важно! Приступим к коду: В USES добавим inifiles. В свойство формы OnCreate впишем: (это при создание формы) var ini : TIniFile; //объявляем переменную типа inifile begin ini := TInifile.Create(ExtractFilePath(Application.ExeName)+'checkbox.ini'); // создаем файл если его нету и открыть если он уже есть прочитаем параметры в нем CheckBox1.Checked := ini.ReadBool('Param', '1', True); // там где 1,2,3,4 можете вписать все что хотите CheckBox2.Checked := ini.ReadBool('Param', '2', True); CheckBox3.Checked := ini.ReadBool('Param', '3', True); CheckBox4.Checked := ini.ReadBool('Param', '4', True);
В свойство формы OnDestroy впишем: (это при закрытие формы) var ini : TIniFile; begin ini := TInifile.Create(ExtractFilePath(Application.ExeName)+'checkbox.ini'); ini.WriteBool('Param', '1', CheckBox1.Checked);//Там где 1,2,3,4 должно совпадать с тем что вписали в OnCreate ini.WriteBool('Param', '2', CheckBox2.Checked); ini.WriteBool('Param', '3', CheckBox3.Checked); ini.WriteBool('Param', '4', CheckBox4.Checked); ini.Free; end;
Таким образом мы можем сохранять любые конфигурации нашей программы. Всем удачи.
