实现无标题栏拖动

原创 2001年05月04日 10:22:00

Option Explicit
Public Declare Function ReleaseCapture Lib "user32" () As Long
Public Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
Public Const WM_NCLBUTTONDOWN = &HA1
Public Const HTCAPTION = 2

Private Sub Image1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
    ReleaseCapture
    SendMessage Me.hwnd, WM_NCLBUTTONDOWN, HTCAPTION, 0&
End Sub

 

C#实现无标题栏窗体的拖动

无标题栏窗体,也就是FormBorderStyle等于System.Windows.Forms.FormBorderStyle.None的窗体。要实现无标题栏窗体的拖动,分2种情况讨论:标题栏区域封装...
  • jhqin
  • jhqin
  • 2010年11月17日 16:16
  • 3008

无标题栏窗口拖动的实现

普通的Windows应用程序窗口都具有统一的窗口风格,它们一般都包括:用户区和非用户区两部分。非用户区包括标题条、窗口边框、最大化按钮、最小化按钮、关闭按钮和系统默认的快捷键及鼠标支持等。利用鼠标的左...
  • ArduousBonze
  • ArduousBonze
  • 2007年05月15日 00:06
  • 2518

C#之移动无标题栏窗体功能的实现!...

为实现移动无标题栏窗体的功能,我从网上寻找、整理了以下资料,以备不时之需: 该方法适用于有标题栏和无标题栏窗体,适用于窗体内控件,当然 Form 也不例外, 只须添加 MouseDown、...
  • friendan
  • friendan
  • 2012年04月08日 16:23
  • 3239

vb.net实现无标题栏窗体可拖动

'Win32 API Declare Auto Function ReleaseCapture Lib "user32.dll" Alias "ReleaseCapture" () ...
  • pclook
  • pclook
  • 2010年12月27日 15:06
  • 616

Qt无标题栏拖动对话框

class MoveWidget : public QWidget { Q_OBJECT pulic: MoveWidget( QWidget *parent = 0 ):QWid...
  • chinabinlang
  • chinabinlang
  • 2013年12月05日 15:57
  • 2005

不用标题栏拖动窗口最简单的方法

CSDN上看到的方法,自己整理了一下。按任意位置都能拖动:procedure TForm1.FormMouseDown(Sender: TObject; Button: TMouseButton;  ...
  • lanyus
  • lanyus
  • 2005年09月08日 08:34
  • 994

vc中实现无标题栏对话框的拖动

解决无标题栏窗口的拖动问题有两种方案: 第一种方案:       使用常规思路来处理鼠标拖拽事件,当窗口获得WM_LBUTTONDOWN(OnLButtonDown)时,通过设置标志并调用CWnd::...
  • woaisia
  • woaisia
  • 2015年06月05日 15:25
  • 885

vb.net 实现无标题栏窗体拖拽功能

'较好用,没有闪动   Declare Auto Function ReleaseCapture Lib "user32.dll" Alias "ReleaseCapture" () As Bool...
  • haoduo123456789001
  • haoduo123456789001
  • 2016年04月27日 09:32
  • 1315

c# 实现用鼠标拖动没有标题栏的窗口(窗体的任何部分都可实现拖动效果)

上面形式的窗体,实现窗体的任何部分都可
  • soft_123456
  • soft_123456
  • 2014年11月04日 10:05
  • 1541

Qt 左键拖动窗口(没有标题栏)

void ShapedClock::mousePressEvent(QMouseEvent *event) {     if (event->button() == Qt::LeftButton...
  • chenfeng898
  • chenfeng898
  • 2013年05月02日 16:27
  • 505
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:实现无标题栏拖动
举报原因:
原因补充:

(最多只允许输入30个字)