一个Form如何继承？

Question

我想建立一个数据录入窗体的基类TMyBaseForm，继承自TForm，封装了一些方法和控件供不同的数据录入窗体继承，请问我该怎样生成和继承这个TMyBaseForm类？

Answer 1

创建一个新的窗口。
  TMyBaseForm = class(TForm)
  private
    { Private declarations }
  public
    { Public declarations }
    procedure MyBaseFormProc1;
    procedure MyBaseFormProc2;
    function MyBaseFormProc3: Integer;
  end;定义好相关方法(按你需要)。然后在作成模版就行了。

Answer 2

你能让TMyBaseForm继承TForm，怎么就不能创建继承TMyBaseForm的类吗？
如果为了方便可以在File-New-你的工程-你的TMyBaseForm。选择inherited就可以让delphi为你生成一个继承子类

Answer 3

To rockswj(石头)：  TMyBaseForm = class(TForm)
  private
    { Private declarations }
  public
    { Public declarations }
    procedure MyBaseFormProc1;
    procedure MyBaseFormProc2;
    function MyBaseFormProc3: Integer;
  end;创建的这个就是父类。
将设置为模版就可以继承的方式来使用他。例如使用时如下:  TMyBaseForm1 = class(TMyBaseForm)  // 继承TMyBaseForm
  private
    { Private declarations }
  public
    { Public declarations }
  end;