AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

letzte Zeile einer Textdatei lesen

Ein Thema von CADdy · begonnen am 25. Sep 2008 · letzter Beitrag vom 30. Sep 2008
Antwort Antwort
CADdy

Registriert seit: 22. Nov 2004
Ort: Marxheim
9 Beiträge
 
Delphi 7 Professional
 
#1

letzte Zeile einer Textdatei lesen

  Alt 25. Sep 2008, 09:44
Hallo allemiteinander,

in eine Textdatei werden jeden Tag zwei Datums/Zeitwerte nebeneinander geschrieben. Für jeden Tag gibt es also eine Zeile.
Beispiel:
22.09.2008 08:23:47 22.09.2008 19:13:09

Ich möchte nun immer die letzte komplette Zeile (also die mit zwei Datums/Zeitwerten) auslesen. Mir fehlt der zündende Gedanke, wie ich das am besten mache. Die Textdatei jedesmal von vorne bis zum EOF lesen finde ich nicht gut, da die Datei ja immer länger wird.

Hat jemand einen Tipp für mich?

Danke und servus
Peter
  Mit Zitat antworten Zitat
Benutzerbild von Union
Union

Registriert seit: 18. Mär 2004
Ort: Luxembourg
3.492 Beiträge
 
Delphi 7 Enterprise
 
#2

Re: letzte Zeile einer Textdatei lesen

  Alt 25. Sep 2008, 09:47
Am ressourcenschonendsten und schnellsten geht es wohl, wenn Du ans Dateiende gehst und rückwärts liest bis ein EOL oder der Dateianfang gefunden wird. Wenn die Zeilen immer eine konstante Länge haben kannst Du die Startposition auch errechnen.
Ibi fas ubi proxima merces
sudo /Developer/Library/uninstall-devtools --mode=all
  Mit Zitat antworten Zitat
CADdy

Registriert seit: 22. Nov 2004
Ort: Marxheim
9 Beiträge
 
Delphi 7 Professional
 
#3

Re: letzte Zeile einer Textdatei lesen

  Alt 25. Sep 2008, 10:11
Danke für die schnelle Antwort.

Wenn ich vom EOF zum EOL zurückgehe, könnte aber doch auch eine "halbe" Zeile, also eine mit nur einem Datums/Zeitwert gefunden werden. Gut, so eine Zeile wäre kürzer, da komplette Zeilen immer gleich lang sind.

Servus
Peter
  Mit Zitat antworten Zitat
Benutzerbild von Union
Union

Registriert seit: 18. Mär 2004
Ort: Luxembourg
3.492 Beiträge
 
Delphi 7 Enterprise
 
#4

Re: letzte Zeile einer Textdatei lesen

  Alt 25. Sep 2008, 10:13
Ja dann müsstest Du die erste Methode verwenden und das Gelesene entsprechend prüfen.
Ibi fas ubi proxima merces
sudo /Developer/Library/uninstall-devtools --mode=all
  Mit Zitat antworten Zitat
Benutzerbild von p80286
p80286

Registriert seit: 28. Apr 2008
Ort: Stolberg (Rhl)
6.659 Beiträge
 
FreePascal / Lazarus
 
#5

Re: letzte Zeile einer Textdatei lesen

  Alt 25. Sep 2008, 10:38
Hallo Peter,

wenn es wirklich so ist wie Du schreibst, (text-Dateien entwickeln da manchmal ein Eigenleben!)
dann geh doch ungefähr so vor:
lies die letzten (Satzlänge+2)*2 Bytes in einen puffer;
suche das erste CRLF ;
das sollte auf (gelesenebytes/2)-2 liegen, wenn nicht, ist der letzte Satz nicht vollständig und Du gehst zurück bis CRLF.
Dort fängt der vorletzte Satz an.

Gruß
K-H
  Mit Zitat antworten Zitat
CADdy

Registriert seit: 22. Nov 2004
Ort: Marxheim
9 Beiträge
 
Delphi 7 Professional
 
#6

Re: letzte Zeile einer Textdatei lesen

  Alt 30. Sep 2008, 10:24
Vielen Dank für Eure Tipps. Ich war ein paar Tage nicht online, deswegen meine Mail erst heute.

Servus
Peter
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 12:15 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz