Edit in Array speichen ?? [GELÖST]

[Der-DeeJay]

Hallo ;]

Ich möchte gerne meine Edits in einem Array speichern
die Funktion um den Array im Edit.Text anzuzeigen weis ich aber andersrum geht der nich

Delphi-Quellcode:

for y:=1 to 5 do
  begin
  with TEdit(FindComponent('Edit'+IntToStr(y))) do
    begin
    Text:=Time[y];
    end;
  end;

Ich hoffe ihr könnt mir helfen ;]

[ssach]

hy

du musst dies eingeben:

Delphi-Quellcode:

for y:=1 to 5 do
  begin
  with TEdit(FindComponent('Edit'+IntToStr(y))) do
    begin
    Time[y] := Text;
    end;
  end;

das funzt ich habs gerade ausprobiert!!!

[himitsu]

Es geht auch kürzer

Delphi-Quellcode:

for y:=1 to 5 do 
  Time[y] := TEdit(FindComponent('Edit'+IntToStr(y))).Text;

[add]
Ach ja Tim ist doch in etwa so definiert?

Delphi-Quellcode:

Var Time: Array[1..5] of String;

[Der-DeeJay]

Ich danke euch beiden!!!

Hat gut geklapt

big thx!!!

[Palme]

Hallo,

wie kann ich denn ein Edit Feld als array in einer memo komponente speichern?, ich bekomme das irgendwie nicht so ganz hin,

Beispielsweise:

procedure TForm1.Edt_NameChange(Sender: TObject);
var EingabeName : string;
begin
// Eingabe Name

EingabeName:= Edt_Name.text;

danke schon mal im vorraus