1.创建子窗体Form1

File -> New -> Form,新建一个form,在form的单元文件中修改

SRE实战 互联网时代守护先锋,助力企业售后服务体系运筹帷幄!一键直达领取阿里云限量特价优惠。

2.子窗体中引用父窗体单元

uses TFatherForm

3.将子窗体中代码修改

TForm1 = class(TForm) 改为

TForm1 = class(TFatherForm) //TFatherForm为被继承的窗体

4.在Form窗体上弹出右键菜单,选择View As Text

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

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

扫码关注我们
微信号:SRE实战
拒绝背锅 运筹帷幄