Wobei hier ein dynamisches Array eigentlich keinen sonderlichen Sinn verfolgt (ein statisches hätt's auch getan, am besten 2 dimensional (array [1..9,1..9] of TLabel))
a la
Delphi-Quellcode:
const MaxWidthHeight = 9;
...
Labels : array [1..MaxWidthHeight ,1..MaxWidthHeight ] of TLabel;
....
for i:=1 to MaxWidthHeight do
begin
for j:= 1 to MaxWidthHeight do
begin
Labels[i,j]:=TLabel.Create(self);
Labels[i,j].Top := ((i-1)* lg)+13;
Labels[i,j].Parent:= Form1;
Labels[i,j].AutoSize := false;
Labels[i,j].Font.Size := 12;
Labels[i,j].Left := 10 + lg *(j-1);
Labels[i,j].Height:= lg;
Labels[i,j].Width:=lg;
Labels[i,j].Caption:= IntToStr(i)+','+(IntToStr(j));
Labels[i,j].Alignment := tacenter;
end;
end;
Ist mglw später einfacher anzusprechen !!!