运行时移动窗体内的控件
2008-01-21 11:14
183 查看
原问题: 怎样在程序运行的状态下 用鼠标移动窗体上的控件??可以随意放在哪里....~!!
我的解决方案:
====cike例题====
name = 移动框架控件
form = Frame1
效果 = 可以随意拖动 框架的位置
================
VBScript code
只要按这个思路 可以移动其它控件...
我的解决方案:
====cike例题====
name = 移动框架控件
form = Frame1
效果 = 可以随意拖动 框架的位置
================
VBScript code
Dim a As Boolean ' 这个变量记录了是否在按下状态 Dim oldx As Integer ' 这个变量记录了 未移动的X 位置 Dim oldy As Integer ' 这个变量记录了 未移动的Y 位置 Private Sub Frame1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) a = True '鼠标在 框架上按下时候 记录已经按下 oldx = X '同时记录当前位置 X oldy = Y '同时记录当前位置 Y End Sub Private Sub Frame1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) ' 若按下 就移动 当前位置-移动位置=移动值 '具体可以参考move 函数 If a = True Then Frame1.Move Frame1.Left + X - oldx, Frame1.Top + Y - oldy End Sub Private Sub Frame1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single) a = False '鼠标放开后 记录 End Sub
只要按这个思路 可以移动其它控件...
相关文章推荐
- C#窗体程序在win7下运行时 控件无win7 方式
- 通过控件移动窗体
- 转:窗体控件随意移动
- C# 鼠标拖拉移动窗体控件
- asp.net关于控件运行返回错误:必须放在具有 runat=server 的窗体标记内,解决办法。
- VB点击控件移动窗体
- delphi 程序运行时移动控件
- 使用双重缓冲,避免窗体中控件位置移动的时候闪烁
- 在运行时通过鼠标拖动移动控件位置及改变控件的大小
- 如何摁下鼠标左键,图标(窗体,或者控件)能够随着鼠标移动
- [C#]使用Label标签控件模拟窗体标题的移动及窗体颜色不断变换
- winfrom 无窗体边框的时候可以让窗体移动直接在控件上写事件
- 移动窗体中的控件
- C#运行时鼠标移动控件 - 调用Windows API(ReleaseCapture)
- 让普通控件拥有左键移动窗体的功能
- delphi 无标题栏时,窗体跟随其他控件移动的方法
- winform窗体中移动控件
- 移动窗体上的控件,鼠标跟随,动态改变
- C#winform窗体中如何点击移动某个控件来移动窗体
- 窗体内控件的移动及窗体随控件移动、WIN7磨砂窗口