Tform1=class(Tform)
private
procedure onEditclick(sender:Taction);//自定义过程
end;if component[i] is Tedit then
component[i].onclick := onEditClick;
private
procedure onEditclick(sender:Taction);//自定义过程
end;if component[i] is Tedit then
component[i].onclick := onEditClick;
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货