[Alloc]

Приветствую всех!

Подскажите, пожалуйста, как правильно считать и записать состояние чекбокса?

Есть CheckBox. Есть ini-файл в котором прописано:

Код:

[Options]
FullScreen=Yes

Как правильно записать и прочитать, так что бы CheckBox был включен или выключен, в зависимости от значения в ini-файле (Yes/No)?

С ReadBool/WriteBool - все просто.

Код:

chk1.Checked:=Ini.ReadBool('Launcher','SingleCPU',False);
Ini.WriteBool('Launcher','SingleCPU',chk1.Checked);

А как быть тут?
Будьте добры, подскажите пожалуйста.

[angvelem]

Код:

var
  St : String;
begin
  St := AnsiUpperCase(Ini.ReadString('Options', 'FullScreen', 'No'));
  chk1.Checked := St = 'YES';
...
end;

Зачем было так делать, 1/0 недостаточно?

ах да, ещё ведь и запись нужна

Код:

const
  fs : array[Boolean] of String = ('No', 'Yes')';
begin
  Ini.WriteString('Options', 'FullScreen', fs[chk1.Checked]));
...

[Alloc]

Спасибо за ответ!

Зачем было так делать, 1/0 недостаточно?

так это не моя идея) дело в том, что я пытаюсь сделать программу для настройки игры через ее ini-файл, так вот там такие значения)

как я понимаю, это большой геморрой, так как придется для каждого чекбокса делать, а их там около 17 получается....

может есть более простой вариант? не подскажите?

[angvelem]

Никакого геморроя нет. Можно организовать чтение/запись в цикле.

[icWasya]

Например так

Код:

procedure ReadCheckBox(Sender:TCheckBox;const Name:String);
var
  St : String;
begin
  St := AnsiUpperCase(Ini.ReadString('Options',Name, 'No'));
  Sender.Checked := St = 'YES';
end;
procedure WriteCheckBox(Sender:TCheckBox;const Name:String);
  const
    fs : array[Boolean] of String = ('No', 'Yes')';
begin
  Ini.WriteString('Options', Name, fs[Sender.Checked]));
end;

использование

Код:

ReadCheckBox (chk1,'FullScreen');
ReadCheckBox (chk2,'UseMouse');

[Alloc]

Благодарю всех за помощь, задача решена, все работает как надо.