Git   发布时间:2022-04-04  发布网站:大佬教程  code.js-code.com
大佬教程收集整理的这篇文章主要介绍了如何检测Delphi 7上的Windows Aero主题?大佬教程大佬觉得挺不错的,现在分享给大家,也给大家做个参考。

如何检测用户是通过Delphi 7上的代码在他的操作系统上运行Windows Aero主题

WPF:使窗口不可调整,但保持框架?

有没有办法改变非客户区的Windows Aero颜色?

我想在特定的航空窗口上禁用阴影效果

自己的C#应用​​程序中的Windows Aero区域

如何在Windows 7中使用Python进行截图?

我们需要使用的函数是Dwmapi.DwmIsCompositionEnabled ,但是这并不包含在Delphi 7附带的Windows头文件中,并且在Delphi 7中添加了,并且在Delphi 7中发布。它也在Windows XP上崩溃了,所以在之后调用它检查if Win32MajorVersion >= 6 。

function ISAEroEnabled: Boolean; type TDwmIsCompositionEnabledFunc = function(out pfEnabled: BOOL): HRESULT; stdcall; var IsEnabled: BOOL; moduleeHandle: HMODULE; DwmIsCompositionEnabledFunc: TDwmIsCompositionEnabledFunc; begin Result := false; if Win32MajorVersion >= 6 then // Vista or Windows 7+ begin moduleeHandle := LoadLibrary('dwmapi.dll'); if moduleeHandle <> 0 then try @DwmIsCompositionEnabledFunc := GetProcAddress(moduleeHandle,'DwmIsCompositionEnabled'); if Assigned(DwmIsCompositionEnabledFunC) then if DwmIsCompositionEnabledFunc(IsEnabled) = S_OK then Result := IsEnabled; finally FREELIbrary(moduleeHandlE); end; end; end;

大佬总结

以上是大佬教程为你收集整理的如何检测Delphi 7上的Windows Aero主题?全部内容,希望文章能够帮你解决如何检测Delphi 7上的Windows Aero主题?所遇到的程序开发问题。

如果觉得大佬教程网站内容还不错,欢迎将大佬教程推荐给程序员好友。

本图文内容来源于网友网络收集整理提供,作为学习参考使用,版权属于原作者。
如您有任何意见或建议可联系处理。小编QQ:384754419,请注明来意。
标签: