回 帖 发 新 帖 刷新版面

主题:如何使用FindComponent来调用另一个form中名字有规律的几个TEdit

想在form1中对form2的几个名字有规律的TEdit文本框设置值
使用了form2.FindComponent('Edit'+inttostr(i)).text :=.....;
但这样显然是不行的,
但又不能写成form2.TEdit(FindComponent('Edit'+inttostr(i))).text :=.....;
改如何写才能得到我想要的功能,使用FindComponent来调用另一个form中名字有规律的几个TEdit
望指教,谢谢

回复列表 (共1个回复)

沙发

没做过,但至少应该按如下方式进行:

TEdit(form2.FindComponent('Edit'+inttostr(i))).Text=...
或者
(form2.FindComponent('Edit'+inttostr(i)) as TEdit).Text=...

我来回复

您尚未登录,请登录后再回复。点此登录或注册