易语言的拖放对象如何使用

易语言 拖放对象有什么用~

拖放对象有什么用？用了你就知道了，下面的源码！

.版本 2
.支持库 edroptarget
.支持库 eAPI

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

拖放对象1.接收文件 ＝ 真
拖放对象1.注册拖放控件 (取窗口句柄 ())

.子程序 _拖放对象1_得到文件
.参数 接收到的文件路径, 文本型
.局部变量 hwnd, 整数型

hwnd ＝ 取鼠标所在窗口句柄 ()
.判断开始 (hwnd ＝ 编辑框1.取窗口句柄 ())
编辑框1.内容 ＝ 接收到的文件路径
.判断 (hwnd ＝ 编辑框2.取窗口句柄 ())
编辑框2.内容 ＝ 到文本 (读入文件 (接收到的文件路径))
.默认
信息框 (“请拖放到编辑框，不要放在窗口啊！”, 0, )

“拖放对象1.接收文件 ＝ 真” 接收文本应该是 “拖放对象1.接收文本 ＝ 真”
编辑框1.内容 ＝ 接收到的文件路径

，拖放文本和拖放文件是完全不同的

不过根据你的代码应该是接收文件，那么“子程序 _拖放对象1_得到文本”就应该改成：

.版本 2

.子程序 _拖放对象1_得到文件
.参数 接收到的文件路径, 文本型

编辑框1.内容 ＝ 到文本 (读入文件 (接收到的文件路径))

.版本 2
.支持库 edroptarget
.支持库 eCompress.子程序 __启动窗口_创建完毕拖放对象1.注册拖放控件 (编辑框1.取窗口句柄 ())
.子程序 _拖放对象1_得到文件
.参数 接收到的文件路径, 文本型ZIP压缩1.解压 (接收到的文件路径, 取文本左边 (接收到的文件路径, 倒找文本 (接收到的文件路径, “\”, , 假)))

---

运河区19230947964： 易语言拖放对象怎么用 - ？
褚虽地奥： .版本 2 .支持库 edroptarget .支持库 eCompress.子程序 __启动窗口_创建完毕拖放对象1.注册拖放控件 (编辑框1.取窗口句柄 ()) .子程序 _拖放对象1_得到文件 .参数 接收到的文件路径, 文本型ZIP压缩1.解压 (接收到的文件路径, 取文本左边 (接收到的文件路径, 倒找文本 (接收到的文件路径, “\”, , 假)))

运河区19230947964： (易语言)如何使用拖放功能？
褚虽地奥： .版本 2 .支持库 edroptarget .子程序 __启动窗口_创建完毕 拖放对象1.接收文件 = 真 拖放对象1.注册拖放控件 (取窗口句柄 ()) .子程序 _拖放对象1_得到文件 .参数 接收到的文件路径, 文本型 图片框1.图片 = 读入文件 (接收到的文件路径) ...

运河区19230947964： 易语言 设置文件拖放 (, ) 这命令怎么用 就比如先把文本拖进编辑度框 怎么和标签配合使用啊 麻烦高人指点 - ？
褚虽地奥： 子程序 __启动窗口_创建完毕 拖放对象1.注册拖放控件 ()

运河区19230947964： 易语言中如何实现拖拽 - ？
褚虽地奥： .版本 2.支持库 edroptarget.程序集 窗口程序集1, , , 放个拖放对象设置接收文件为真即可运行本例程.子程序 __启动窗口_创建完毕 拖放对象1.注册拖放控件 (取窗口句柄 ()) ' 这里是需要使用拖拽功能的控件句柄,可通过 【控件名称.取窗口句柄()】 取得' 属性面板中的接收文本以及后面的3个都是设置支持拖拽的类型.子程序 _拖放对象1_得到文件, , , '当得到文件是,产生此事件,其他的与这里相同,在这里写事件代码就行了.参数 接收到的文件路径, 文本型 信息框 (“接收到文件”, 0, ) ' 这里是设置产生上面的事件后详细的代码!其他3类同理

运河区19230947964： 易语言 拖放对象有什么用 - ？
褚虽地奥： 拖放对象有什么用?用了你就知道了,下面的源码!.版本 2.支持库 edroptarget.支持库 eAPI.子程序 __启动窗口_创建完毕 拖放对象1.接收文件 = 真 拖放对象1.注册拖放控件 (取窗口句柄 ()).子程序 _拖放对象1_得到文件.参数 接收到的文件路径, 文本型.局部变量 hwnd, 整数型 hwnd = 取鼠标所在窗口句柄 ().判断开始 (hwnd = 编辑框1.取窗口句柄 ()) 编辑框1.内容 = 接收到的文件路径.判断 (hwnd = 编辑框2.取窗口句柄 ()) 编辑框2.内容 = 到文本 (读入文件 (接收到的文件路径)).默认 信息框 (“请拖放到编辑框,不要放在窗口啊!”, 0, )

运河区19230947964： 求给力程序员告诉我怎么使用易语言的“拖放对象”和“通用对话框”来达到选择字体的效果,如图..？
褚虽地奥： .版本 2 .程序集 窗口程序集1 .子程序 _按钮1_被单击 .如果真 (通用对话框1.打开 ()) 标签1.字体.字体名称 = 通用对话框1.字体名称 标签1.字体.字体大小 = 通用对话框1.字体大小 标签1.字体.加粗 = 通用对话框1.加粗 标签1.字体.倾斜 = 通用对话框1.倾斜 标签1.字体.下划线 = 通用对话框1.下划线 标签1.字体.删除线 = 通用对话框1.删除线 标签1.文本颜色 = 通用对话框1.字体颜色 ' 不存在“标签1.字体.字体颜色”之说.标签文字的颜色由其“文本颜色”属性控制. .如果真结束

运河区19230947964： 易语言怎么给一个窗口发送拖放事件的消息? - ？
褚虽地奥： 拖放对象1.注册拖放控件 (_启动窗口.取窗口句柄 ()) 拖放对象1.接收文件 = 真

运河区19230947964： 易语言拖放对象问题 - ？
褚虽地奥： 定义一个文本数组变量i _拖放对象1_得到文件 i=分割文本(接受到的文件路径,#换行符,) 几次循环(取数组成员(i),n)加入项目就好了.i[n] 循环尾.得到的多个文件是以换行符来分割开的...自己测试下就知道

运河区19230947964： 易语言拖放对象的问题!急急急？
褚虽地奥： 首先要创个数据库存路径,为后面的打开做准备拖放对象接受到文件时,把路径写到数据库,还有文件的一些信息也写到数据库.然后用一个命令取该文件的图标,也写入数据库(图片文件是字节集型),然后读出数据,让图片和一些数据显示在面板上.双击时,读出数据库中刚才存的路径,然后打开.源码我可以写好了给你,不过需要一定时间.还有你的QQ是拒绝被添加的......

运河区19230947964： 易语言中拖放对象的问题？
褚虽地奥： 首先第二个问题:创建顶级窗口菜单:.版本 2.程序集 窗口程序集1.程序集变量 菜单句柄.子程序 __启动窗口_创建完毕.局部变量 判断2菜单句柄 = CreateMenu ()判断2 = AppendMenuA (菜单句柄, 16, 1, “我是菜单”).如果真 (判断2 = 0) 信息框 (“创建菜单失败!”, 0, ) 返回 ().如果真结束SetMenu (_启动窗口.取窗口句柄 (), 菜单句柄)API声明可以自己添加.第一个问题没有说清除啊,补充一下.