Delphi_子窗体继承父窗体后如何显示父窗体上的控件

Posted 2020-09-10 学海无涯

1.创建子窗体Form1

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

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

uses TFatherForm

3.将子窗体中代码修改

TForm1 = class(TForm) 改为

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

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

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

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