关于窗体继承? 能否在程序中动态新建一个窗体,新建窗体继承了已有的某个窗体的所有功能。有个小例子最好,本人初学!谢谢! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 试验:varform2:tform;beginif not assigned(form2) thenform2:=tform1.create(self);form2.show能出来窗体,但是不知道这个方法有没有什么错误的地方? 虽然出来了,但我看你这个不是从TForm1继承的呀,应该在上面写TForm2 = class(TForm1),然后再建相应的实例呀 可以啊,Tform2 = class(TForm1),这样Tform2的实例就继承了form1的所有功能了,出了private里定义东东!然后再创建Tform2的实例:form2 := Tform2.create(nil); 这样可以,然后你再在form2的窗体中加一下代码事件等,就可以啦! 刚回答了 参考http://expert.csdn.net/Expert/topic/3059/3059067.xml?temp=.7008783 由于form2是动态生成的,怎么访问它上面的控件啊? 好像TFrame可以满足你的想法。 form2是继承了form1所有的东西,但是怎样为form2增加新的功能啊? 菜单 onclick 没点击就执行了,为何? delphi 如何取出注册表的值 有兄弟做过金蝶的应收应付的接口么? 请问大家开发数据库管理系统一般是采用2层c/s, 还是3层c/s构架? 急!!关于字符串修理问题。 Ctrl + F9 找不到文件! 关于bde配置问题 Midas结构的问题,急!!!多谢大家来看看帮帮忙啊 一个简单的问题? 高分求解,绝不食言 如何能做到在fastreport添加完frPriview之后就有打印保存等一些按钮或者是修改哪个属性 为什么添加的属性不能引用
var
form2:tform;
begin
if not assigned(form2) then
form2:=tform1.create(self);
form2.show
能出来窗体,但是不知道这个方法有没有什么错误的地方?
TForm2 = class(TForm1),然后再建相应的实例呀