mein record:
Delphi-Quellcode:
tMessdaten = record
Datum :string;
HTemperatur :real;
TTemperatur :real;
Niederschlag:real;
Luftfeuchte :integer;
Luftdruck :real;
Windgeschwindigkeit :real;
mein array:
tMessungen = array [1..50] of tMessdaten;
Versuch das ganze in das Array einzulesen:
Delphi-Quellcode:
procedure tForm1.EntryMeasure(var aMess : tMessungen; i:integer);
begin
for i:=1 to 50 do
with aMess[i] do
begin
datum:=edit1.text;
Htemperatur:=strtofloat(edit2.text);
Ttemperatur:=strtofloat(edit3.text);
Niederschlag:=strtofloat(edit4.text);
Luftfeuchte:=strtoint(edit5.text);
Luftdruck:=strtofloat(edit6.text);
Windgeschwindigkeit:=strtofloat(edit7.Text);
end;
end;
Naja und nun soll halt der Inhalt des Arrays, wenn denn da überhaupt was drin ist
, in ein Memofeld also Maximal 50 Datensätze.
ps: vielen dank für die schnellen antworten
