сохранение параметров формы в Delphi

[TaYgA]

Загрузка происходит в Form1 в FromCreate......

[Arigato]

Сообщение от TaYgA

Загрузка происходит в Form1 в FromCreate......

А теперь посмотрите, когда происходит создание форм (см. проект *.dpr), примерно так:

  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  Application.CreateForm(TForm2, Form2);
  Application.Run;

Т.е. в момент Form1.FormCreate Form2 ещё не создана.

[TaYgA]

Спасибо, ошибку понял... Щас буду думать как её исправить

[raxp]

А Form2 уже создана?

вот-вот... у вас установка параметров второй идет в первой форме, когда второй еще нет. перенесите cюда:

procedure TOptions.FormCreate(Sender: TObject);const
     ShortFileName: String='Options.ini';
     Section: String='Main';
var
   IniFile: TIniFile;
   FullFileName: String;
begin
//????????? ????????? ????????
  FullFileName:=ExtractFiledir(Application.ExeName)+PathDelim+ShortFileName;
IniFile := TIniFile.Create(FullFileName);
  Options.rbInnovEx.Checked := IniFile.ReadBool(Section, 'rbInnovEx.Checked', True);
  Options.rbVisionEx.Checked := IniFile.ReadBool(Section, 'rbVisionEx.Checked', False);
  Options.rbOffice2010.Checked := IniFile.ReadBool(Section, 'rbOffice2010.Checked', False);
  Options.rbBlackBrilliant.Checked := IniFile.ReadBool(Section, 'rbBlackBrilliant.Checked', True);
  Options.rbSnowLeopard.Checked := IniFile.ReadBool(Section, 'rbSnowLeopard.Checked', True);
  IniFile.Free;
end;

[Arigato]

Например, можно на FormShow прописать загрузку параметров.

[TaYgA]

Спасибо Буду учиться пользоваться ini-файлами....