Hi,

hab folgendes Problem:

Ich gehe Datei für Datei in einem Verzeichnis durch und wenn eine Bedingung erfüllt ist (in dem Fall wenn das gesuchte Wort in der Datei vorhanden ist) dann gibt er es aus. Ist jetzt allerdings bereits eine Datei geöffnet gibt er den 103er E/A-Fehler aus. Das Problem ist, dass es eine Systemdatei ist, die bereits offen ist.

Habe nun folgendes, funktioniert aber nicht:

markieren

Delphi-Quellcode:

try
    AssignFile(F, FPfad + aDatei);
    {$i-}
      Reset(F);
    {$i+}
    if (not IOResult <> 0) then
      ...

usw.

Weiß jemand weiter? Aus der DH-Beschreibung werde ich nicht sonderlich schlau

Du invertierst IOResult und schaust dann ob das Ergebnis ungleich 0 ist. Abhilfe schafft eine richtige Klammerung.

 if not (IOResult <> 0) then oder

 if ( IOResult = 0 ) Then