also bei funktioniert es...(da ich d3 habe, mach ich das mal als statisches array)
Delphi-Quellcode:
var
Form1: TForm1;
editlist:array[1..5]of Tedit;
procedure TForm1.FormCreate(Sender: TObject);
var i:integer;
begin
for i:=low(editlist) to high(editlist) do
begin
editlist[i] := TEdit.Create(self);
editlist[i].Parent := self;
editlist[i].Align := alTop;
end;
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
editlist[3].text:='blah';
end;
mit nem dynamischen müsste es dann so etwa aussehen:
Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
var i:integer;
const c=5;
begin
setlength(editlist,c);
for i:=0 to c-1 do
begin
editlist[i] := TEdit.Create(self);
editlist[i].Parent := self;
editlist[i].Align := alTop;
end;
end;
(ich habe die Vermutung, dass du die edits immer mit dem gleichen array-index erzeugst...)
HTH Frank