ITPub博客

首页 > Linux操作系统 > Linux操作系统 > 循环访问控件的简单例子

循环访问控件的简单例子

原创 Linux操作系统 作者:niuchao 时间:2019-03-09 16:00:07 0 删除 编辑
for i:= 1 to 10 do
begin
     TEdit(self.FindComponent('edit' + IntToStr(i))).Text := IntToStr(i);
end;

比如有10个Edit控件,自动给10个控件赋值

来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/166523/viewspace-767688/,如需转载,请注明出处,否则将追究法律责任。

请登录后发表评论 登录
全部评论

注册时间:2004-11-04

  • 博文量
    139
  • 访问量
    108136