Ini laden -> Programm stürzt ab

[citybreaker]

Hallo,
irgendwie stürtzt mein Programm bei dem Laden einer Ini Datei immer ab.
Ich hab folgenden Code.

Delphi-Quellcode:

type
 TFigur = class
 procedure LoadStats;
 private
  // Genral stats
  Name: String;
  Typ: String;
  Alter: String;
  Sex: String;
  Groesse: String;
  Gewicht: String;
  Level: String;
  // Feeling
  Hunger: String;
  Durst: String;
  Happy: String;
  Muedigkeit: String;
  Harndrang: String;
  Gesundheit: String;
  Disziplin: String;
 public
end;

var 
  MainFrm: TMainFrm;
  Monster: TFigur;

...

procedure TFigur.LoadStats;
var Ini: TIniFile;
begin
  Ini := TIniFile.Create(ExtractFilePath(Application.Exename) + 'stats.ini');

  with Monster do begin
    Name := Ini.ReadString('Settings', 'Name', '');
    Typ := Ini.ReadString('Settings', 'Typ', '');
    Alter := Ini.ReadString('Settings', 'Alter', '');
    Sex := Ini.ReadString('Settings', 'Sex', '');
    Groesse := Ini.ReadString('Settings', 'Groesse', '');
    Gewicht := Ini.ReadString('Settings', 'Gewicht', '');
    Level := Ini.ReadString('Settings', 'Level', '');

    Hunger := Ini.ReadString('Settings', 'Hunger', '');
    Durst := Ini.ReadString('Settings', 'Durst', '');
    Happy := Ini.ReadString('Settings', 'Happy', '');
    Muedigkeit := Ini.ReadString('Settings', 'Muedigkeit', '');
    Harndrang := Ini.ReadString('Settings', 'Harndrang', '');
    Gesundheit := Ini.ReadString('Settings', 'Gesundheit', '');
    Disziplin := Ini.ReadString('Settings', 'Disziplin', '');
  end;

  Ini.Free;
end;


procedure TMainFrm.Button1Click(Sender: TObject);
begin
  Monster.LoadStats;
end;

Und noch die Fehlermeldung. -.-'

Zitat:

Im Projekt projekt1.exe ist eine Exception der Klasse EAccessViolation aufgetreten.
Meldung: 'Zugriffs verletzung bei Adresse 00404014 in Modul 'Projekt1.exe'. Schreiben
von Adresse 00000004'. Prozess wurde angehalten.