DOS Text-Datei in Delphi 2009 einlesen

[TUX_der_Pinguin]

Ich habe ein kleines Test-Programm gebastelt welches mir eine ASCII Datei einließt, dabei soll der Text entsprechend
umgewandelt werden so das Sonderzeichen/Umlaute korrekt dargestellt werden, jedoch habe ich Probleme mit der Anwendung
von "OemToChar" unter Delphi 2007 war dies noch problemlos möglich jedoch unter Delphi 2009 macht mir die Prozedur
doch arge Probleme.

In dem folgenden beispiel tritt ein Stacküberlauf auf. Ich weiß nicht weiter im moment und hoffe auf die Hilfe der DPler.

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
var
  FHandle : System.Text;
  sRow : AnsiString;
  Text : String;
  i : byte;

begin

  System.Assign(FHandle, 'u:\test.txt');
  {$I-}
  Reset(FHandle);
  {$I+}
  if IoResult = 0 then begin
    while not EOF(FHandle) do begin

      //Zeile einlesen
      Readln(FHandle, sRow);

      //Zeile umwandeln
      OemToChar(PAnsiChar(sRow), PWideChar(Text));

      //Zeile anzeigen
      ShowMessage(Trim(sRow));

    end;
    System.Close(FHandle);
  end;

end;