E/A Fehler 32

[HiWieGehts]

Hallo,

sollte grundsätzlich funktionieren. Mir ist aber dieses Problem irgendwie bekannt. Kann mich aber nicht mehr genau erinnern. Ich weiß nur noch sicher, dass ich diese Fehlermeldung bekommen habe, wenn ich beim Debugen das Programm vor dem Close beendet habe. Da half nur ein Neustart des Rechners.
Wie bereits zum Teil erwähnt, enthält der Code einige "Besonderheiten":
Close und Closefile: in Delphi6 erlaubt, in Delphi XE3 "Zu viele Parameter" bei Close. Close schließt das Fenster (oder Programm). Sollte auch in Delphi6 für Files nicht mehr verwendet werden.
- erase(artikeldatei);
- If DeleteFiles(stammverzeichnisname + '\' + datenverzeichnisname + '\' + artikeldateiname) then
Diese beiden Zeilen verhindern das Funktionieren des Programms - wenns funktioniert. erase löscht die Datei. DeleteFiles gibt false zurück, wenn die Datei nicht existiert - in diesem Fall also immer der Fall.