[Delphi]无边框窗口最大化不挡任务栏方法

[Delphi]无边框窗口最大化不挡任务栏方法,第1张

概述procedure WMGetMinMaxInfo(var mes: TWMGetMinMaxInfo); message WM_GetMinMaxInfo;procedure TfrmMain.WMGetMinMaxInfo(var mes: TWMGetMinMaxInfo);var I: Integer; R: TRect;begin R := Self
procedure WMGetMinMaxInfo(var mes: TWMGetMinMaxInfo); message WM_GetMinMaxInfo;procedure TfrmMain.WMGetMinMaxInfo(var mes: TWMGetMinMaxInfo);var  I: Integer;  R: TRect;begin  R := Self.Monitor.WorkareaRect;  mes.MinMaxInfo.ptMaxSize.X := R.Right - R.left;  mes.MinMaxInfo.ptMaxSize.Y := R.Bottom - R.top;  mes.Result := 0;  inherited;end;
总结

以上是内存溢出为你收集整理的[Delphi]无边框窗口最大化不挡任务栏方法全部内容,希望文章能够帮你解决[Delphi]无边框窗口最大化不挡任务栏方法所遇到的程序开发问题。

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

欢迎分享,转载请注明来源:内存溢出

原文地址: https://outofmemory.cn/langs/1258773.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2022-06-07
下一篇 2022-06-07

发表评论

登录后才能评论

评论列表(0条)

保存