关于焦点的问题? 遍历所有能得到焦点的控件,看焦点在哪里。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 遍历所有的控件,看谁获得焦点即可。例子如下:var i: integer; for i:=0 to componentcount-1 do if Components[i].focused then showmessage(Components[i].name);//其中components为窗体包含的所有控件的集合 使用工程组时,断点总失效是为什么 这一句为什么执行有错?? visualreport控件哪里能下载到?急 如何在不连接数据库的AdoDataset中插入一行 那位大哥知道AddPrinterDriver的使用方法? delphi7中如何安装QUICKREP控件? 三天内学会用Delhpi? 有没有人要100分啊!!!!!!!!!!!! 如何保存当前窗体的运行状态? getfieldvalue(datacol)为什么不能通过编译 有长春的Delphi程序员么???? 如何实现类似TADOTable中Connection中的效果?
var i: integer;
for i:=0 to componentcount-1 do if Components[i].focused then showmessage(Components[i].name);//其中components为窗体包含的所有控件的集合