怎样delphi自带的窗体中加入一个自己的属性

Question

怎样delphi自带的窗体中加入一个自己的属性,如Cation,在原来的基本forms中加进去怎么加,请高手指点.

Answer 1

{类似这样的写法就可以。我写得不规范。}type
  TForm = class(Forms.TForm)
  private
    FX: TCaption;
  property X read FX write FX;
  //....
  end;  TForm1 = class(TForm)
  //...

Answer 2

你创一个form给他添加一个属性，然后把它当作baseform,新建的每个窗口都继承它