若有10个LABEL控件,label1,label2......label10,想通过FOR 语句一次完成; var si:string;lx:Tlabel;循环体内si:=inttostr(i);lx:=Tlabel(findcomponent('label'+si));lx.caption:='???'; 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 var i: Integer;beginfor i := 0 to ControlCount - 1 do if Controls[i] is TLabel then TLabel(Controls[i]).Caption := 'Hello, world!';end; 求mxoutlookbarpro 2.1.3 类似的问题 关于TreeView的问题 关于bitbtn按钮快捷键的疑问? 如果一台机器上装了两块以上的网卡,怎么用delphi7查出机器上所有网卡的名称和设置的IP地址? [请教]如何获取网络游戏的数据~? trackbar 的问题,简单的问题,只要回答都有分! clientdataset 在sql中怎么去掉getdate()的时间部分,只要日期部分。 怎样在关闭自己的同时又去拷贝一个文件!帮帮菜鸟吧!急!急! Const定义的变量 在 Delphi6 下不能用了?? 安装程序制作软件wise那里有下载?
begin
for i := 0 to ControlCount - 1 do
if Controls[i] is TLabel then
TLabel(Controls[i]).Caption := 'Hello, world!';
end;