DELPHI美化界面[转载]

手头的项目做的差不多了，交给客户，结果给出的结论是界面太难看了，至少要做成像QQ类似的界面。（目前是QQ2009界面确实还是不错的，本人也非常喜欢）。

1.透明问题。

要重新调整界面确实很麻烦，以前用DELPHI开发的界面都很土，和WEB真是没办法比。（我以前用的是DELPHI7），现在回想起来，DELPHI难做的原因是：没有透明控件。所有控件都是不透明的，并且大部分控件就是灰色的，一放到窗体上，就像一块膏药一样贴在上面。即使界面上放几副图片也难以和控件的那种灰灰的颜色融合起来。所以，一直在想QQ是怎么开发的。还是挺佩服腾讯那帮家伙的。

后来打开DELPHI2009，竟然发现有些控件支持背景，特别是PANEL控件，比以前增加了一个ParentBackGround属性。这个发现让我激动万分。透明问题解决了一般，虽然不能像WPF或者FLAX那样设置透明度，但是至少能和背景融合，不会像一块膏药了。这样就使得在窗体上放置图片成了可能。

2.按钮控件

随后有产生了一个新的问题，就是按钮。不管用什么类型的按钮，都是灰色的，没有颜色设置属性。即使使用SPEEDBUTTON，FLAT属性设置成TRUE，当鼠标移上去 的时候，还是会出现一个和图片和不吻合的灰框，非常难看。

   

我想要让这个灰框完全和背景融合，根本没办法做到，打开SPEEDBUTTON的代码，在他的Paint方法里发现如下代码：

Details := ThemeServices.GetElementDetails(ToolButton);

ThemeServices.DrawElement(Canvas.Handle, Details, PaintRect);

PaintRect := ThemeServices.ContentRect(Canvas.Handle, Details, PaintRect);

原来DELPHI在画一个按钮的时候，不管如何情况，都需要调用ThemeServices.DrawElement(Canvas.Handle, Details, PaintRect);也就是使用WINDOWS操作系统的主题画一个按钮。而WINDOWS操作系统的主题默认设置是灰的。就是这个原因导致了这个膏药的产生。研究了半天代码，没有发现DELPHI提供如何方法或者事件来屏蔽使用操作系统主题画按钮的这段代码。实在没辙，只能自己写一个SPEEDBUTTON控件。

这个控件很简单，就把SPEEDBUTTON控件的代码抄抄过来，然后屏蔽掉ThemeServices.DrawElement(Canvas.Handle, Details, PaintRect);就可以画一个只有图片的SPEEDBUTTON了。