52ky2 发表于 3 天前

易语言模块 Lzj-文件拖放.ec


模块名称:文件拖放模块
作者:吕志杰
版本:1.1

修改第四个参数
首次回调值为1,回调结束值为2,回调中值为0。
*2008年04月04日
增加了可以注册拖放到多个组件中
回调函数说明:
第1个参数为文本型,代表“路径”
第2个参数为文本型,代表“文件名”
第3个参数为整数型,代表“拖放个数”
第4个参数为整数型,首次回调值为1,回调结束值为2,回调中值为0。
------------------------------
.版本 2
.子程序 拖放文件, , 公开, 例子:允许:拖放文件 (列表框1.取窗口句柄 (), 真, &子程序1) 禁止:拖放文件 (列表框1.取窗口句柄 ())
.参数 句柄, 整数型, , 指定组件的句柄
.参数 是否允许拖放, 逻辑型, 可空, 真,允许,假,禁止,默认:假。
.参数 子程序指针, 子程序指针, 可空, 得到结果的子程序



页: [1]
查看完整版本: 易语言模块 Lzj-文件拖放.ec