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

曲歌49

曲歌49

2016-02-19 20:15

get新技能是需要付出行动的,即使看得再多也还是要动手试一试。今天图老师小编跟大家分享的是无框窗体移动最简法(程序),一起来学习了解下吧!
Dimi,x1AsDouble,y1AsDouble,x2AsDouble,y2AsDouble
  PrivateSubForm_MouseDown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)
  i=1
  x1=X
  y1=Y

EndSub

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

EndIf
  EndSub

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

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

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

EndSub

->

展开更多 50%)
分享

猜你喜欢

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

编程语言 网络编程
无框窗体移动最简法(程序)

移动窗体

电脑网络
移动窗体

s8lol主宰符文怎么配

英雄联盟 网络游戏
s8lol主宰符文怎么配

婚纱抠图(最简法)

PS PS教程
婚纱抠图(最简法)

黄芪泡茶 防感冒最简法

生活常识 养生 健康
黄芪泡茶 防感冒最简法

lol偷钱流符文搭配推荐

英雄联盟 网络游戏
lol偷钱流符文搭配推荐

无框阳台有什么特点?无框阳台怎么设计?

阳台 装修 生活常识
无框阳台有什么特点?无框阳台怎么设计?

如何按非客户区移动窗体

C语言教程 C语言函数
如何按非客户区移动窗体

lolAD刺客新符文搭配推荐

英雄联盟
lolAD刺客新符文搭配推荐

用VB打造自己的SQL连接器

用VB打造自己的SQL连接器

开机自动更换墙纸

开机自动更换墙纸
下拉加载更多内容 ↓