Neue Zeile in bestehender Textdatei einfügen

30. Dezember 2010 11:02

Hallo,

Ich möchte in einer Textdatei über einen gewissen Zeitraum Vorgänge protokollieren. Dazu nutze ich einen Report.

Leider wird meine Datei, auch nach etwas herumprobieren mit den File-Befehlen, bis jetzt noch jedes mal überschrieben. Auch wenn die Quick Reference oft hilfreich ist, lässt die Lösung noch etwas auf sich warten.
Hier gab es einmal ein ähnliches Thema, der Verfasser hat die Vorgehensweise aber nicht wirklich näher erläutert. :wink:

Wenn jemand einen Tipp für mich hätte, wäre ich sehr dankbar. :wink:

Re: Neue Zeile in bestehender Textdatei einfügen

30. Dezember 2010 11:44

Meine Frage hat sich erledigt. Nichts für ungut. :wink:

Code:
IF NOT EXISTS(Filename) THEN
  ExportFile.CREATE(Filename)
ELSE BEGIN
  ExportFile.WRITEMODE(TRUE);
  ExportFile.OPEN(Filename);
  ExportFile.SEEK(ExportFile.LEN);
END;
ExportFile.TEXTMODE := TRUE;
Zuletzt geändert von Timo Lässer am 30. Dezember 2010 12:34, insgesamt 1-mal geändert.
Grund: [quote] nach [code] geändert, um die Lesbarkeit des Programmcodes zu erhöhen

Re: Neue Zeile in bestehender Textdatei einfügen

3. Januar 2011 10:53

Wunderbar, dann könntest du ja auch ein "[Gelöst]" am Anfang des Thread-Titels setzen, damit Suchende die Lösung schneller finden :-)