易语言按钮标题到高级表格例程

.DLL命令 lstrcpyn, 整数型, , "lstrcpyn"
.参数 欲取其指针的文本, 文本型, 传址
.参数 欲取其指针的文本, 文本型, 传址
.参数 保留, 整数型, , 0

.子程序 _高级表格1_鼠标位置被移动, 逻辑型
.参数 横向位置, 整数型
.参数 纵向位置, 整数型
.参数 功能键状态, 整数型
.局部变量 行高, 整数型
.局部变量 列宽, 整数型
.局部变量 h, 整数型
.局部变量 l, 整数型

.如果真 (按下)
标题 ＝ 到文本 (横向位置)
行高 ＝ 高级表格1.行高
列宽 ＝ 高级表格1.列宽
h ＝ 取整 (纵向位置 ÷ 行高)
l ＝ 取整 (横向位置 ÷ 列宽)
高级表格1.置数据 (h, l, #表格常量.文本型, 标记)
标记 ＝ “”
按下 ＝ 假