想实现元素自动赋值。(100分)

L

lingmao3

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-05-19

• #1

如果能这样写就好了：
for vvi:=0 to 100 do
begin //1
edit[vvi].text:=inttostr(vvi);
end; //1
可惜不能。

 

D

DIGUA

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-05-19

• #2

不明白.要给同样的组件赋值?
for i:=0 to 100 od
begin
TEdit(FindComponent('edit'+inttostr(i))).text:=inttostr(i);
end;

 

L

lingmao3

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-05-19

• #3

[]谢谢您