无边框窗体拖动大小

最新推荐文章于 2024-06-07 00:58:47 发布
最新推荐文章于 2024-06-07 00:58:47 发布
阅读量5.2k 收藏 3
点赞数
分类专栏： Delphi编程 文章标签： forms class windows system
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/suiyunonghen/article/details/2325416
版权

     今天有一个朋友问我怎样可以拖拽一个没有边框的窗体，使其改变大小。于是很快想到一个消息
WM_NCHITTEST

该消息用来描述，当关标移动或当按下或当释放了鼠标按扭的时候，就会发送一个WM_NCHITTEST消息给一个窗口若鼠标未被捕获，则这条消息发送给光标所在的窗口。否则，这条消息公布给捕获鼠标的窗口。
参数
   xPos = LOWORD(Lparam);//LParam低位字的值。指出光标的X坐标。该坐标值是相对于屏幕左上角的坐标。
   yPos = HIWORD(LParam);//LParam高位字的值。指出光标的y坐标。

返回值  DefWindowProc函数的返回值是下列值之一，以指示光标热点的位置：
    HTBORDER             光标热点在一个窗口的边界上，该窗口不具有可变大小的边界
    HBOTTOM                在一个窗口下面的水平边界上
    HBOTTOMLEFT      在一个窗口的边界的左下角
    HBOTTOMRIGHT   在边界右下脚
    HTCAPTION            在标题栏中
    HTCLIENT               在客户区
    HTERROR               在屏幕北京或窗口之间的分界线上(与HTNOWHERE类似，所不同的是DefWindowProc函数产生一个系统响铃以指示出错)
    HTGROWBOX         在尺寸框中(与HTSIZE相同)
    HTHSCROLL          在水平滚动栏
    HTLEFT                    在左边界
    HTMENU                  在菜单中
    HTNOWHERE         在屏幕或窗口之间的分界线上
    HTREDUCE             在一个最小化的按扭上
    HTRIGHT                  在窗口右边界
    HTSIZE                      在尺寸框中
    HTSYSMENU           在一个System菜单或在一个子窗口的Close按扭中
    HTTOP                       在上边界
    HTTOPLEFT             在左上角
    HTTOPRIGHT          在右上角
    HTTRANSPARENT 在当前被其他窗口覆盖的窗口中
    HTVSCROLL            在垂直滚动栏中
    HTZOOM                   在最大化按扭上
注释                  可使用MAKEPOINTS宏将lParam参数转换为一个Points结构
参见                 DefWindowProc，GetCapture

   于是我们可知道要可拖动窗体主要就是要截获该消息，然后让消息的结果返回为HBOTTOM, HBOTTOMLEFT, HBOTTOMRIGHT,HTLEFT , HTTOP ,HTTOPLEFT  ,HTTOPRIGHT 等则可。于是写下如下代码：


procedure TFo

最低0.47元/天 解锁文章
不得闲
关注
  • 0
    点赞
  • 踩
  • 3
    收藏
    觉得还不错? 一键收藏
  • 2
    评论
