无框窗体移动最简法(程序)

2016-02-19 20:15 3 1 收藏

get新技能是需要付出行动的,即使看得再多也还是要动手试一试。今天图老师小编跟大家分享的是无框窗体移动最简法(程序),一起来学习了解下吧!

【 tulaoshi.com - 编程语言 】

Dimi,x1AsDouble,y1AsDouble,x2AsDouble,y2AsDouble
  PrivateSubForm_MouseDown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)
  i=1
  x1=X
  y1=Y

EndSub

(本文来源于图老师网站,更多请访问https://www.tulaoshi.com/bianchengyuyan/)

PrivateSubForm_MouseMove(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)
  Ifi=1Then
  x2=X-x1 form1.lift
  y2=Y-y1 form1.top
  form1.movex2,y2

(本文来源于图老师网站,更多请访问https://www.tulaoshi.com/bianchengyuyan/)

EndIf
  EndSub

PrivateSubForm_MouseUp(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)
  i=0

EndSub

(本文来源于图老师网站,更多请访问https://www.tulaoshi.com/bianchengyuyan/)->

来源:https://www.tulaoshi.com/n/20160219/1623157.html

延伸阅读
无模式对话框与有模式对话框不同的是在创建后其他窗口都可以继续接收用户输入,因此无模式对话框有些类似一个弹出窗口。创建无模式对话框需要调用 BOOL CDialog::Create( UINT nIDTemplate, CWnd* pParentWnd = NULL );之后还需要调用 BOOL CDialog::ShowWindow( SW_SHOW);进行显示,否则无模式对话框将是不可见的。相关代码如下: void CYo...
什么是无框阳台窗 无框阳台窗这个东西相信大部分人都是不知道的,对它都是一个陌生的程度,但是现在无框阳台窗在家庭装修中是使用的越来越多了,所以大家还是好好了解一下这个东西的,有一句说的好不能被时代所抛弃啊,下面就是相关内容了。 无框阳台窗是在传统阳台窗的基础上进行了适当的改良,它去除了传统阳台窗的横框竖架,使阳台更透明...
标签: Web开发
介绍 现今移动设备已成为我们生活中的一部分,我们当中的许多人已离不开它们。当这些移动设备连接到Internet时,移动设备的力量将无穷无尽。我们可以在任何时间地点给用户发送数据。典型的移动应用程序是在服务器上使用WML, WMLScript和WBMP开发的。 对于动态WML应用程序,开发者可以使用ASP, JSP, PHP等等。移动设备包括蜂窝电话、寻呼机、...
在程序的main函数中加入以下代码 bool createdNew; System.Threading.Mutex instance = new System.Threading.Mutex(true, "MutexName", out createdNew); if (createdNew) { Application.Run(new LoginForm()); instance.ReleaseMutex(); } else { Application.Exit(); } 还可以写成以下形式,一个窗体只能启动一次 Form1 a = new...
在对话框程序中插入DialogBar 作者:徐建鹏 下载本文示例源代码 程序运行效果图如下: 在基于MainFrm程序中加入DialogBar很方便,大家都知道,DialogBar有着工具条无法比拟的优越性,它可以任意放置控件,轻松实现如WPS OFFICE的导航功能。但是在基于Di...

经验教程

985

收藏

96
微博分享 QQ分享 QQ空间 手机页面 收藏网站 回到头部