CheckBox innerhalb als "unbekannter bezeichner" ausgegeben..

[GimbaR]

Hi, bevor ich mein prob schildere möchte ich sagen, dass ich schon die suchfunktion benutzt und leider nichts derartiges gefunden habe.
So jetzt zu meinem prob: Ich will ein Tool programmieren, was es erlaubt, zum Start einen PC-games vorherausgewählte Programme entweder zu starten oder zu schließen. Wie ich dies realisieren werde weiß ich schon zu 90%...
Leider habe ich noch sehr wenig ahnung von delphi, jedoch schon erfahrung in pascal (was wie ich finde sehr delphi ähnelt, wenn soagr net gleicht, was wohl keiner wunder ist... borland...^^)
Najo, back to topic: ich wollte durch eine if-anweisung gucken, ob eine checkbox angewählt ist (CheckBox1.Checked, wenn ich mich net irre^^) und dann einer integer-variable entweder die 1 oder die 0 zuweisen. Jedoch bekomme ich eine Fehlermeldung beim Compilieren ("undefinierter bezeichner CheckBox1"). Das Seltsame ist, dass, wenn ich die if-anweisung aus der prozedure rausnehme keinerlei fehlermeldungen erscheinen, obwohl in einer prozedur "weiter unten" die selbe checkbox (mit der eigenschaft checked) erfolgreich angesprochen wird. Das gleiche passiert in der prozedure mit der CheckBox2, obwohl auch sie "weiter unten" tadellos funzt
zur besseren übersicht poste ich hier mal den SourceCode, die INI und ein ScreenShot vom Fehler...

Delphi-Quellcode:

unit main;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, IniFiles, ShellApi, StdCtrls, Menus;

type
  TForm1 = class(TForm)
    GroupBox1: TGroupBox;
    ComboBox1: TComboBox;
    Button1: TButton;
    Button2: TButton;
    ComboBox2: TComboBox;
    GroupBox2: TGroupBox;
    GroupBox3: TGroupBox;
    GroupBox4: TGroupBox;
    CheckBox1: TCheckBox;
    CheckBox2: TCheckBox;
    Button3: TButton;
    Button4: TButton;
    Button5: TButton;
    Button6: TButton;
    Label1: TLabel;
    Button7: TButton;
    Button8: TButton;
    Button9: TButton;
    Button10: TButton;
    Button11: TButton;
    RadioButton1: TRadioButton;
    RadioButton2: TRadioButton;
    RadioButton3: TRadioButton;
    RadioButton4: TRadioButton;
    RadioButton5: TRadioButton;
    RadioButton6: TRadioButton;
    procedure Button9Click(Sender: TObject);
    procedure FormCreate(Sender: TObject);
  private
    funzt: String;
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;
  game: String;
  app: String;
  ExePath: String;
  ini: TIniFile;
  startwithwin, onlyoneexe: Integer;
implementation

{$R *.dfm}

procedure ReadMainConfig;
begin
  ExePath:=ExtractFilePath(ParamStr(0));
  ini:=TInifile.Create(ExePath+'\config.ini');
  try
    startwithwin:=ini.ReadInteger('Options','StartWithWin',2);
    onlyoneexe:=ini.ReadInteger('Options','OnlyOneExe',2);
  finally
    ini.free;
  end;
end;

procedure SaveMainConfig;
var
  gamestart, gamefinish: Integer;
  gameprogramoption: String;
begin
   if CheckBox1.Checked:=true then startwithwin:=1 \\<-HIER
   else startwithwin:=0;                           \\<-HIER
   if CheckBox2.Checked:=true then onlyoneexe:=0   \\<-HIER
   else onlyoneexe:=0;                             \\<-HIER
end;

procedure TForm1.Button9Click(Sender: TObject);
begin
  close;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
  ReadMainConfig;
  if startwithwin = 1 then
    CheckBox1.Checked:= true;
  if onlyoneexe = 1 then
    CheckBox2.Checked:= true;
  app:='COD';
  ShowMessage(app);
end;

end.

Meine Frage ist nun, wie ich diesen Fehler beheben kann.
schonmal im vorraus big THX!!!

mfg GimbaR