[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]));
...