Entwickler-Ecke

Dateizugriff - Datei oeffnen schlaegt fehl


drstar - Mi 24.05.06 23:51
Titel: Datei oeffnen schlaegt fehl
Hallo, hab ein mir unverständliches Problem mit Delphi.
Ich möchte eine Datei öffnen (ein MP3-File, um genauer zu sein, ich möchte einen Index für meinen MediaPlayer erstellen). Dies sollte folgender Code erledigen:


Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
MainUnit

[...]

procedure MPEGHeader(Path, FName: string);
var FileName : string;
    Artist, Title: string;
    ErrorCode: integer;
    f: File;
begin
  FileName := Path+FName;
  assignfile(f, Filename);
  filemode := 0;
  {$I-}
  reset(f, 1); //In dieser Zeile tritt der Fehler auf, habe ihn abgefangen, wie nachfolgender 
               //Code zeigt
  ErrorCode := IOResult;
  if ErrorCode <> 0
  then
  begin
    ShowMessage(SysErrorMessage(ErrorCode));
  end;
  {$I+}
[...]

end;

//MainProgram
begin
//Hier ist der Code, das Dateisystem nach MP3-Files zu durchsuchen. Für jede gefundene wird MPEGHeader mit 
//dem Dateinamen aufgerufen. Ist aber eigentlich nicht für dieses Problem relevant, die übergebenen 
//Parameter sind korrekt, ich habe es durch Watching Variables geprüft, daher ist der Code ausgeblendet
end.

In der Zeile, in der die Datei geöffnet werden soll, erhalte ich den Fehlercode 183. Meine Recherche ergab, daß dieser Fehler bedeutet, daß bereits eine Datei mit diesem Namen existiert und daher nicht erneut erstellt werden kann, obwohl ich die Datei nur öffnen möchte. Daher würde mich mal interessieren, wodurch genau dieser Fehler eigentlich verursacht wird, und ob es Abhilfe gibt. Eine Umbennenung der Datei findet nicht statt (zumindest nicht in meinem Code). Auch die Suche bei Google und hier im Forum hat mich nicht weitergebracht.

Falls es relevant ist, ich benutze Delphi 7.

EDIT: Habe noch einen Fehler beseitigt (vergessene Variablendeklaration).