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

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;就可以看到继承的窗体了。

猜你喜欢

转载自www.cnblogs.com/sunylat/p/10704294.html