我想把一些控件改成继承于我自己的控件类该怎么做啊？

Question

TMyButton=Class(TButton)
   Private
   //Your's Data Field or Procedure or function　
   protected
   //Your's Data Field or Procedure or function
   public
   // Your's Data Field or Procedure or function
 end;

Answer 1

to Mylove1979
接下去怎么做？把Button1 : TButton;改成 Button1 : TMyButton
编译都不通过。怎么办啊？

Answer 2

你可以用建立部件的方法，将你的的父类选为BUTTON，我想就行了吧，具体操作
就是有NEW -OTHERS 中选中ACTIVEX 中的Compontent创建一个就OK了

Answer 3

把Button1 : TButton;改成 Button1 : TMyButton编译都不通过是因为你的Button1是在设计期放上去的，声明一个变量，运行期动态创建应该是可以的，或者把你的自定义控件安装到控件面板上，在设计期就可以直接用了，安装方法应该会吧，component\install component或作成包，component\install packages

Answer 4

应该先做成一个component,选父类为tbutton，然后重载你需要修改的消息处理就可以，我试过了。