die Showmessage liefert folgenden Text "Problem beim Lesen von myfile.dat! Fehler: 0" also "kein Fehler".
Hast du deinen Code wirklich so geändert wie von Sir Rufo vorgeschlagen?
Delphi-Quellcode:
{...}
tmpIOResult := IOResult;
if tmpIOResult <> 0
then
ShowMessage( 'Problem beim Lesen von myfile.dat! Fehler: ' + IntToStr( tmpIOResult ) );
{...}
end.
Zitat von
Delphi-Hilfe:
System.IOResult Funktion
Durch den Aufruf von IOResult wird das interne Fehler-Flag gelöscht.