实现文件拖放
系统结构:子程序1,子程序2,禁止拖放,拖放文件,拖放回调,拖放结果,取文件名,取文件路径,置窗口特征,执行窗口程序,回调显示,设置窗口是否接受拖放,取被拖放文件数,结束拖放,
======启动程序
| |
| |------ _启动子程序
| |
| |------ _临时子程序
| |
| |
======窗口程序集1
| |
| |------ _窗口1_创建完毕
| |
| |------ _按钮1_被单击
| |
| |------ _按钮2_被单击
| |
| |------ 子程序1
| |
| |------ 子程序2
| |
| |
======文件拖放程序集
| |
| |------ 禁止拖放
| |
| |------ 拖放文件
| |
| |------ 拖放回调
| |
| |------ 拖放结果
| |
| |
======自定义函数
| |
| |------ 取文件名
| |
| |------ 取文件路径
| |
| |
======调用的Dll
| |
| |---[dll]------ 置窗口特征
| |
| |---[dll]------ 执行窗口程序
| |
| |---[dll]------ 回调显示
| |
| |---[dll]------ 设置窗口是否接受拖放
| |
| |---[dll]------ 取被拖放文件数
| |
| |---[dll]------ 结束拖放
调用的DLL命令:
.DLL命令 置窗口特征, 整数型, , "SetWindowLongA", , 置窗口特征
.参数 hWnd, 整数型
.参数 nIndex, 整数型
.参数 dwNewLong
.DLL命令 执行窗口程序, 整数型, , "CallWindowProcA", , 执行窗口程序
.参数 lpPrevWndFunc
.参数 hWnd, 整数型
.参数 Msg, 整数型
.参数 wParam, 整数型
.参数 lParam, 整数型
.DLL命令 回调显示, 整数型, , "CallWindowProcA", , 执行窗口程序
.参数 lpPrevWndFunc, 子程序指针
.参数 hWnd, 文本型
.参数 Msg, 文本型
.参数 wParam, 整数型
.参数 lParam, 整数型
.DLL命令 设置窗口是否接受拖放, 整数型, "shell32.dll", "DragAcceptFiles"
.参数 hWnd, 整数型
.参数 fAccept, 整数型
.DLL命令 取被拖放文件数, 整数型, "shell32.dll", "DragQueryFileA"
.参数 hDrop, 整数型
.参数 iFile, 整数型
.参数 lpszFile, 文本型
.参数 cch, 整数型
.DLL命令 结束拖放, 整数型, "shell32.dll", "DragFinish"
.参数 hDrop, 整数型
易语言系统盘符修改器源码,遍历卷,DeleteVolumeMountPoint,GetVolumePathNamesForVolumeName,SetVolumeMountPoint,FindFirstVolume,FindNextVolume,FindVolumeClose,MessageBox...
易语言类的使用将多线程操作封装到类源码,取数子程序100,取数子程序10,取数子程序_10,取数子程序_100,初始组件,创建许可证,删除许可证...
易语言用空格分割文本源码,子程序_启动线程,子程序_创建进入许可证,子程序_删除进入许可证,子程序_进入许可区,子程序_退出许可区,子程序_等待线程,子程序_挂起线程,子程序_继续执行...
易语言编写QQ邮件发送器V10e源码,易语言编写QQ邮件发送器V10e...
易语言系统盘符修改器源码,遍历卷,DeleteVolumeMountPoint,GetVolumePathNamesForVolumeName,SetVolumeMountPoint,FindFirstVolume,FindNextVolume,FindVolumeClose,MessageBox...
取随机文本,取随机时间,排序列表,CompareFunc,比较时间,取文本地址,取日期时间地址,lstrcmpA...
TextEffect,timeGetTime,SetTextCharacterExtra,OffsetRect,SetTextColor,FillRect,CreateSolidBrush,DeleteObject,GetSysColor,TextOut,DrawText,OleTranslateColor,GetDC,lstrlen,ReleaseDC,CreateFont,MulDiv,GetDeviceCaps,SelectObject...
易语言屏幕笼罩源码,屏幕笼罩...
易语言透明桌面软件研究源码,透明桌面软件研究,MakeTrans,设主窗透明度,Ansi转Unicode,BitBlt,DeleteObject,SetWindowLong,AlphaBlend,UpdateLayeredWindow,CreateDIBSection,GetDIBits,SetDIBits,CreateCompatibleDC,SelectObject,DeleteDC,CopyMemory,SetWi...