.版本 2
.程序集 窗口程序集1
.程序集变量 Word, 文本型
.程序集变量 Text, 文本型
.子程序 _按钮1_被单击
.局部变量 n, 整数型
.局部变量 i, 整数型
.局部变量 m, 整数型
.局部变量 横线, 文本型
.局部变量 横线1, 文本型
m = 编辑框1.宽度 ÷ 13
横线1 = “”
.计次循环首 (m, )
横线1 = 横线1 + “━”
.计次循环尾 ()
横线 = “”
.计次循环首 (m, )
横线 = 横线 + “─”
.计次循环尾 ()
Text = 横线1 + #换行符
n = 编辑框1.发送信息 (186, 0, 0)
.计次循环首 (n, i)
Word = 取空白文本 (255)
SendMessageStr (编辑框1.取窗口句柄 (), 196, i - 1, Word)
Text = Text + #换行符 + 横线 + #换行符 + 删尾空 (Word)
.计次循环尾 ()
Text = Text + #换行符 + 横线1
编辑框2.内容 = Text
.子程序 __启动窗口_创建完毕
易语言每行加横线
易语言代码编辑框行取文档线
易语言加横线