繁體中文当前位置: 首页 > 图文教程 > 网络编程 > ASP.NET > 控件的拖动和缩放技术全解
- ASP.NET
- ASP.NET超凡的代码控制(二)
- 剖析ASP.NET下部构造(一)
- 剖析ASP.NET下部构造(二)
- ASP.NET的Web controls(一)
- ASP.NET的Web controls(二)
- 如何在页面上动态的生成 WebForm控件
- 再议正则表达式(这次是在asp.net 上的应用)
- 利用.NET框架简化发布和解决DLL Hell问题(1)
- 利用.NET框架简化发布和解决DLL Hell问题(2)
- 在ASP+中访问数据库
- 通过事例学习.net的WebForms技术(一)
- 通过事例学习.net的WebForms技术(二)
- 如何在aspx中得到在存储过程中的的数值(兼答jspfuns的问题)
- 如何得到一个汉字和字母组合的字符串的准确的长度(asp.net 版本的)
- ASP+中取代ASP的RS(Remote Scripting)技术的Framework
- 通过事例学习.net的WebForms技术(三)
- 通过事例学习.net的WebForms技术(四)
- 通过事例学习.net的WebForms技术(五)
- 通过网络域名得到这台主机的IP地址
- 查看服务器磁盘、文件的aspx
ASP.NET 中的 控件的拖动和缩放技术全解
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-11-03 浏览: 56 ::
收藏到网摘: n/a
当光标移动到要拖动或缩放的控件上时，应显示相应的动作箭头。定义一个枚举的变量来标识对应的状态。
Enum EnumMousePointPosition
MouseSizeNone = 0 '无
MouseSizeRight = 1 '拉伸右边框
MouseSizeLeft = 2 '拉伸左边框
MouseSizeBottom = 3 '拉伸下边框
MouseSizeTop = 4 '拉伸上边框
MouseSizeTopLeft = 5 '拉伸左上角
MouseSizeTopRight = 6 '拉伸右上角
MouseSizeBottomLeft = 7 '拉伸左下角
MouseSizeBottomRight = 8 '拉伸右下角
MouseDrag = 9 '鼠标拖动
End Enum
Dim m_MousePointPosition As EnumMousePointPosition
在MouseMove事件中读取进入控件的光标位置，用下面函数判断光标的状态。
m_MousePointPosition = MousePointPosition(sender.Size, e)
按对应的状态显示光标形状
Select Case m_MousePointPosition
Case EnumMousePointPosition.MouseSizeNone
Me.Cursor = Cursors.Arrow '箭头
Case EnumMousePointPosition.MouseDrag
Me.Cursor = Cursors.SizeAll '四方向
Case EnumMousePointPosition.MouseSizeBottom
Me.Cursor = Cursors.SizeNS '南北
Case EnumMousePointPosition.MouseSizeTop
Me.Cursor = Cursors.SizeNS '南北
Case EnumMousePointPosition.MouseSizeLeft
Me.Cursor = Cursors.SizeWE '东西
Case EnumMousePointPosition.MouseSizeRight
Me.Cursor = Cursors.SizeWE '东西
Case EnumMousePointPosition.MouseSizeBottomLeft
Me.Cursor = Cursors.SizeNESW '东北到南西
Case EnumMousePointPosition.MouseSizeBottomRight
Me.Cursor = Cursors.SizeNWSE '东南到西北
Case EnumMousePointPosition.MouseSizeTopLeft
Me.Cursor = Cursors.SizeNWSE '东南到西北
评论 (0) All
