易语言中如何实现拖拽

就是在卷帘菜单中,把文件的图标拖入到项目中,里边能显示文件的图标,单击时能运行文件

第1个回答  2010-03-17
.版本 2
.支持库 edroptarget

.程序集 窗口程序集1, , , 放个拖放对象设置接收文件为真即可运行本例程

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

拖放对象1.注册拖放控件 (取窗口句柄 ()) ' 这里是需要使用拖拽功能的控件句柄,可通过 【控件名称.取窗口句柄()】 取得
' 属性面板中的接收文本以及后面的3个都是设置支持拖拽的类型

.子程序 _拖放对象1_得到文件, , , ’当得到文件是,产生此事件,其他的与这里相同,在这里写事件代码就行了
.参数 接收到的文件路径, 文本型

信息框 (“接收到文件”, 0, ) ' 这里是设置产生上面的事件后详细的代码!其他3类同理本回答被网友采纳
第2个回答  2010-03-17
利用自带的拖放支持库就可以,就是那个带一个绿色箭头的那个.
相似回答