模块名称：高级表格扩展 模块作者：Life 模块版本：1.0 模块 MD5：83f82d137991379c37fd94ead48055c7 模块大小：219.53 KB 版权声明： 模块描述：高级表格扩展，实现公式自主化、单元格按钮及触发事件自主化、单元格嵌入组件自主化。 缺点：公式刷新算法未优化，导致部分嵌套公事的单元格不能重算。 引用支持库： 系统核心支持库 5.7|krnln|d09f2340818511d396f6aaf844c7e325 特殊功能支持库 3.1|spec|A512548E76954B6E92C21055517615B0 高级表格支持库 2.11|eGrid|0B4337DA651B4b619ACF61334A7E8B47 ------------------------------ .子程序 _HIword, 整数型, , 取高位 .参数 Par_lp, 整数型, , .子程序 _LOword, 整数型, , 取低位 .参数 Par_lp, 整数型, , .子程序 _取后缀名, , , 如：C:\Windows\calc.exe，返回exe .参数 文件路径, 文本型, , 如：C:\Windows\calc.exe .子程序 _取扩展名, 文本型, , 如：C:\Windows\calc.exe，返回calc.exe .参数 文件路径, 文本型, , 如：C:\Windows\calc.exe .子程序 _取文件名, 文本型, , 如：C:\Windows\calc.exe，返回calc .参数 文件路径, 文本型, , 如：C:\Windows\calc.exe .子程序 _取子程序指针, 整数型, , .参数 子程序指针, 子程序指针, , .子程序 _调用子程序, 整数型, , .参数 函数指针, 整数型, , .参数 参数一, 整数型, 可空 , .参数 参数二, 整数型, 可空 , .参数 参数三, 整数型, 可空 , .参数 参数四, 整数型, 可空 , .参数 参数五, 整数型, 可空 , .参数 参数六, 整数型, 可空 , .参数 参数七, 整数型, 可空 , .参数 参数八, 整数型, 可空 , .参数 参数九, 整数型, 可空 , .参数 参数十, 整数型, 可空 , .子程序 _指针到矩形, _RECT, , .参数 指针, 整数型, , .子程序 _置进度条颜色, , , .参数 句柄, 整数型, , .参数 新颜色, 整数型, , .数据类型 _Point, 公开, .成员 X, 整数型, , , .成员 Y, 整数型, , , .数据类型 _RECT, 公开, .成员 Left, 整数型, , , .成员 Top, 整数型, , , .成员 Right, 整数型, , , .成员 Bottom, 整数型, , , .数据类型 _矩形, 公开, .成员 Left, 整数型, , , .成员 Top, 整数型, , , .成员 Width, 整数型, , , .成员 Height, 整数型, , , .程序集 libMysql, , 公开 .程序集 高表类, , 公开 .子程序 保留小数位数, , , .参数 参数_高表行号, 整数型, 可空 , 留空，所有公式单元格 .参数 参数_高表列号, 整数型, 可空 , 留空，所有公式单元格 .参数 参数_保留小数位数, 整数型, , 默认4位 .子程序 别名取单元格, , , 不存时，行列号为-1 .参数 参数_别名, 文本型, , .参数 参数_行号, 整数型, 参考 , 提供容器 .参数 参数_列号, 整数型, 参考 , 提供容器 .子程序 别名取单元格公式, 文本型, , .参数 参数_别名, 文本型, , .参数 参数_行号, 整数型, 参考 可空 , 提供容器 .参数 参数_列号, 整数型, 参考 可空 , 提供容器 .子程序 初始化全部, , , 属性框除外 .子程序 更新高表, , , .参数 参数_高级表格, 高级表格, , .子程序 公式涉及单元格变色, , , 类初始化时，公式涉及单元格变色 .参数 参数_公式涉及单元格变色, 逻辑型, 可空 , .子程序 关联高表, , , 3 .参数 参数_高级表格, 高级表格, , .参数 参数_父窗口子类化接管, 逻辑型, 可空 , 默认为假。如果你已经子类化了顶级父窗口，请保持本参数为真，并在本函数之后，调用“子类化_父窗口()”在你自己的子类化函数中。 .子程序 静态取单元格位置, 逻辑型, , 相对于高表，假=单元格被隐藏，此时位置不可用。 .参数 参数_高表行号, 整数型, , .参数 参数_高表列号, 整数型, , .参数 参数_Rect, _RECT, , 提供容器 .子程序 控件取消激活后隐藏, , , 适用于“#按钮事件_自定义“回调函数中模拟弹出式的控件。 .参数 参数_控件句柄, 整数型, , .子程序 列表框插入项目, 整数型, , 插入指定项目到列表框的指定位置处，成功返回插入后该项目位置索引，失败返回 -1 。 .参数 参数_欲插入的位置, 整数型, , -1为列表框尾部。 .参数 参数_欲插入的项目文本, 文本型, , .参数 参数_项目数值, 整数型, 可空 , .子程序 列表框查找项目, 整数型, , 查找具有指定文本的表项，成功返回被找到表项的位置索引，失败返回 -1 。 .参数 参数_欲查找项目文本, 文本型, , .参数 参数_起始查找位置, 整数型, 可空 , 索引从0开始 .子程序 列表框加入项目, 整数型, , 尾部加入 .参数 参数_项目文本, 文本型, , .参数 参数_项目数值, 整数型, 可空 , .子程序 列表框精确查找, 整数型, , 本消息必须整个字符串相同,未找到则返回－1。 .参数 参数_欲查找项目文本, 文本型, , .子程序 列表框匹配项目, 整数型, , 在所有项目中寻找首部包含指定文本的项目，如找到，则选中它，并返回该项目的位置索引，否则返回 -1 。 .参数 参数_欲选择的项目文本, 文本型, , .子程序 列表框清空, , , .子程序 列表框取项目数, 整数型, , 获得列表框中条目的数量， .子程序 列表框取项目数值, 整数型, , 返回与指定项目相关联的数值。如果指定项目不存在，将返回 -1 。 .参数 参数_项目索引, 整数型, , .子程序 列表框取项目文本, 文本型, , 返回指定项目的文本。如果指定项目不存在，将返回空文本。 .参数 参数_项目索引, 整数型, , 0 为项目一，1 为项目二，如此类推。 .子程序 列表框置焦点, 逻辑型, , 用于列表框中设置键盘输入焦点到指定表项,成功返回真，失败返回假。 .参数 参数_项目索引, 整数型, , .子程序 列表框置项目数值, 逻辑型, , 设置与指定项目相关联的数值。成功返回真，失败返回假。 .参数 参数_项目索引, 整数型, , 0 为项目一，1 为项目二，如此类推。 .参数 参数_项目数值, 整数型, , .子程序 清空所有别名, , , .子程序 清空所有公式, , , .子程序 取单元格别名, 文本型, , .参数 参数_高表行号, 整数型, , .参数 参数_高表列号, 整数型, , .参数 参数_可视状态, 逻辑型, 参考 可空 , 提供容器 .子程序 取单元格公式, 文本型, , .参数 参数_高表行号, 整数型, , .参数 参数_高表列号, 整数型, , .子程序 取首活动行列号, , , .参数 参数_首活动行号, 整数型, 参考 可空 , 提供容器 .参数 参数_首活动列号, 整数型, 参考 可空 , 提供容器 .子程序 删除单元格按钮, 逻辑型, , .参数 参数_高表行号, 整数型, , .参数 参数_高表列号, 整数型, , .子程序 删除单元格公式, , , .参数 参数_高表行号, 整数型, , .参数 参数_高表列号, 整数型, , .子程序 删除单元格已绑控件, 逻辑型, , .参数 参数_高表行号, 整数型, , .参数 参数_高表列号, 整数型, , .子程序 属性框_初始化, , , 高表将被设置为3列，首列是三角符号，第二列是属性标题，第三列是属性值。必须在高表“可否被编辑 ()”事件中调用“同步事件_可否被编辑 ()”。 .参数 参数_分组背景色, 整数型, , .参数 参数_分组字体色, 整数型, , .参数 参数_项目背景色, 整数型, , .参数 参数_项目字体色, 整数型, , .参数 参数_选中项目字体色, 整数型, 可空 , .参数 参数_基准行高, 整数型, , 所有行高均被初始化为此值。 .子程序 属性框_取ID行号, 整数型, , 返回-1失败 .参数 参数_ID, 整数型, , .子程序 属性框_取父, , , .参数 参数_项目ID, 整数型, , .参数 参数_返回父行号, 整数型, 参考 可空 , 提供容器，无父返回-1 .参数 参数_返回父ID, 整数型, 参考 可空 , 提供容器，无父返回-1 .子程序 属性框_取行ID, 整数型, , 返回0失败 .参数 参数_行号, 整数型, , .子程序 属性框_去除属性框类型, , , 去除属性框类型后要再次启用，须调用“属性框_初始化（）”。 .子程序 属性框_添加项目, 整数型, , 返回项目ID值。 .参数 参数_为分组, 逻辑型, , 项目=假 .参数 参数_父ID, 整数型, , 0为顶层项目，否则为父的子项目。指定父不存在时，独立为一个顶层分组或顶层项目。 .参数 参数_自定义标识, 整数型, 可空 , 保持标记具有唯一性，切莫与其它标记相同。响应常量“#按钮事件_自定义” .参数 参数_标题, 文本型, , .参数 参数_可编辑, 逻辑型, , 仅为项目时 .参数 参数_按钮标题, 文本型, 可空 , 默认下拉三角。 .参数 参数_按钮宽, 整数型, 可空 , 默认20。 .参数 参数_按钮事件类型, 整数型, 可空 , 常量：#按钮事件_ .参数 参数_按钮事件, 子程序指针, 可空 , 按钮回调函数原型（ 整数型 事件类型, 整数型 返回数据指针, 整数型 触发事件的行列号, 整数型 列表项目数值）。 .参数 参数_项目数值, 双精度小数, 可空 , .参数 参数_项目备注, 文本型, 可空 , .参数 参数_项目数据, 字节集, 可空 , .子程序 刷新公式单元格, , , .参数 参数_高表行号, 整数型, 可空 , 留空，所有公式单元格 .参数 参数_高表列号, 整数型, 可空 , 留空，所有公式单元格 .子程序 同步动作_插入行, , , 插入行后必须调用本函数。 .参数 参数_插入位置, 整数型, , .子程序 同步动作_插入列, , , 插入列后必须调用本函数。 .参数 参数_插入位置, 整数型, , .子程序 同步事件_行高被改变, , , .参数 参数_行号, 整数型, , 被改变的行号 .子程序 同步事件_将被编辑, , , .子程序 同步事件_结束编辑, , , .子程序 同步事件_可否被编辑, 逻辑型, , .子程序 同步事件_列宽被改变, , , .参数 参数_列号, 整数型, , 被改变的列号 .子程序 同步事件_鼠标位置被移动, , , .参数 参数_横向位置, 整数型, , .参数 参数_纵向位置, 整数型, , .参数 参数_鼠标所处行号, 整数型, 参考 可空 , 提供容器，不在单元格内返回-1 .参数 参数_鼠标所处列号, 整数型, 参考 可空 , 提供容器，不在单元格内返回-1 .参数 参数_鼠标所处矩形, _RECT, 可空 , 提供容器，坐标以高表左上角为原点 .参数 参数_被表头遮蔽的行数, 整数型, 参考 可空 , 提供容器，滚动被遮蔽的行。 .参数 参数_被表头遮蔽的列数, 整数型, 参考 可空 , 提供容器，滚动被遮蔽的列。 .子程序 依单元格别名置按钮标题, 逻辑型, , .参数 参数_单元格别名, 文本型, , .参数 参数_标题, 文本型, , .子程序 依单元格别名置按钮可用, , , .参数 参数_单元格别名, 文本型, , .参数 参数_是否可用, 逻辑型, 可空 , 默认可用，否则禁止。 .子程序 依单元格别名置按钮目的, 逻辑型, , .参数 参数_单元格别名, 文本型, , .参数 参数_目的, 整数型, , 常量“按钮事件_***” .子程序 允许输入公式, , , 类初始化时，允许输入公式 .参数 参数_允许输入公式, 逻辑型, 可空 , .子程序 置别名单元格数据, 逻辑型, , .参数 参数_单元格别名, 文本型, , .参数 参数_单元格数据, 文本型, , .子程序 置单元格按钮, , , .参数 参数_高表行号, 整数型, , .参数 参数_高表列号, 整数型, , .参数 参数_自定义标记, 整数型, 可空 , 保持标记具有唯一性，切莫与其它标记相同。响应常量“#按钮事件_自定义” .参数 参数_标题, 文本型, 可空 , 默认下拉钮使用“Marlett”或“Webdings”字体字符“6”。不为空时使用系统字体。 .参数 参数_宽度, 整数型, , .参数 参数_是否可用, 逻辑型, 可空 , 默认可用，否则禁止。 .参数 参数_目的, 整数型, , 常量“按钮事件_***” 。 .参数 参数_事件回调子程序, 子程序指针, , 按钮回调函数原型（ 整数型 事件类型, 整数型 返回数据指针, 整数型 触发事件的行列号, 整数型 列表项目数值）。 .子程序 置单元格按钮标题, 逻辑型, , .参数 参数_高表行号, 整数型, , .参数 参数_高表列号, 整数型, , .参数 参数_标题, 文本型, , .子程序 置单元格按钮可用, , , .参数 参数_高表行号, 整数型, , .参数 参数_高表列号, 整数型, , .参数 参数_是否可用, 逻辑型, 可空 , 默认可用，否则禁止。 .子程序 置单元格按钮目的, 逻辑型, , .参数 参数_高表行号, 整数型, , .参数 参数_高表列号, 整数型, , .参数 参数_目的, 整数型, , 常量“按钮事件_***” .子程序 置单元格别名, , , .参数 参数_高表行号, 整数型, , .参数 参数_高表列号, 整数型, , .参数 参数_高表单元格别名, 文本型, , .参数 参数_单元格为空时显示别名, 逻辑型, 可空 , 默认不显示 .参数 参数_别名字体颜色, 整数型, 可空 , 默认#灰色 .子程序 置单元格别名可见, , , .参数 参数_高表行号, 整数型, , .参数 参数_高表列号, 整数型, , .参数 参数_单元格为空时显示别名, 逻辑型, , .子程序 置单元格公式, , , 必须在高表“结束编辑”事件下调用“同步事件_结束编辑（）”函数，否则公式结果不会自动计算。 .参数 参数_高表行号, 整数型, , .参数 参数_高表列号, 整数型, , .参数 参数_公式, 文本型, , 引用单元格形式：1:2(行1，列2)，13:8(行13，列8)；单元格公式举例：=1:1*(2:1+3.14)+3:1*5 (必须以=开头)；运算符号：*(乘)，/(除)，+(加)，-(减)，()(括号)，Sin()，Cos()，Tan()，Cot()，Ln()，Lg()，Log()，Arctan()，Exp()，Sqrt()(求平方根)，Pow(x,y)(求x的y次方)。 .参数 参数_保留小数位数, 整数型, , 默认4位 .子程序 置单元格控件, , , 给制定单元格绑定控件，一个控件只能绑定一个单元格。受易语言高表的限制，控件置高表为父后，自身的事件可能失效，请谨慎使用。 .参数 参数_高表行号, 整数型, , .参数 参数_高表列号, 整数型, , .参数 参数_控件句柄, 整数型, , 控件替代原控件，原控件将被隐藏。(高表的消息管控致使子窗口部分消息失效，部分事件失效。) .参数 参数_可视, 逻辑型, , .参数 参数_对齐方式, 整数型, 可空 , #左边框(保持宽不变)=1，#上边框(保持高不变)=2，#右边框(保持宽不变)=4，#下边框(保持高不变)=8，居中（默认,自适应单元格尺寸）=0，保持原尺寸不变=-1 .参数 参数_回调子程序, 子程序指针, 可空 , 进入编辑状态时，触发回调。函数原型（ 整数型 事件类型, 整数型 单元格矩形(RtlMoveMemory_Rect()函数获取), 整数型 触发事件的行列号(低字行号，高字列号)）。 .子程序 置单元格列表, , , .参数 参数_高表行号, 整数型, , .参数 参数_高表列号, 整数型, , .参数 参数_项目文本, 文本型, 数组, .参数 参数_项目数值, 整数型, 数组, .参数 参数_动态填充表项子程序, 子程序指针, 可空 , 输入内容，动态填充列表。回调函数原型（整数型 列表框句柄, 整数型 当前输入文本指针(“指针到文本()”函数获取结果)） .参数 参数_选中项目事件回调子程序, 子程序指针, , 按钮回调函数原型( 整数型 事件类型, 整数型 返回数据指针(“指针到文本()”函数获取结果), 整数型 触发事件的行列号, 整数型 列表项目数值 )。 .子程序 置控件可视, , , .参数 参数_控件句柄, 整数型, , .参数 参数_可视, 逻辑型, , .子程序 子类化_父窗口, 整数型, , 6 .参数 hwnd, 整数型, , .参数 msg, 整数型, , .参数 wParam, 整数型, , .参数 lParam, 整数型, , .子程序 自动行高列宽, , , 可以通过双击表头实现，或其它动作。 .参数 参数_行号, 整数型, , .参数 参数_列号, 整数型, , .参数 参数_行高或列宽, 逻辑型, 可空 , （为空）行高=真，列宽=假。 .DLL命令 IsBadStringPtr, 整数型, "kernel32.dll", "IsBadStringPtrA", 公开, 确定指针的合法性 .参数 lpsz, 整数型, , 指针 .参数 ucchMax, 整数型, , 指针长度 4 .DLL命令 MapWindowPoints_Rect, 整数型, "", "MapWindowPoints", 公开, .参数 hwndFrom, 整数型, , 源坐标的窗口 .参数 hwndTo, 整数型, , 目标坐标的窗口 .参数 lppt, _RECT, , .参数 cPoints, 整数型, , .DLL命令 PostMessage, , "", "PostMessageA", 公开, .参数 hwnd, 整数型, , .参数 wMsg, 整数型, , .参数 wParam, 整数型, , .参数 lParam, 整数型, , .DLL命令 RtlMoveMemory_Rect, 整数型, "", "RtlMoveMemory", 公开, 复制地址所指的矩形 .参数 Destination, _RECT, , 目标 .参数 Source, 整数型, , 源指针 .参数 Length, 整数型, , 结构长度16 .DLL命令 SendMessage, 整数型, "user32", "SendMessageA", 公开, .参数 hwnd, 整数型, , .参数 wMsg, 整数型, , .参数 wParam, 整数型, , .参数 lParam, 整数型, , .常量 按钮事件_下拉列表框, "2", 公开, 回调函数中，第一个参数是事件类型（见常量"按钮事件_***"），第二个参数是选中项目文本指针("指针到文本()" 函数获取结果)，第三个参数是触发行列号（低位行号，高位列号），第四个参数是自定义标记值，第五个参数是选中项目数值。 .常量 按钮事件_颜色选择框, "1", 公开, 回调函数中，第一个参数是事件类型（见常量"按钮事件_***"），第二个参数是为颜色字节集指针，使用函数“指针到字节集（参数_数据指针,16）”获取，第三个参数是触发行列号（低位行号，高位列号），第四个参数是自定义标记值。 .常量 按钮事件_自定义, "3", 公开, 回调函数中，第一个参数是事件类型（见常量"按钮事件_***"），第二个参数是触发单元格矩形（RtlMoveMemory_Rect（）函数获取），第三个参数是触发行列号（低位行号，高位列号），第四个参数是自定义标记值。 .常量 子程序模版, "<文本长度: 3533>", 公开, 复制如下代码粘贴，修改高表名称、变量名称即可。