![]() |
|
|
#1
|
|||
|
|||
|
Народ помогите разобраться
Код:
procedure TForm1.FormDestroy(Sender: TObject);
begin
ini:=TiniFile.Create(extractfilepath(Application.ExeName)+'Ini.ini');
ini.WriteBool('FORM1','CheckBox2Checked',CheckBox2.Checked);
ini.Free;
end;Код:
procedure TForm1.FormCreate(Sender: TObject);
begin
ini:=TiniFile.Create(extractfilepath(Application.ExeName)+'Ini.ini');
CheckBox2.Checked:=ini.ReadBool('FORM1','CheckBox2Checked',False);
Ini.Free;тоесть код будет такой Код:
begin
ini:=TiniFile.Create(extractfilepath(Application.ExeName)+'Ini.ini');
ini.WriteBool('FORM1','CheckBox2Checked',Form2.CheckBox2.Checked);
ini.Free;
end;Код:
procedure TForm1.FormCreate(Sender: TObject);
begin
ini:=TiniFile.Create(extractfilepath(Application.ExeName)+'Ini.ini');
Form2.CheckBox2.Checked:=ini.ReadBool('FORM1','CheckBox2Checked',False);
Ini.Free;Кто знает варианты решения етой проблемы? может создавать форму2 при запуске проги и просто прятать ее??? а как так сделать если такой вариант правильный Последний раз редактировалось Delas, 25.12.2010 в 01:00. |
|
#2
|
|||
|
|||
|
Именно поэтому и не работает.
Что бы работать с формой надо иметь ее экзепляр. Вариант - вынести код сохранения/установки значения компонентов соотв. формы в ее события OnCreate/OnDestroy. |
|
#3
|
|||
|
|||
|
Спасибо помогло,буду знать что оно неработает на других формах
![]() |