Hallo
Zitat:
AssignFile(File, 'test.dat');
so eine relative Pfadangabe wird dir irgendwann große Probleme bereiten.
Zitat:
memo1.Lines[0] :=s;
lösch das memo am Anfang mit memo.clear und füge die neuen Zeilen mit memo.lines.add hinzu. Bei deiner drirektzuweisung mußt Du dir sicher sein, daß wirklich so viele Zeilen exisieren, wenn nicht, siehst du eine
AV.
nutze die eof-Funktion in einer While-Anweisung, um jede Zeile auszulesen.
mit memo1.lines.loadfromfile gehts natürlich noch schneller
Mfg Frank