Exception beim Createn eines IniFiles

[fortuneNext]

Hi,
sorry dass ich schonwieder Frage (ich fühl mich schon ganz schlecht hier immer so dumme Fragen zu stellen ) aber ich such den Fehler in diesem Programm seid mehreren Stunden (und hab auch schon 10 Minuten nachgedacht ) aber ich finds einfach nicht.
Alle relevanten Sachen:

Delphi-Quellcode:

uses
   IniFiles, SysUtils, Classes, Dialogs;

type
   TBasicControl = class(TObject)
   private
   {}
   public
   procedure ReadAllIn;
   end;
   TLanguageFile = class(TIniFile)
   private
   {}
   public
   {}
   end;

var
  LanguageFiles: Array of TLanguageFile;
  BasicControl: TBasicControl;

procedure TBasicControl.ReadAllIn;
var
  SR: TSearchRec;
  x: integer;
begin
  x := 0;
  if FindFirst(ExtractFilePath(ParamStr(0)) + 'Language\*.ini', faAnyFile, SR) = 0 then
  begin
    repeat
      if (SR.Attr <> faDirectory) then
      begin
        x := x + 1;
        SetLength(LanguageFiles, x + 1);
        LanguageFiles[x].Create(ExtractFilePath(ParamStr(0)) + 'Language\' + sr.Name);
      end;
    until FindNext(SR) <> 0;
    FindClose(SR);
  end;
end;

Die Exception tritt beim Createn auf. Der Pfad wird richtig ausgegeben, das habe ich schon überprüft. Zum prüfen habe ich eine Test.ini benutzt.
Ich weiss nicht woher der Fehler kommt...
Im Prinzip sollen einfach alle .ini Dateien im Ordner (Pfad)/Languages im dynamischen Array gespeichert werden.
All dies befindet sich auf einer Unit ohne Form.
Danke!

mfg
fortuneNext
Woher könnte sie kommen?