文件拖拽源码

资源介绍：

文件拖拽易语言源码，鼠标点击图片 然后移动就可以拖出去，把外部文件拖入窗口也可以接收。

资源作者：

易语言源码网

资源界面：

.版本 2

.程序集 窗口程序集1
.程序集变量 m_IDropTarget, IDropTarget
.程序集变量 m_IDropSource, IDropSource
.程序集变量 m_旧窗口函数, 整数型

.子程序 __启动窗口_创建完毕

图片框1.图片 ＝ #图片2
m_IDropTarget.注册拖放 (取窗口句柄 (), 0)

.子程序 __启动窗口_可否被关闭, 逻辑型



.子程序 _图片框1_鼠标左键被按下, 逻辑型
.参数 横向位置, 整数型
.参数 纵向位置, 整数型
.参数 功能键状态, 整数型

写到文件 (“data.jpg”, #图片2)
m_IDropSource.init (#CF_HDROP, 到字节集 (取运行目录 () ＋ “data.jpg”))

资源下载：