Delphi-PRAXiS - Delphi IOResult?!

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)

- Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)

- - Delphi IOResult?! (https://www.delphipraxis.net/51065-ioresult.html)

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:

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 :roll:

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

Delphi-Quellcode:

if not (IOResult <> 0) then

oder

Delphi-Quellcode:

if ( IOResult = 0 ) Then