delphi – 如何制作像Windows 7通知弹出窗口一样的窗口,(WS_THIC

发布时间：2020-12-15 04:19:28 所属栏目：大数据来源：网络整理

导读：我刚刚在Delphi 7中创建了一个模拟默认系统图标的 small app here,如音量,电池,时钟,网络. 我试图在这里遵循所有微软推荐的http://msdn.microsoft.com/en-us/library/aa511448.aspx#flyouts 为了使窗口看起来像弹出窗口,我正在使用此代码： //declarationTFo

我刚刚在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;

我的问题是WS_THICKFRAME允许用户调整窗口大小.我怎样才能解决这个问题？

解决方法

您可以通过处理 WM_GETMINMAXINFO来防止调整大小.

但是,这不会阻止调整大小光标的使用.为此,您可以处理WM_NCHITTEST.

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!