彗星正则表达式调试工具

.计次循环首 (取数组成员数 (分行数组), i)
分列数组 ＝ 分割文本 (分行数组 [i], “{%|%}”, )
.如果真 (取数组成员数 (分列数组) ＝ 2)
x ＝ 超级列表框2.插入表项 (, 分列数组 [1], , , , )
超级列表框2.置标题 (x, 1, 分列数组 [2])
.如果真结束

.计次循环尾 ()
超级列表框2.置列宽 (1, 超级列表框2.取用户区宽度 () － 超级列表框2.取列宽 (0))
_功能按钮1_被单击 ()
_选择夹按钮1_被单击 ()
树型框1.清空 ()
清除数组 (例程说明)
添加例程 (“网页相关”, #例程_网页相关, 树型框1)
添加例程 (“特定号码”, #例程_号码相关, 树型框1)
添加例程 (“字符串相关”, #例程_字符串, 树型框1)
添加例程 (“彗星正则表达式类”, #模块说明, 树型框2)
添加子程序 (“模块子程序”, #模块子程序, 树型框2)
拖放对象1.注册拖放控件 (编辑框2.取窗口句柄 ())