FileOpen und EOF

[Nalincah]

Hab da noch ein Problem:

Delphi-Quellcode:

function Import_FiletoDB(const Dataset:TADODataSet;Filename,Trennzeichen:string):Boolean;
var
  i,Count : Integer;
  s : string;
  f : TextFile;
  Titel : TStrings;
begin
  if not fileexists(FileName) then
  begin
    ShowMessage('Konnte Datei ' + QuotedStr(Filename) + ' nicht finden');
    Exit;
  end;
  AssignFile(f,Filename);
  Reset(f);

Da krieg ich bei "Reset(f)" ein "E/A-Fehler 123".