如何把一个string的内容作为一个控件名,去操作或者设置控件的属性?

努力偷懒 2004-05-06 02:23:22
意思是这样的:例如我有个控件:edit1,edit1的text属性是:"aaa"我现在又有一个TEdit控件aaa , 我现在想设置aaa这个控件的text属性,我该如何去做?
我现在的做法是遍历所有控件去检测其name是不是aaa去设置控件aaa的text属性.

如果上面的问题实在需要遍历所有控件的话我想问另外一个问题,其实是解决我实际操作中的一个问题:
我有个数据模块DM,我现在想寻在很多TDataSource中找一个TDataSource控件的dataset的tablename为aaa的TDataSource!我该如何去做?
...全文
92 2 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
野草飞雪 2004-05-06
  • 打赏
  • 举报
回复
TEdit(FindComponent('aaa')).Text := 'XXXXX';

DataSet同理
sousouwjh 2004-05-06
  • 打赏
  • 举报
回复
簡單的問題,你既知道他是那個和它的名稱,你這樣寫:
比如他是button
Tbutton(FindComponent('button1')).Caption:='fdsfds';

5,927

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