关于RADStudio2007使用SUISKINv4.6的方法

由于本人的Delphi升级成了RAD Studio 2007，在使用SUISKIN v4.4的时候发现如果只有DCU文件是不行的，于是到sunisoft网站上看说明，最新版本v4.6是支持RAD Studio 2007的，下来试用时发现增加了obj和hpp文件，感觉比较怪异。

由于试用版使用时会弹出一个注册的对话框，感觉不爽，准备将它去掉。用UlterEdit打开其中的SUISkinUsing.dcu，发现该文件很短，其中有showmessage字样，还有试用时弹出对话框中的内容，本来打算用DeDe将该文件反编译，然后屏蔽掉showmessage所在的函数，但是发现DeDe不能处理SUISkinUsing.dcu文件，看来有特殊处理。决定采用替换SUISKinUsing.dcu的方法查看SUISkinUsing中都有哪些函数。

新建一个工程，添加一个单元文件命名为SUISkinUsing.pas，内容如下：

unit SUISkinUsing;

interface

implementation

end.

也就是没有内容！！。

编译该工程，将生成的SUISkinUsing.dcu覆盖到SUISkin中Source目录中的相应位置。

新建工程，并在窗体上放一个TsuiSkinEngine控件，编译发现没有错误，运行成功，没有注册对话框，看来SUISkin原理是在SUISkinUsing.dcu定义的一个变量来查看是否是试用版然后处理（就是弹出对话框）。

现在可以使用免费的SUISkin了。

 

该文章仅供学习使用，请勿非法使用。