wenn ich es so auf die schnelle richtig gesehen hab, dann tust du denn inhalt von deinem memo feld immer dann ändern wenn du ein file hast laden können, also wenn error = 0 ist...
kannst ja einfach mal folgendes probieren nach FindNext:
Delphi-Quellcode:
error := FindNext(sr);
If error <> 0 Then
Begin
ShowMessage('Fehler beim Lesen der Datei: ' + sr.Name);
End;
dann siehst wahrscheinlich recht schnell ob nen fehler manchmal kriegst oder net
