var
i: Integer;
Edit: Array [1..20] OF TEdit;
begin
for i := 1 to 20 do
begin
Edit[i] := TEdit.Create(Self);
Edit[i].Parent := Self;
Edit[i].Left := 10;
Edit[i].Top := 10 + (Edit[i].Height + 10) * i;
end;
i: Integer;
Edit: Array [1..20] OF TEdit;
begin
for i := 1 to 20 do
begin
Edit[i] := TEdit.Create(Self);
Edit[i].Parent := Self;
Edit[i].Left := 10;
Edit[i].Top := 10 + (Edit[i].Height + 10) * i;
end;
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货