Einzelnen Beitrag anzeigen

Christian Seehase
(Co-Admin)

Registriert seit: 29. Mai 2002
Ort: Hamburg
11.116 Beiträge
 
Delphi 11 Alexandria
 
#3
  Alt 6. Jan 2003, 00:53
Moin Lexx,

erst einmal herzlich willkommen.

Das ganze dürfte, wie Nailor schon so richtig bemerkte, auch ganz gut ohne RichEdit funktionieren.
Allerdings bietet es sich aus Gründen der Einfachheit an das Ganze mit einer TStringList zu lösen.
Diese beinhalten die Methode LoadFromFile, mit der Du dann auf einen Rutsch jeweils eine ganze Textdatei laden kannst (bzw. SaveToFile um sie wieder zu speichern).

Nach dem Laden dann einfach die letzte Zeile (Index ist Count-1) mit der Methode Delete löschen und wieder wegspeichern.

Reicht Dir diese Variante? Das dürfte nämlich mit der Zeit, auch in Abhängigkeit der Grösse der Dateien, ziemlich langsam werden.
Tschüss Chris
Die drei Feinde des Programmierers: Sonne, Frischluft und dieses unerträgliche Gebrüll der Vögel.
Der Klügere gibt solange nach bis er der Dumme ist
  Mit Zitat antworten Zitat