delphi bpl包窗体继承

1. BPL手工修改窗体继承时,怎样让其父类的所有控件显示(在设计时)?

在包文件上点击鼠标右键

bplxiexingBom.bpl -> AddNew -> VclForm,新建一个form,在form的单元文件中修改

在uses里面添加 uCommonForm单元文件 ;

将Tfrm_BOMbianGenTongZhiDan = class(TForm) 改为;

Tfrm_BOMbianGenTongZhiDan = class(Tfrm_com) // Tfrm_com为被继承的窗体

不要忘记 uses Tfrm_com

再在 frm_BOMbianGenTongZhiDan窗体上弹出右键菜单,选择View As Text

把第一行的Object 改成 inherited 后保存;

再在 frm_BOMbianGenTongZhiDan 标签上点击右键,选择View Form;就可以看到继承的窗体了。

发布了402 篇原创文章 · 获赞 3 · 访问量 1万+

猜你喜欢

转载自blog.csdn.net/qq_18932003/article/details/105194307
今日推荐