张志峰的博客

水滴石川,积少成多。

导航

Delphi 继承基类的窗体,并显示基类的控件操作。

Posted on 2013-07-12 10:03  ╰★张志峰★╮  阅读(4389)  评论(0)    收藏  举报

1.  先建一个普通的窗体,until1

    

2.  先把类实现基类, 并需要实现基类需要继承的方法, 可以先不用再方法中写实现代码。

    TForm4 = class(TfrmmtAReportPeriodBase)

 

     function NewDayReportBefore(aStartDate, aEndDate: string): Boolean; override;

3. 右键,选择“View as Text”

  

4. 显示如下

  

5.  最关键的一步, object Form4: TForm4  改为  inherited Form4: TForm4

6.  选择 “view   as Form ”

    

 

ok, 这样就继承了基类的窗体啦。