易语言API对话框源码

系统结构:对话框_打开文件_多选,对话框_打开文件,对话框_保存文件,对话框_选择颜色,对话框_选择字体,对话框_浏览文件夹,对话框_重新启动提示,对话框_关机对话框,对话框_文件属性,对话框_运行,对话框_映射驱动,打开对话框,取实例句柄_,取打开文件名_,取保存文件名_,API_取结构长度,取得窗口结构信息,API_调色板,全局堆栈分配_,锁住全局内存块_,拷贝内存_,选择字体对话框_,拷贝内存1_,解锁全局内存块_,全局内存分配_,取文件夹特殊区域,浏览文件夹对话框,从列表id取路径,重新启动系统设置_,关机对话框_,设定执行文件,运行对话框,WNetConnectionDialog,

======程序集1
           |  |
           |  |------ 对话框_打开文件_多选
           |  |
           |  |------ 对话框_打开文件
           |  |
           |  |------ 对话框_保存文件
           |  |
           |  |------ 对话框_选择颜色
           |  |
           |  |------ 对话框_选择字体
           |  |
           |  |------ 对话框_浏览文件夹
           |  |
           |  |------ 对话框_重新启动提示
           |  |
           |  |------ 对话框_关机对话框
           |  |
           |  |------ 对话框_文件属性
           |  |
           |  |------ 对话框_运行
           |  |
           |  |------ 对话框_映射驱动
           |  |
           |  |
======窗口程序集1
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ _按钮_通用对话框_多选_被单击
           |  |
           |  |------ _按钮_通用对话框_打开_被单击
           |  |
           |  |------ _按钮_通用对话框_保存_被单击
           |  |
           |  |------ _按钮_对话框_选择颜色_被单击
           |  |
           |  |------ _按钮_对话框_浏览文件夹_被单击
           |  |
           |  |------ _按钮_对话框_选择字体_被单击
           |  |
           |  |------ _按钮_对话框_重启动提示_被单击
           |  |
           |  |------ _按钮_对话框_关机对话框_被单击
           |  |
           |  |------ _按钮_对话框_运行_被单击
           |  |
           |  |------ _按钮_对话框_文件属性_被单击
           |  |
           |  |------ _按钮_对话框_映射驱动_被单击
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   打开对话框
           |  |
           |  |---[dll]------   取实例句柄_
           |  |
           |  |---[dll]------   取打开文件名_
           |  |
           |  |---[dll]------   取保存文件名_
           |  |
           |  |---[dll]------   API_取结构长度
           |  |
           |  |---[dll]------   取得窗口结构信息
           |  |
           |  |---[dll]------   API_调色板
           |  |
           |  |---[dll]------   全局堆栈分配_
           |  |
           |  |---[dll]------   锁住全局内存块_
           |  |
           |  |---[dll]------   拷贝内存_
           |  |
           |  |---[dll]------   选择字体对话框_
           |  |
           |  |---[dll]------   拷贝内存1_
           |  |
           |  |---[dll]------   解锁全局内存块_
           |  |
           |  |---[dll]------   全局内存分配_
           |  |
           |  |---[dll]------   取文件夹特殊区域
           |  |
           |  |---[dll]------   浏览文件夹对话框
           |  |
           |  |---[dll]------   从列表id取路径
           |  |
           |  |---[dll]------   重新启动系统设置_
           |  |
           |  |---[dll]------   关机对话框_
           |  |
           |  |---[dll]------   设定执行文件
           |  |
           |  |---[dll]------   运行对话框
           |  |
           |  |---[dll]------   WNetConnectionDialog

调用的DLL命令:

.DLL命令 打开对话框, 整数型, "comdlg32.dll", "GetOpenFileNameA"
    .参数 OpenFile, 打开文件名

.DLL命令 取实例句柄_, 整数型, , "GetModuleHandleA"
    .参数 程序名, 文本型

.DLL命令 取打开文件名_, 整数型, "msvfw32.dll", "GetOpenFileNamePreview"
    .参数 格式, 打开文件名

.DLL命令 取保存文件名_, 整数型, "msvfw32.dll", "GetSaveFileNamePreviewA"
    .参数 格式, 打开文件名

.DLL命令 API_取结构长度, 整数型, "kernel32.dll", "LocalSize"
    .参数 hMem, 色盒

.DLL命令 取得窗口结构信息, 整数型, , "GetWindowWord"
    .参数 hwnd
    .参数 nIndex

.DLL命令 API_调色板, 逻辑型, "comdlg32.dll", "ChooseColorA"
    .参数 lpcc, 色盒

.DLL命令 全局堆栈分配_, 整数型, "kernel32", "GlobalAlloc"
    .参数 标志, 整数型
    .参数 字节, 整数型

.DLL命令 锁住全局内存块_, 整数型, "kernel32.dll", "GlobalLock"
    .参数 内存句柄, 整数型, , hMem

.DLL命令 拷贝内存_, 整数型, "kernel32", "RtlMoveMemory"
    .参数 目的地址, 整数型, , any
    .参数 源地址, 逻辑字体, , any
    .参数 复制尺寸, 整数型

.DLL命令 选择字体对话框_, 整数型, "comdlg32.dll", "ChooseFontA", , 建立一个字体选择对话框
    .参数 字体对话框结构, 选择字体

.DLL命令 拷贝内存1_, 整数型, "kernel32", "RtlMoveMemory"
    .参数 目的地址, 逻辑字体, 传址, any
    .参数 源地址, 整数型, , any
    .参数 复制尺寸, 整数型

.DLL命令 解锁全局内存块_, 整数型, "kernel32.dll", "GlobalUnlock"
    .参数 内存句柄, 整数型, , hMem

.DLL命令 全局内存分配_, 整数型, "kernel32", "GlobalFree"
    .参数 内存句柄, 整数型

.DLL命令 取文件夹特殊区域, , "shell32.dll", "SHGetFolderLocation", , $(b)
    .参数 窗口句柄, 整数型, , hwnd
    .参数 文件夹标识符, 整数型, , nFolder
    .参数 标志句柄, 整数型, , hToken
    .参数 标志, 整数型, , dwFlags
    .参数 项目标识符列表结构, 项目标识符列表, , ppidl

.DLL命令 浏览文件夹对话框, 整数型, "shell32.dll", "SHBrowseForFolderA", , $(b)
    .参数 浏览文件夹结构, 文件夹信息

.DLL命令 从列表id取路径, 整数型, "shell32.dll", "SHGetPathFromIDListA", , $(b)
    .参数 结构指针, 整数型, , pIdl
    .参数 路径, 文本型, 传址, pszPath

.DLL命令 重新启动系统设置_, 整数型, "shell32.dll", "#59", , #59
    .参数 窗口句柄, 整数型, , hOwner
    .参数 额外提示, 整数型, , sExtraPrompt
    .参数 标志, 整数型, , uFlags

.DLL命令 关机对话框_, 整数型, "shell32.dll", "#60", , #60
    .参数 参数, 整数型, , YourGuess

.DLL命令 设定执行文件, 整数型, "shell32.dll", "ShellExecuteEx"
    .参数 设定执行文件信息结构, 设定执行文件信息

.DLL命令 运行对话框, , "Shell32.dll", "#61"
    .参数 hOwner
    .参数 UnknownP1
    .参数 UnknownP2
    .参数 szTitle, 整数型, , 对话框的标题
    .参数 szPrompt, 整数型, , 对话框中的描述文字
    .参数 uFlags

.DLL命令 WNetConnectionDialog, , "mpr.dll", "WNetConnectionDialog"
    .参数 hWnd
    .参数 dwType