Zitat von
malibu85:
könnte ich nun auch eine schlife erstellen, welche die Komplette datei einmal durchläuft
also ungefähr so
Delphi-Quellcode:
reset(Dat);
Seek(dat,0);
while not ( Seek(dat,FileSize(dat) ) do
begin
read(Dat,Werte);
seek(Dat,filepos(Dat)+1);
habe mir gedacht, dass das durchlaufen wie bei einer liste funktioniert. also ich setze mit Seek(dat,0) den zeiger auf die erste Position und setze in der schleife den zeiger immer eins weiter bis er eof ist.
geht das? hab mir gedacht das seek(Dat,filepos(Dat)+1); den zeiger um eine position weiter setzt
Die Datei kannst Du mit
while not eof(dat) do
durchlaufen.
Und nach einem read wird der Positionszeiger automatisch um 1 erhöht.
Bei Dir würde nur jeder zweite Datensatz gelesen.
Grüße
Klaus