关于对象变量循环的问题(100分)

Y

yangyee

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-06-01

• #1

是这样的，例如我有100个Label控件，我想通过循环给他们的Caption属性赋值，该咋办？
谢谢！

 

教

教父

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-06-01

• #2

用FindComponent。

 

Y

yangyee

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-06-01

• #3

能不能具体些，谢谢！

 

T

tianrei

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-06-01

• #4

我也想听，VB有控件数组可以解决这个问题，DELPHI呢？

 

S

SeaHawk

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-06-01

• #5

有两种办法:一、用控件的tag属性来标识不同的Label，然后用FindComponent，判断是否
Label，tag是多少，对不同的Label赋予不同的值；二、使用TObjectList来管理Label，
详细的用法可以看看Delphi的帮助。

 

白

白马小将

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-06-01

• #6

for i := 1 to 100 do
TLabel(FindComponent('Label'+IntToStr(ii))).Caption := 'abc'

 

Y

yangyee

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-06-03

• #7

多人接受答案了。