Загрузка из файла значения visible

[Raivolo]

Подскажите как сохранить в фаил значение visible и потом его от туда выгрузить.
Зарание всем спасибо.

[r9m]

Смотри справку по TIniFile. А именно по методу writebool

[KORN]

uses inifiles;

procedure TForm1.read;
var
  ini: tinifile;
begin
  ini:=tinifile.create(extractfilepath(application.exename)+'Confing.ini');
  button1.visible:=ini.readbool('Options', 'Visible', false);
  ini.free;
end;

procedure TForm1.write;
var
  ini: tinifile;
begin
  ini:=tinifile.create(extractfilepath(application.exename)+'Confing.ini');
  ini.writebool('Options', 'Visible', button1.visible);
  ini.free;
end;

[Raivolo]

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

uses inifiles;

procedure TForm1.read;
var
  ini: tinifile;
begin
  ini:=tinifile.create(extractfilepath(application.exename)+'Confing.ini');
  button1.visible:=ini.readbool('Options', 'Visible', false);
  ini.free;
end;

procedure TForm1.write;
var
  ini: tinifile;
begin
  ini:=tinifile.create(extractfilepath(application.exename)+'Confing.ini');
  ini.writebool('Options', 'Visible', button1.visible);
  ini.free;
end;

У меня 14 значений visible и они все разные. В этом коде сохраняются они когда все значения одинаковые.
Как подправить код чтобы сохранялись 14 значений?

[Манжосов Денис :)]

ini.writebool('Options', 'Visible', button1.visible);
ini.writebool('Options', 'Visible', button2.visible);
ini.writebool('Options', 'Visible', button3.visible);
ini.writebool('Options', 'Visible', Form1.visible);
...