专栏目录
windows程序设计笔记
那又怎样的博客
09-08 3227
WINAPI标识符在WINDEF.H中定义:define WINAPI __stdcall该语句制订了一个调用约定，包括如何生成机器代码以及在堆栈中放置函数调用的参数， 1：1）在Win32API中，长指针和短（近）指针是没有区别的，这只是16为Windows的遗物2）：wndclass.lpfnWndProc=WndProc； 这条语句将这个窗口类类的窗口过程设置为WndProc，这个
对WM_NCHITTEST消息的了解+代码实例进行演示
热门推荐
yiruirui0507的专栏
12-16 1万+
这个消息比较实用也很关键，它代表非显示区域命中测试。这个消息优先于所有其他的显示区域和非显示区域鼠标消息。其中lParam参数含有鼠标位置的x和y屏幕坐标，wParam 这里没有用。Windows应用程序通常把这个消息传送给DefWindowProc，然后Windows用WM_NCHITTEST消息产生与鼠标位置相关的所有其他鼠标消息。通俗的讲从消息产生消息。case WM_NCHITTEST:return (LRESULT)HTNOWHERE;以上代码能禁用窗口的所有显示区域和非显示区域鼠标消息，也就是当
当无边框窗口被子窗口遮挡导致难以调节窗口大小时，可通过处理 NCHITTEST 消息重新支持调节窗口大小
walterlv - 吕毅
05-23 653
做无边框窗口之后，我们有方法可以让窗口的标题栏区域和边缘调大小的区域继续正常工作，直到——这个窗口上面覆盖了其他的子窗口。这个子窗口会吃掉消息导致父窗口的边缘无法再继续处理这些消息。 @TOC 子窗口遮挡了父窗口 看一下下面的动画，这个窗口的下半部分放了一个子窗口。 然后尝试在边缘调节窗口尺寸，会发现被子窗口覆盖的部分是无法完成窗口大小调节的。 究其原因，是子窗口处理掉了与调窗口大小相关的消...
Delphi中拖动无边框窗口的5种方法
最新发布
2301_80849678的博客
06-07 410
/发送移动标题栏消息。//释放鼠标控制区域。4.截获WM_NCHITTEST消息。//发送鼠标在标题栏内按下的消息。如，要在Panel上可以移动窗口。在MousDown事件中写。
.NET 不规则、可改变大小、边框半透明窗体设计
weixin_30340819的博客
11-01 141
做.NET WinForm的开发也有一段时间了，对.NET的界面设计也有了一定的了解。自认为自己学的这些东西都是网上看高手们的东西后总结出来的，第一次把这些东西写出来。 不好的地方请大家多多指教。 大家先看一下做出来的效果吧！ 网上也看过很多做.NET窗体的例子，我只是把网上的这些东西综合了一下，主要有下面这些特点： 1、边框是半透明的，透明度可根据需要自己更改...
Window下拖拽窗体 qt实现代码
z278930050的专栏
06-11 353
WM_NCHITTEST，该消息在MSDN上面解释如下： 它的消息响应函数会根据鼠标当前坐标来频段鼠标命中了窗口的哪个部位，函数返回值指出部位，如HTTOP, HTTOPLEFT, HTCAPTION等。看到这里就会明白，重新定义WM_NCHITTEST，让他返回当前位置为标题栏或边框的话，就可以达到我们想要的结果了。比如移动只需要将鼠标当前位置指定为HTCAPTION即可，这样看来实现更简
WPF 无边框拖动，并改变窗体大小
08-18
标题"\"WPF 无边框拖动，并改变窗体大小\"\"所描述的就是这样一个需求，即如何在WPF应用中实现一个无边框窗口，用户仍然能够通过鼠标进行拖动和拉伸来改变窗口的位置和尺寸。 首先，我们可以通过设置`Window.Style`...
C# 改变无边框窗体尺寸大小的方法
09-05
本篇将详细讲解如何在C#中改变无边框窗体的尺寸大小。 首先，无边框窗体是通过设置窗体的`FormBorderStyle`属性为`None`来实现的。这种情况下，用户无法通过常规的拖动来改变窗体的大小，因此我们需要重写`WndProc`...
c# WinForm无边框拖拽及窗体放大缩小
05-24
以上代码片段展示了如何实现无边框窗体的拖动和自适应大小调整功能。请注意，实际项目中可能需要根据具体需求进行适当的修改和优化，例如添加对窗体最小化和最大化的支持，以及处理多显示器环境下的边界问题等。 在...
可改变大小的无边框窗体
09-20
在标题“可改变大小的无边框窗体”中，我们关注的是窗体的一种特殊形态，即允许用户通过拖动来调整其尺寸，并且没有传统的边框和控制按钮（如最大化、最小化、关闭按钮）。这种设计通常用于自定义用户界面或者创建...
delphi 无标题窗体加边框可拖拽调整大小
06-26
delphi无标题窗体（borderstyle=bsnone）默认没有边框，也无法拖拽必变窗体大小，本资源为无标题窗体加边框并可拖拽调整大小
窗体半透明并且鼠标穿透效果.zip
09-11
1.QQ:513187410 2.保证无毒 3.简单,方便,实用 4.实例可以自行改用 5.如有非法,本人无法律责任,由改动代码人负责！ 6.需要更多本人作品,查找标签“朱建强” 7.请下载,杀毒后再使用！ 本人Delphi开发7年，有C++,IOS,JAVA,HTML5，android等开发人员。有需要可以找我
winfrom 无边框窗体改变大小
09-12
以上代码实现了一个基本的无边框窗体，允许用户通过拖动鼠标在窗体边缘来改变其大小。请注意，实际应用中可能需要进行更多的边界检查和优化，以确保更好的用户体验。 在WindowsFormsApplication1项目中，你可以创建...
关于WM_NCHITTEST消息
weixin_30646315的博客
09-12 415
我为了移动一个无标题栏的窗体，使用了WM_NCHITTEST消息，这个消息大概如下： 通常，我们拖动对话框窗口的标题栏来移动窗口，但有时候，我们想通过鼠标在客户区上拖动来移动窗口。 一个容易想到的方案是，处理鼠标消息WM_LBUTTONDOWN和WM_LBUTTONUP。在OnLButtonUp函数中计算鼠标位置的变化，调用MoveWindow实现窗口的移动。 注意，拖动标题栏移动窗口的时候...
[随笔]关于如何实现鼠标穿透窗口和窗口半透明
dianlang2648的博客
05-23 1374
资料准备 WS_EX_TRANSPARENT | WS_EX_LAYERED WM_NCHITTEST & return HTTRANSPARENT SetLayeredWindowAttributes(…) UpdateLayeredWindow(…) 旁征博引 窗口类型 Overlapped Windows Pop-up Windows Child Windo...
无边框窗体的拖动以及大小改变的实现方式
lwsas1的专栏
07-31 1823
目前，界面流行扁平化，对于传统的window窗体，我们经常需要去掉窗体的边框，以求视角扁平化的效果。去掉窗体的边框很容易，关键是对于无边框的窗体，我们无法对其进行拖动，也无法通过拖动窗体边缘来改变窗体的大小。通常我们会想到处理鼠标事件来模拟效果，但我们自己手动写代码会麻烦许多。其实window消息中，有个WM_NCHITTEST，普通窗体中，点击标题栏拖动窗口以及拖动窗体边缘改变窗体大小就是通过发
DELPHI窗体无边框拖动
shandiantianying的专栏
05-03 896
procedure WMNCHitTest(var Message: TWMNCHitTest); message WM_NCHITTEST; procedure TForm1.WMNCHitTest(var Message: TWMNCHitTest); begin  Message.Result := HTCAPTION; end;
MFC 无边框窗体实现用鼠标拖动窗体边缘实现窗体大小变化
05-30
可以通过以下步骤实现： 1. 在 MFC 应用程序中创建一个无边框窗体，可以通过在窗口类的 PreCreateWindow 函数中设置窗口样式来实现，例如： ```c++ BOOL CMyWnd::PreCreateWindow(CREATESTRUCT& cs) { if (!CWnd::PreCreateWindow(cs)) return FALSE; cs.style &= ~WS_BORDER; // 去掉边框样式 cs.style |= WS_THICKFRAME; // 添加调整大小的样式 return TRUE; } ``` 2. 在窗体类中添加以下成员变量： ```c++ BOOL m_bDrag; // 标记是否正在拖动窗体边缘 CPoint m_ptOrigin; // 记录鼠标按下时的位置 ``` 3. 响应 WM_NCHITTEST 消息，判断鼠标位置是否在窗体边缘，并返回对应的鼠标样式： ```c++ UINT CMyWnd::OnNcHitTest(CPoint point) { UINT nHitTest = CWnd::OnNcHitTest(point); if (nHitTest == HTCLIENT) { CRect rect; GetWindowRect(&rect); // 判断鼠标位置是否在窗体边缘 if (point.x < rect.left + 5) nHitTest = HTLEFT; else if (point.x > rect.right - 5) nHitTest = HTRIGHT; if (point.y < rect.top + 5) nHitTest = HTTOP; else if (point.y > rect.bottom - 5) nHitTest = HTBOTTOM; if (point.x < rect.left + 5 && point.y < rect.top + 5) nHitTest = HTTOPLEFT; else if (point.x < rect.left + 5 && point.y > rect.bottom - 5) nHitTest = HTBOTTOMLEFT; else if (point.x > rect.right - 5 && point.y < rect.top + 5) nHitTest = HTTOPRIGHT; else if (point.x > rect.right - 5 && point.y > rect.bottom - 5) nHitTest = HTBOTTOMRIGHT; } return nHitTest; } ``` 4. 响应 WM_NCLBUTTONDOWN 消息，判断鼠标按下的位置是否在窗体边缘，如果是，则记录鼠标按下时的位置，并标记正在拖动边缘： ```c++ void CMyWnd::OnNcLButtonDown(UINT nHitTest, CPoint point) { if (nHitTest == HTLEFT || nHitTest == HTRIGHT || nHitTest == HTTOP || nHitTest == HTBOTTOM || nHitTest == HTTOPLEFT || nHitTest == HTTOPRIGHT || nHitTest == HTBOTTOMLEFT || nHitTest == HTBOTTOMRIGHT) { m_bDrag = TRUE; m_ptOrigin = point; SetCapture(); } CWnd::OnNcLButtonDown(nHitTest, point); } ``` 5. 响应 WM_NCMOUSEMOVE 消息，如果正在拖动边缘，则根据鼠标移动的距离调整窗体大小： ```c++ void CMyWnd::OnNcMouseMove(UINT nHitTest, CPoint point) { if (m_bDrag) { CRect rect; GetWindowRect(&rect); int dx = point.x - m_ptOrigin.x; int dy = point.y - m_ptOrigin.y; switch (nHitTest) { case HTLEFT: rect.left += dx; break; case HTRIGHT: rect.right += dx; break; case HTTOP: rect.top += dy; break; case HTBOTTOM: rect.bottom += dy; break; case HTTOPLEFT: rect.left += dx; rect.top += dy; break; case HTTOPRIGHT: rect.right += dx; rect.top += dy; break; case HTBOTTOMLEFT: rect.left += dx; rect.bottom += dy; break; case HTBOTTOMRIGHT: rect.right += dx; rect.bottom += dy; break; } MoveWindow(&rect); } CWnd::OnNcMouseMove(nHitTest, point); } ``` 6. 响应 WM_NCLBUTTONUP 消息，结束拖动边缘： ```c++ void CMyWnd::OnNcLButtonUp(UINT nHitTest, CPoint point) { if (m_bDrag) { m_bDrag = FALSE; ReleaseCapture(); } CWnd::OnNcLButtonUp(nHitTest, point); } ``` 以上就是实现用鼠标拖动窗体边缘实现窗体大小变化的步骤。
评论 2
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值