如何移动没有标题的窗体

原创 2000年08月18日 12:49:00
1、如何移动没有标题的窗体 * "欺骗"系统,让他认为点中的是窗体的标题行:在FORM的Private定义中作如下声明: procedure WMNCHitTest(var M: TWMNCHitTest); message wm_NCHitTest; 函数的实现: procedure TForm1.WMNCHitTest(var M: TWMNCHitTest); begin inherited; if M.Result = htClient then M.Result := htCaption; end; ** 更为简单的方法是这样的:在窗体(或其他可视控件)的onMouseMove事件里添加这样的语句: if (ssleft in Shift) then begin ReleaseCapture; Perform(WM_syscommand, $F012, 0); end; 并且这种方法比上一种更灵活许多。

如何移动没有标题的窗体

★、如何移动没有标题的窗体 △"欺骗"系统,让他认为点中的是窗体的标题行:在FORM的Private定义中作如下声明:Procedure WMNCHitTest(var M: TWMNCHitTest...
  • SafeF8
  • SafeF8
  • 2004年12月20日 11:01
  • 1078

移动没有标题的窗体

    我们一般是用鼠标按住窗口的标题栏,然后移动窗口,当窗口没有标题栏时,我们可以用下面的方法来移动窗口: 在 BAS 文件中声明:Declare Function ReleaseCapture L...
  • AttaBoy
  • AttaBoy
  • 2000年12月10日 14:07
  • 910

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

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

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

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

如何实现浮动没有标题的窗体

Option Explicit          Public Type RECT      Left As Long      Top As Long      Right As Long     ...
  • dnvodcwan
  • dnvodcwan
  • 2005年12月30日 20:58
  • 569

创建透明窗体

透明窗体,顾名思义,就是窗体是透明的,透过窗体可以看到窗体下面的东西。实现透明窗体的原理也很简单:首先得到主窗口的矩形区域,再得到客户区的矩形区域,然后用CombineRgn函数,使用异或操...
  • zcsor
  • zcsor
  • 2007年08月12日 22:02
  • 50594

如何设置窗口的标题栏里的标题【转】

MFC程序的默认的标题是“无标题-title”,其中title是应用程序的名称,我们应如何修改MFC窗口标题来符合自己的要求? MFC程序的文档类中定义了一个虚函数SetTitle,用于设置...
  • form88
  • form88
  • 2017年02月17日 17:19
  • 802

移动没有标题的FORM

Private Const WM_NCHITTEST As Integer = &H84Private Const HTCLIENT As Integer = &H1Private Const HTC...
  • jinta2001
  • jinta2001
  • 2005年06月19日 18:16
  • 538

更改单文档应用程序主框架Frame的标题

方法一: BOOL CMainFrame::PreCreateWindow(CREATESTRUCT& cs)    //重写这个类 { // TODO: Modify the Window...
  • tianmo2010
  • tianmo2010
  • 2011年03月28日 13:51
  • 2154

移动没有CAPTION的窗体

procedure WMMOVE(VAR Message: TWMNCHITTEST); Message WM_NCHITTEST;procedure TForm1.WMMOVE(VAR Messag...
  • programlover
  • programlover
  • 2000年12月13日 12:04
  • 438
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:如何移动没有标题的窗体
举报原因:
原因补充:

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