[推荐]非常精致的鼠标移动示例

tmtony · 发表于 2006-5-23 18:55:00

看到最近论坛有不少有关鼠标移动方面的精彩例子．也来凑凑热闹．也发一个
非常精致的鼠标移动示例

可拖动任何控件进行移动，改变它的位置，但所有位置移动不可超出指定的边框范围。

可广泛用于厂卡支票打印图书证设计实时动态设计报表等多种实际用途，大家可在此基础上产生更多更丰富的效果出来

是国外高手作品，我只作了一些改进，找不到作者原名，有知道的请跟贴．
匆忙整理翻译及修改未做太多测试。

游客，如果您要查看本帖隐藏内容请回复

andymark · 发表于 2006-5-23 19:21:00

谢谢分享!!!

发现一个小小的bug:

如果打开窗体,先移动txtLastName 会提示运行错误

如果先移动其他控件再移动txtLastName就没有种情况

一点通 · 发表于 2006-5-23 19:22:00

谢谢站长提供这么好的例子,可惜移动后不能保存,重打开后恢复原位置

tmtony · 发表于 2006-5-23 19:57:00

在退出前將當前控件的位置保存到一個表里,然后在加載的時間恢復出來就可以了

宿命的风 · 发表于 2006-5-23 20:24:00

精品啊。。。。

LucasLynn · 发表于 2006-5-23 20:47:00

精彩

qlm · 发表于 2006-5-23 21:34:00

想得到什么就有什么，这里真好！

WDLRCZT · 发表于 2006-5-23 21:45:00

不错，支持

LucasLynn · 发表于 2006-5-23 22:59:00

以下是引用tmtony在2006-5-23 11:57:00的发言：

在退出前將當前控件的位置保存到一個表里,然后在加載的時間恢復出來就可以了

直接保存在控件属性中岂不是更好。

fan0217 · 发表于 2006-5-24 04:23:00

以下是引用LucasLynn在2006-5-23 12:47:00的发言：
精彩

帐号		自动登录	找回密码
密码			注册

群介绍
Access培训群 (792054000)
Access免费培训群2 (792054000)
Access经典源码培训群 (77130759)
Access源码技巧群 (138920637)
access vba (307776555)

主题相关群

地区相关群[您还没设置居住地]

[模块/函数] [推荐]非常精致的鼠标移动示例

本帖子中包含更多资源

群介绍
主题无相 (随机显示版	同地区群块其他地区)