Turbo Pascal: Zeile aus Datei löschen

[CalganX]

Hi,
mal eine Frage zu Turbo Pascal: Wie kann man aus einer Datei zwei Zeilen irgendwo an einer Variablen Position löschen?

Chris

[RomanK]

also nur eine Theoretische Lösung:
du öffnest die datei mit reset, ließt alle Zeilen in ein array.
und dann schreibst du alle arrays wieder mit rewrite in die datei. Dazwischen musst du dann noch das bestimmte array (^= einer Zeiler der Datei) löschen .

[MrSpock]

Hallo Chris,

üblicherweise löst man das Problem so, dass man die Datei, aus der die Datensätze zu löschen sind zum Lesen öffnet, während man eine andere zum Schreiben öffnet. Dann liest man einen Satz aus der 1. Datei und prüft, ob dieser gelöscht werden soll. Falls ja, wird einfach der nächste gelesen, falls nein, wird er in die zweite Datei geschrieben. Am Ende kannst du, falls notwendig, die erste Datei löschen oder umbenennen (z.B. .bak) und schließlich der zweiten Datei den ursprünglichen Namen der ersten zuweisen, falls das so gewünscht ist.

[CalganX]

Hi,
OK, ich dachte es gibt noch eine weniger aufwendiger Lösung. Ich dachte an sowas wie Truncate (1. löscht ganze Datei ab derzeitiger Position 2. Nur mit einem File of Typ verwendbar, aber ich kann nur Text nutzen).
Naja, OK. Dann werde ich mal später zu Hause sehen, ob ich das auch hinkriege...

Danke trotzdem...

Chris