怎么获得一个类的实例个数?如我的FORM上增加了5个BUTTON,我怎么在程序中获知TButton的实例有5个啊? 怎么获得一个类的实例个数?如我的FORM上增加了5个BUTTON,我怎么在程序中获知TButton的实例有5个啊? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 var i,j:integer;beginj:=0;For i:=0 to Componentcount-1 do if Components[i] is TButton then inc(j);ShowMessage('TButton的实例有:'+IntToStr(j)+'个');end; 线程终止问题 跪求目录同步源码~ 怎么传值给网站? 精通C和Delphi的高手来赚分!!! DBGrid的问题 CPU窗口 大虾们!帮帮小虾,有谁知道如何取DC中bitmap对象的width和height 安装程序报错 如何增加临时字段 子窗体的位置有问题 有关基金分析的系统或是控件可以分享? 如何制作类似点击收藏夹后的IE左边出现的收藏夹工具栏?
i,j:integer;
begin
j:=0;
For i:=0 to Componentcount-1 do
if Components[i] is TButton then
inc(j);
ShowMessage('TButton的实例有:'+IntToStr(j)+'个');
end;