Delphi切割玻璃
Delphi切割玻璃
提问于 2012-01-23 21:56:54
我使用的是Delphi XE2，我喜欢玻璃特效，我想要像Windows7平板电脑工具一样“切割”玻璃。如果你也知道如何裁剪一个按钮，我将很高兴你告诉我如何。
谢谢
回答 2
Stack Overflow用户
发布于 2012-01-24 02:36:29
在顶部区域进行绘制只需使用玻璃框架并在非工作区进行绘制，或者使用DwmExtendFrameIntoClientArea应用编程接口。
我见过的最好的代码示例是VCL "Ribbon“控件，它提供了一个"QAT”(快速访问工具栏)区域，绘制在“非工作区”中。
请注意，作者不仅要考虑当Vista/Win7系统打开眼镜时如何渲染，还必须决定当主题引擎关闭时如何在WinXp、Win7和Vista上渲染。在Vcl.Ribbon.pas (或者如果您使用XE或更早的版本，则只使用Ribbon.pas )单元中有相当多的逻辑专门用于此目的。
查看Vcl Ribbon源代码中的procedure TCustomRibbonQuickAccessPopupToolbar.NCPaint(DC: HDC);。
绘制一个从底部突出的非矩形“扩展区域”可能就是应用自定义窗口裁剪区域。
Stack Overflow用户
发布于 2012-01-24 12:05:36
页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接：
https://stackoverflow.com/questions/8972761
复制相关文章
相似问题
腾讯云开发者
