我刚刚在Delphi 7中创建了一个模拟默认系统图标的
small app here,如音量,电池,时钟,网络.
我试图在这里遵循所有微软推荐的http://msdn.microsoft.com/en-us/library/aa511448.aspx#flyouts
为了使窗口看起来像弹出窗口,我正在使用此代码:
//declaration TForm1 = class(TForm) protected procedure CreateParams(var Params: TCreateParams); override; end;
履行
procedure TForm1.CreateParams(var Params: TCreateParams); begin inherited; Params.Style := WS_POPUP or WS_THICKFRAME; Params.ExStyle := Params.ExStyle or WS_EX_TOPMOST; end;
解决方法
您可以通过处理
WM_GETMINMAXINFO来防止调整大小.
但是,这不会阻止调整大小光标的使用.为此,您可以处理WM_NCHITTEST
.
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。