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]无边框窗口最大化不挡任务栏方法所遇到的程序开发问题。
如果觉得内存溢出网站内容还不错,欢迎将内存溢出网站推荐给程序员好友。
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)