易语言调用api实现文件拖放获取路径的代码

拖放文件支持任意版本Windows系统

此功能需要加载精易模块5.6

.版本 2
.支持库 spec
.程序集 窗口程序集_启动窗口
.程序集变量 文件拖放类, 文件拖放
.子程序 __启动窗口_创建完毕
.局部变量 拖放处理, 子程序指针
文件拖放类.注册拖放 (_启动窗口.取窗口句柄 (), &拖放处理)
proc_FilterMsg ()
.子程序 拖放处理
.参数 总文件数量, 整数型
.参数 当前是第几个文件, 整数型
.参数 当前的文件名, 文本型
.参数 当前的文件类型, 文本型
调试输出 (总文件数量, 当前是第几个文件, 当前的文件名, 当前的文件类型)
.子程序 __启动窗口_将被销毁
文件拖放类.卸载拖放 (_启动窗口.取窗口句柄 ())
.子程序 proc_FilterMsg, , , 过滤消息,解决win10下以管理员身份运行不支持拖放的问题
.局部变量 vDllHwnd, 整数型
.局部变量 vthis, 整数型
vDllHwnd = LoadLibraryA (目录_取Windows目录 () + “SysWOW64\user32.dll”)
.如果真 (vDllHwnd = 0)
  返回 ()
.如果真结束
vthis = GetProcAddress (vDllHwnd, “ChangeWindowMessageFilter”)
Call (vthis, 563, 1)
Call (vthis, 74, 1)
Call (vthis, 73, 1)
FreeLibrary (vDllHwnd)
.子程序 Call, 整数型
.参数 子程序地址
.参数 参数1, , 可空
.参数 参数2, , 可空
.参数 参数3, , 可空
.参数 参数4, , 可空
.参数 参数5, , 可空
.参数 参数6, , 可空
.参数 参数7, , 可空
.参数 参数8, , 可空
.参数 参数9, , 可空
.参数 参数10, , 可空
.参数 参数11, , 可空
.参数 参数12, , 可空
.参数 参数13, , 可空
.参数 参数14, , 可空
.参数 参数15, , 可空
置入代码 ({ 86, 190, 15, 0, 0, 0, 141, 77, 8, 141, 76, 241, 252, 139, 65, 4, 133, 192, 116, 2, 255, 49, 78, 131, 233, 8, 133, 246, 117, 239, 255, 85, 8, 94, 201, 194, 124, 0 })
返回 (0)

运行结果:

总结

以上就是这篇文章的全部内容了,希望本文的内容对大家的学习或者工作具有一定的参考学习价值,谢谢大家对我们的支持。如果你想了解更多相关内容请查看下面相关链接

(0)

