易语言程序百宝箱源码
系统结构:通过句柄取图标,初始化颜色表,CaptureDC,GetBitsAddress,GetBitsSize,BytesPerLine,Create,SetPixelColor,GetBitmapInfoAddress,GetWidth,GetHeight,WIDTHBYTES,GetColorTableAddress,GetBitCount,BMP文件头转字节集,BMP信息头转字节集,CNoColorTable,GetColorTableSize,NumDIBColorEntries,Write,SHGetFileInfo,SHBrowseForFolderA,SHGetPathFromIDListA,CoTaskMemFree,ILCreateFromPath,SHOpenFolderAndSelectItems,ShellExecuteEx,GetDC,CreateCompatibleDC,CreateSolidBrush,FillRect,DeleteDC,CreateDIBSection,BitBlt,GdiFlush,CreateCompatibleBitmap,DrawIconEx,SelectObject,ReleaseDC,DeleteObject,RtlMoveMemory_int,lstrcpyn,
======窗口程序集1
| |
| |------ __启动窗口_创建完毕
| |
| |------ _窗口_百宝箱_初始化
| |
| |------ _图片组初始化
| |
| |------ _按钮_全部分类_被单击
| |
| |------ _填充事件
| |
| |------ _填充
| |
| |------ _加入图标
| |
| |------ _按钮_添加分类_被单击
| |
| |------ _按钮_修改分类_被单击
| |
| |------ _按钮_删除分类_被单击
| |
| |------ _显示对话框
| |
| |------ _按钮_添加工具_被单击
| |
| |------ _标签_标题_鼠标左键被按下
| |
| |------ _按钮_取消_被单击
| |
| |------ _按钮_确定_被单击
| |
| |------ _刷新
| |
| |------ _按钮_添加目录_被单击
| |
| |------ _纵向滚动条1_位置被改变
| |
| |------ __启动窗口_尺寸被改变
| |
| |------ _按钮_添加网址_被单击
| |
| |------ _按钮_删除选中_被单击
| |
| |------ _超级列表框1_右键单击表项
| |
| |------ _超级列表框1_被双击
| |
| |------ _运行
| |
| |------ _文件定位
| |
| |------ _查看属性
| |
| |------ _打开_被选择
| |
| |------ _用记事本打开_被选择
| |
| |------ _复制名称_被选择
| |
| |------ _复制路径_被选择
| |
| |------ _打开所在文件夹_被选择
| |
| |------ _删除_被选择
| |
| |------ _重命名_被选择
| |
| |------ _属性_被选择
| |
| |------ 通过句柄取图标
| |
| |
======位图操作类
| |
| |------ _初始化
| |
| |------ _销毁
| |
| |------ 初始化颜色表
| |
| |------ CaptureDC
| |
| |------ GetBitsAddress
| |
| |------ GetBitsSize
| |
| |------ BytesPerLine
| |
| |------ Create
| |
| |------ SetPixelColor
| |
| |------ GetBitmapInfoAddress
| |
| |------ GetWidth
| |
| |------ GetHeight
| |
| |------ WIDTHBYTES
| |
| |------ GetColorTableAddress
| |
| |------ GetBitCount
| |
| |------ BMP文件头转字节集
| |
| |------ BMP信息头转字节集
| |
| |------ CNoColorTable
| |
| |------ GetColorTableSize
| |
| |------ NumDIBColorEntries
| |
| |------ Write
| |
| |
======调用的Dll
| |
| |---[dll]------ SHGetFileInfo
| |
| |---[dll]------ SHBrowseForFolderA
| |
| |---[dll]------ SHGetPathFromIDListA
| |
| |---[dll]------ CoTaskMemFree
| |
| |---[dll]------ ILCreateFromPath
| |
| |---[dll]------ SHOpenFolderAndSelectItems
| |
| |---[dll]------ ShellExecuteEx
| |
| |---[dll]------ GetDC
| |
| |---[dll]------ CreateCompatibleDC
| |
| |---[dll]------ CreateSolidBrush
| |
| |---[dll]------ FillRect
| |
| |---[dll]------ DeleteDC
| |
| |---[dll]------ CreateDIBSection
| |
| |---[dll]------ BitBlt
| |
| |---[dll]------ GdiFlush
| |
| |---[dll]------ CreateCompatibleBitmap
| |
| |---[dll]------ DrawIconEx
| |
| |---[dll]------ SelectObject
| |
| |---[dll]------ ReleaseDC
| |
| |---[dll]------ DeleteObject
| |
| |---[dll]------ RtlMoveMemory_int
| |
| |---[dll]------ lstrcpyn
调用的DLL命令:
.DLL命令 SHGetFileInfo, 整数型, , "SHGetFileInfo"
.参数 pszPath, 文本型
.参数 dwFileAttributes, 整数型
.参数 psfi, SHFILEINFO
.参数 cbFileInfo, 整数型
.参数 uFlags, 整数型
.DLL命令 SHBrowseForFolderA, 整数型, "shell32.dll", "SHBrowseForFolderA", , 浏览文件夹对话框
.参数 浏览文件夹结构, BROWSEINFO
.DLL命令 SHGetPathFromIDListA, 整数型, "shell32.dll", "SHGetPathFromIDListA", , 从列表id取路径
.参数 结构指针, 整数型, , pIdl
.参数 路径, 文本型, 传址, pszPath
.DLL命令 CoTaskMemFree, , "ole32.dll", "CoTaskMemFree", , 释放分配内容
.参数 内存块指针, 整数型, , pv
.DLL命令 ILCreateFromPath, 整数型, "Shell32", "ILCreateFromPathA"
.参数 lpFileName, 文本型, , 文件路径
.DLL命令 SHOpenFolderAndSelectItems, 整数型
.参数 pidlFolder, 整数型
.参数 cidl, 整数型
.参数 apidl, 整数型
.参数 dwFlags, 整数型
.DLL命令 ShellExecuteEx, 整数型, "shell32.dll", "ShellExecuteEx", 公开, 设定执行文件
.参数 ShellExecuteEx, SHELLEXECUTEINFO, 传址, 设定执行文件信息结构
.DLL命令 GetDC, 整数型, "user32", "GetDC", , 获取指定窗口的设备场景 指定窗口的设备场景句柄，出错则为0
.参数 hwnd, 整数型, , 将获取其设备场景的窗口的句柄。若为0，则要获取整个屏幕的DC;
.DLL命令 CreateCompatibleDC, 整数型, "gdi32.dll", "CreateCompatibleDC", 公开, 新设备场景句柄，若出错则为零
.参数 hdc, 整数型, , hdc，源设备场景句柄
.DLL命令 CreateSolidBrush, 整数型, "gdi32", "CreateSolidBrush", , 用纯色创建一个刷子 如执行成功，返回新刷子的一个句柄；否则返回零
.参数 crColor, 整数型, , 数字的RGB彩色;
.DLL命令 FillRect, 整数型, "user32", "FillRect", , 用指定的刷子填充一个矩形 非零表示成功，零表示失败。会设置GetLastError
.参数 hdc, 整数型, , 设备场景的句柄
.参数 lpRect, RECT, , RECT，对填充区域进行描述的一个矩形，采用逻辑坐标
.参数 hBrush, 整数型, , 欲使用的刷子的句柄;
.DLL命令 DeleteDC, 整数型, , , , 删除专用设备场景或信息场景，释放所有相关窗口资源。不要将它用于GetDC函数取回的设备场景
.参数 hdc, 整数型
.DLL命令 CreateDIBSection, 整数型, "gdi32.dll", "CreateDIBSection"
.参数 hDC, 整数型
.参数 pBitmapInfo, 字节集, 传址
.参数 un, 整数型
.参数 lplpVoid, 整数型, 传址
.参数 handle, 整数型
.参数 dw, 整数型
.DLL命令 BitBlt, 整数型, "gdi32.dll", "BitBlt"
.参数 hDestDC, 整数型
.参数 x, 整数型
.参数 y, 整数型
.参数 nWidth, 整数型
.参数 nHeight, 整数型
.参数 hSrcDC, 整数型
.参数 xSrc, 整数型
.参数 ySrc, 整数型
.参数 dwRop, 整数型
.DLL命令 GdiFlush, 整数型, "gdi32.dll", "GdiFlush", , 执行任何未决的绘图操作,如所有未决的绘图操作都成功完成，就返回TRUE（非零）。如任何一个操作失败，就返回零值
.DLL命令 CreateCompatibleBitmap, 整数型, "gdi32.dll", "CreateCompatibleBitmap", 公开, 执行成功返回位图句柄，零表示失败
.参数 hdc, 整数型, , 设备场景句柄
.参数 nWidth, 整数型, , 位图宽度
.参数 nHeight, 整数型, , 位图高度
.DLL命令 DrawIconEx, 整数型, , "DrawIconEx", 公开, 描绘一个图标或鼠标指针
.参数 hdc
.参数 xLeft
.参数 yTop
.参数 hIcon
.参数 cxWidth
.参数 cyWidth
.参数 istepIfAniCur
.参数 hbrFlickerFreeDraw
.参数 diFlags
.DLL命令 SelectObject, 整数型, "gdi32.dll", "SelectObject", 公开, 选入设备场景
.参数 场景句柄, 整数型, , hdc
.参数 对象句柄, 整数型, , hobject
.DLL命令 ReleaseDC, 整数型, "user32", "ReleaseDC", , 释放由调用GetDC或GetWindowDC函数获取的指定设备场景。它对类或私有设备场景无效（但这样的调用不会造成损害） 执行成功为1，否则为0
.参数 hwnd, 整数型, , 要释放的设备场景相关的窗口句柄
.参数 hdc, 整数型, , 要释放的设备场景句柄;
.DLL命令 DeleteObject, 整数型, "gdi32.dll", "DeleteObject", 公开, 删除对象 用这个函数删除GDI对象，比如画笔、刷子、字体、位图、区域以及调色板等等。对象使用的所有系统资源都会被释放 非零表示成功，零表示失败
.参数 hObject, 整数型, , 一个GDI对象的句柄;
.DLL命令 RtlMoveMemory_int, , "Kernel32.dll", "RtlMoveMemory", , 复制内存(无返回值)
.参数 Destination, 整数型, , 目的指针
.参数 Source, 整数型, , 源指针
.参数 Length, 整数型, , 复制长度
.DLL命令 lstrcpyn, 整数型, "kernel32", "lstrcpynA", , 取内存变量地址
.参数 lpString1, 字节集, 传址, 传址
.参数 lpString2, 字节集, 传址
.参数 iMaxLength, 整数型
注:本站源码主要来源于网络收集。如有侵犯您的利益，请联系我们，我们将及时删除！
部分源码可能含有危险代码，（如关机、格式化磁盘等），请看清代码在运行。
由此产生的一切后果本站均不负责。源码仅用于学习使用，如需运用到商业场景请咨询原作者。
使用本站源码开发的产品均与本站无任何关系，请大家遵守国家相关法律。