关于从TForm继承的问题，谢谢指教~！解决给分

Question

现在我想从TForm或者TCustomForm来继承一个组件，来自定义窗体的形状，淡入淡出等等
但是从delphi里面选择new vcl componment的时候，基类没有TForm/TCustomForm，
如果我改代码让他从TForm继承，那么安装组件的时候就是安装失败（2005），或者安装后不可用（7）
而且强制从TForm继承的话，我写protected formShow(sender:TObject);override;编译器会告诉我这不是父类的函数，那位大虾曾经这么干过，请指教，分不多，100分奉上~解决立马结贴
[email protected]

Answer 1

没有必要非要用TFORM做父类吧，我做的时候都是自己新建一个窗口，设置好以后，保存起来，然后将它作为父类使用(在FILE->NEW->OTHERS->找到你的工程标签，找到您新建的类窗口，继承)，而不是直接用TFORM创建组件。

Answer 2

而且强制从TForm继承的话，我写protected formShow(sender:TObject);override;编译器会告诉我这不是父类的函数这个小意思啦，在Create里写道：
ONFormShow := FromShow;  即搞定

Answer 3

不Overrid...OnShow := FormShow;

Answer 4

那以后写另外一个程序的时候还要重新设置一边阿
又没有什么办法把这个Form封装成一个组件阿？

Answer 5

设计时在窗口上面点鼠标右键，选择add to repository...，这样可以在下一个工程中继承。

Answer 6

我的建议也是不作成控件，
代码完全可以拿到新的project里面复用。我也很少直接拿TForm来用，都是使用自己继承下来的，修改了一些东西，比如Print等函数。