超级编辑框的方法汇总超级编辑框的所有行号,索引都从0开始编号命令名返回值类型用法举例备注取文本长度整数型超级编辑框1.取文本长度()回车算2个文本长度取行数整数型超级编辑框1.取行数()行号从0开始取行文本文本型超级编辑框1.取行文本()取首可视行整数型超级编辑框1.取首可视行()解释:返回编辑框中当前顶部可见第一行的行号,行号从0开始取行首位置整数型超级编辑框1.取行首位置()0 指定第一行，1 指定第二行，如果为 -1 ，则自动取当前光标所在行行号,默认值为-1取字符所在行整数型超级编辑框1.取字符所在行()如果为 -1 ，则自动取当前光标所在字符位置的行滚动无返回值超级编辑框1.滚动(2)垂直滚动多行编辑框中的内容显示区域,可为负数撤销无返回值超级编辑框1. 撤销()撤销可以无限制的。撤销到没有操作为止。可否撤销逻辑型超级编辑框1.可否撤销()=真清空撤消数据无返回值超级编辑框1.清空撤消数据()复制无返回值超级编辑框1.复制()剪切无返回值超级编辑框1.剪切()删除无返回值超级编辑框1.删除()粘贴无返回值超级编辑框1.粘贴()可否粘贴逻辑型超级编辑框1.可否粘贴 ()=真读入文档文本型路径编辑框.内容 = 内容超级编辑框.读入文档()取默认字符格式-置默认字符格式-取选择区字符格式-置选择区字符格式-取选择区段落格式-置选择区段落格式无法回执这几个暂时为测试可实现得到超级编辑框的字体,大小,颜色等,并可以让用户重新设置

.版本 2

.支持库 iext2

.支持库 jedi

.支持库 spec

.程序集 窗口程序集_启动窗口

.子程序 _按钮1_被单击

超级编辑框2.内容 ＝ “超级编辑框所有的行业和索引都从0开始” ＋ #换行符 ＋ “文本长度为:” ＋ 到文本 (超级编辑框1.取文本长度 ()) ＋ #换行符 ＋ “行数为:” ＋ 到文本 (超级编辑框1.取行数 ()) ＋ #换行符 ＋ “第三行文本为:” ＋ 到文本 (超级编辑框1.取行文本 (2)) ＋ #换行符 ＋ #换行符 ＋ “第一个可视行的行号为:” ＋ 到文本 (超级编辑框1.取首可视行 ()) ＋ #换行符 ＋ “鼠标所在行行首索引为:” ＋ 到文本 (超级编辑框1.取行首位置 ()) ＋ #换行符 ＋ “鼠标所在行的行号为:” ＋ 到文本 (超级编辑框1.取字符所在行 ()) ＋ #换行符

.子程序 _超级编辑框1_放开某键, 逻辑型

.参数 键代码, 整数型

.参数 功能键状态, 整数型

.如果 (键代码 ＝ #回车键)

超级编辑框1.滚动 (超级编辑框1.取行数 ())

.否则

.如果结束

.如果 (键代码 ＝ #C键 且 功能键状态 ＝ 1)

按钮_可否粘贴.禁止 ＝ 假

.否则

.如果结束

.子程序 _按钮_撤销_被单击

超级编辑框1.撤消 ()

.子程序 __启动窗口_创建完毕

按钮_撤销.禁止 ＝ 真

按钮_可否粘贴.禁止 ＝ 真

.子程序 _超级编辑框1_内容被改变

.如果 (超级编辑框1.可否撤消 () ＝ 真)

按钮_撤销.禁止 ＝ 假

.否则

信息框 (“到头了,无法在撤销了”, 0, , )

按钮_撤销.禁止 ＝ 真

.如果结束

.子程序 _按钮_清除撤销_被单击

超级编辑框1.清空撤消数据 ()

.子程序 _按钮_复制_被单击

超级编辑框1.复制 ()

.如果 (超级编辑框1.可否粘贴 () ＝ 真)

按钮_可否粘贴.禁止 ＝ 假

.否则

按钮_可否粘贴.禁止 ＝ 真

.如果结束

.子程序 _按钮_粘贴_被单击

超级编辑框1.粘贴 ()

.子程序 _按钮_剪贴_被单击

超级编辑框1.剪切 ()

.子程序 _按钮_删除_被单击

超级编辑框1.删除 ()

.子程序 _按钮_可否粘贴_被单击

.判断开始 (超级编辑框1.可否粘贴 () ＝ 真)

信息框 (“可以粘贴”, 0, , )

.默认

信息框 (“没有粘贴数据啊,先复制试试”, 0, , )

.判断结束

.子程序 _超级按钮_读入文档_被单击

文件名编辑框1.内容 ＝ 超级编辑框1.读入文档 ()

.子程序 _按钮2_被单击

调试输出 (超级编辑框1.寻找 (, , , 超级编辑框3.内容))

.子程序 _按钮_默认字体_被单击

.局部变量 取出默认字符格式, 字符格式

取出默认字符格式 ＝ 超级编辑框1.取默认字符格式 ()

超级编辑框_字体名称.内容 ＝ 取出默认字符格式.字体名称

超级编辑框_字体大小.内容 ＝ 到文本 (取出默认字符格式.字体大小)

.子程序 _按钮_置字体_被单击

.局部变量 设置默认字符格式, 字符格式

超级编辑框1.置默认字符格式 (设置默认字符格式)

设置默认字符格式.字体名称 ＝ 超级编辑框_字体名称.内容 '此处有误,待用到时在测试

设置默认字符格式.字体大小 ＝ 到数值 (超级编辑框_字体大小.内容)