Hallo zusammen,
was bedeutet der Befehl Inc(i) in diesem Zusammenhang:
type TWetter = record
Tag:Byte;
Temp,Nieder:Real;
end;
var Messwert:TWetter;
var Datei:File of TWetter;
var i:integer;
begin
AssignFile(Datei,‚wetter.dat‘);
Reset(Datei);
i:=0;
repeat
Inc(i);
Hallo Jamara,
was bedeutet der Befehl Inc(i)
Inkrementiert einen Ordinalwert um den Wert 1 (oder n).
in diesem Zusammenhang:
...
begin
AssignFile(Datei,'wetter.dat');
Reset(Datei);
i:=0;
repeat
Inc(i);
Read(Datei,Messwert);
...
until EOF(Datei);
closefile(Datei);
end;
… wird für jeden Schleifendurchlauf die Variable i um 1 hochgezählt. D.h., nach dem Schleifenende steht in i die Anzahl der gelesenen Messwerte.
Gruß
Christian
Danke für die schnelle antwort,
könnte man nicht einfache eine for-do-Schleife nehmen?
Gruß
Hallo.
könnte man nicht einfache eine for-do-Schleife nehmen?
Dann müsste man wissen, wie viele Schleifendurchläufe stattfinden sollen. In der von dir genannten Schleife wird gelesen, bis man am Ende der Datei angelangt ist, da weiß man noch nicht vorher, wie viele Durchläufe es geben wird.
Sebastian.
okay, danke an euch beide