Matthew的Blog
  IT博客 :: 首页 :: 新随笔 :: 联系 :: 聚合  :: 管理 ::
给窗口上所有的控件设置Caption或Text
var
  i:integer;
begin
  for i:= 0 to self.ComponentCount-1 do
    TControl(self.Components[i]).SetTextBuf('Hello, world');
end;
posted on 2006-06-05 14:09 matthew 阅读(457) 评论(0)  编辑 收藏 引用 所属分类: Delphi编程
只有注册用户登录后才能发表评论。