array auslesen

[Vitus]

Hallo Kermit,

Du brauchst irgendwo im Programm eine Zählvariable, die die Nummer des aktuellen Versuchs speichert.

Du könntest zB. eine Variable activeExperiment: Integer; global definieren.

Dann ist das einlesen einfach:

Code:

with aMess[activeExperiment] 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;
activeExperiment := activeExperiment+1;

Letzte Zeile nicht vergessen! Sonst schreibt der immer alle Werte nur in das erste Feld des Arrays

Gruß
Vitus