相关推荐

  • 易语言拖放对象组件应用详解

    易语言拖拽的命令,很简单,个人感觉比通用对话框方便 没多少命令手动打吧 启动窗口创建完毕 拖放对象1.注册拖放控件 (_启动窗口.取窗口句柄 ()) 启动窗口将被销毁 拖放对象1.撤消拖放控件 (_启动窗口.取窗口句柄 ()) 如果你要拖动文件到编辑框1 那么就 "拖放对象1.注册拖放控件 (编辑框1.取窗口句柄 ())" 要注意的是接收什么就要设什么为真 命令: 手动设置: 简单应用:

  • 易语言拖放组件使用技巧

    最近发现很多人拖放组件不会用,今天来做下教程,其实很简单.今天来教下文件读取器 1.这里我先打开易语言 2.创建一个窗口 把宽度设置到398,高度设置到377 大家也可以自己随意设置 3.放入一个拖放组件,没错,这个就是拖放组件 4.注意接收文本.文件都要真!!!! 5.我先画好界面 6.添加代码

  • 易语言调用api实现文件拖放获取路径的代码

    拖放文件支持任意版本Windows系统 此功能需要加载精易模块5.6 .版本 2 .支持库 spec .程序集 窗口程序集_启动窗口 .程序集变量 文件拖放类, 文件拖放 .子程序 __启动窗口_创建完毕 .局部变量 拖放处理, 子程序指针 文件拖放类.注册拖放 (_启动窗口.取窗口句柄 (), &拖放处理) proc_FilterMsg () .子程序 拖放处理 .参数 总文件数量, 整数型 .参数 当前是第几个文件, 整数型 .参数 当前的文件名, 文本型 .参数 当前的文件类型, 文本型

  • 易语言调用api枚举网卡名称并且获取信息的代码

    DLL命令表 .版本 2 .DLL命令 GetProcAddress, 整数型, "kernel32", "GetProcAddress", , 返回函数地址 .参数 hModule, 整数型 .参数 lpProcName, 文本型 .DLL命令 GetModuleHandle, 整数型, "kernel32", "GetModuleHandleA", , 获取一个应用程序或动态链接库的模块句柄 如执行成功成功,则返回模块句柄

  • 易语言调用API函数监视目录与文件的代码

    DLL命令表 .版本 2 .DLL命令 GetPrivateProfileInt, 整数型, , "GetPrivateProfileIntA" .参数 lpAppName, 文本型 .参数 lpKeyName, 文本型 .参数 nDefault, 整数型 .参数 lpFileName, 文本型 .DLL命令 GetPrivateProfileString, 整数型, , "GetPrivateProfileStringA" .参数 lpAppName, 文本型 .

  • 易语言调用api获取网卡信息网络连接名的代码

    DLL命令表 .版本 2 .DLL命令 GetAdaptersInfo, 整数型, "IPHlpApi" .参数 IpAdapterInfo, 字节集 .参数 pOutBufLen, 整数型, 传址 .DLL命令 取变量地址_字节集, 整数型, , "lstrcpynA" .参数 变量, 字节集, 传址 .参数 变量, 字节集, 传址 .参数 保留, 整数型, , 0 .DLL命令 CopyMemory_iai, , "kernel32", &q

  • 易语言调用墨迹天气实现自动定位获取天气情况的代码

    常量数据表 .版本 2 .常量 实况头, "<文本长度: 9>" .常量 实况尾, "<文本长度: 2>" .常量 更新时间头, "<文本长度: 28>" .常量 更新时间尾, "<文本长度: 9>" .常量 温度头, "<文本长度: 28>" .常量 温度尾, "<文本长度: 5>" .常量 空气质量头, &quo

  • 易语言高级表格选择任意行列获取内容的代码示例

    高级表格取选择任意行列的内容 .版本 2 .支持库 eGrid .程序集 窗口程序集1 .子程序 __启动窗口_创建完毕 高级表格1.置数据 (1, 1, #表格常量.文本型, "我") 高级表格1.置数据 (1, 2, #表格常量.文本型, "爱") 高级表格1.置数据 (1, 3, #表格常量.文本型, "你") 高级表格1.置数据 (1, 4, #表格常量.文本型, "你") 高级表格1.置数据 (1, 5, #表格常量

  • 易语言调用dll实现条形码本地离线识别的代码

    DLL命令表 需要提前下载用到命令对应的库 .版本 2 .DLL命令 OCR, 文本型, "AspriseVB.dll", "OCR" .参数 file, 文本型 .参数 imageType, 整数型 .DLL命令 OCRBarCodes, 文本型, "VBWrapper.dll", "OCRBarCodes" .参数 file, 文本型 .参数 imageType, 整数型 .DLL命令 OCRpart, 文本型, &quo

  • C++ 编写DLL文件给易语言调用方法

    摸索了两天了,终于解决了所有问题,在此跟大家分享. 需要三个文件,dll_demo.h.dll_demo.cpp.dll_dome.def 直接上代码: 头文件如下: #ifndef _DLL_DEMO_H_ #define _DLL_DEMO_H_ #ifdef DLLDEMO_EXPORTS #define DLL_DEMO extern "C" __declspec(dllexport) #else #define DLL_DEMO extern "C" __

  • 易语言调用JS代码方法总结

    以下是我们易语言调用JS代码的步骤 步骤1: 步骤2: 步骤3: 步骤4: 以上就是四个详细步骤,感谢大家对我们的支持.

  • 易语言调用易模块的方法

    易模块就是,易语言前辈把一些函数.常用的子程序. 编辑起来,方便新手学习! 1.打开易语言,里面,窗口程序.控制程序.动态连接库.易语言模块. 这里面可以用到模块的有[窗口程序.控制程序.动态连接库.]易语言模块是编写易模块的程序. 2.我们就以窗口程序程序进行操作,点击进入[双击]. 进入设计面板,点击[程序],在点击[模块引用],然后[添加模块] 1.使用方法 添加完毕模块!最好先更新下模快引用信息,让语言兼容! 添加完毕模块!最好先更新下模快引用信息,让语言兼容! 2.在打开易语言模块信息

随机推荐