德尔福:用类似windows 7的aero为vista绘制一个标题形式的文本

6 delphi nonclient aero

如何使用aero Like Windows 7在vista的标题栏中绘制文本(使用onClick事件)?

替代文字http://img529.imageshack.us/img529/3643/immaginembl.jpg

delphi.about.com上的示例无法在带有aero的Vista上运行.你有什么想法?

谢谢大家.

对不起,我的英语不好.

Chr*_*isV 4

在非客户区域绘图会导致玻璃自动禁用。MS Office 所做的就是扩大客户区域以覆盖边界。请参阅此 WPF 文章的“使用玻璃在 NC 区域中绘图”部分以获取建议。恐怕您必须自己将 API 调用转换为 Delphi。