Zitat von
Mavarik:
Zitat von
150gozilla:
Wie könnte ich die Schleifen am besten verschachteln ?
Delphi-Quellcode:
SetLength(Labels,81);
index2 := 0;
for i:=1 to 9 do
begin
for j:= 1 to 9 do
begin
Labels[index2]:=TLabel.Create(self);
Labels[index2].Top := ((i-1)* lg)+13;
Labels[index2].Parent:= Form1;
Labels[index2].AutoSize := false;
Labels[index2].Font.Size := 12;
Labels[index2].Left := 10 + lg *(j-1);
Labels[index2].Height:= lg;
Labels[index2].Width:=lg;
Labels[index2].Caption:= IntToStr(i)+','+(IntToStr(j));
Labels[index2].Alignment := tacenter;
inc(index2);
end;
end;
Frank
Dankeeeeeeee, das klappt 100%ig.
Danke an alle die mir geholfen haben
Hab wieder was gelernt =)
Danke nochmal =)