易语言编辑框删除行与行之间的空白行

.版本 2
 
.子程序 _按钮10_被单击
.局部变量 文本数组, 文本型, , "0"
.局部变量 计次, 整数型
 
 
文本数组 ＝ 分割文本 (编辑框15.内容, #换行符, )
.计次循环首 (取数组成员数 (文本数组), 计次)
    .如果真 (文本数组 [计次] ＝ “”)
        到循环尾 ()
    .如果真结束
    编辑框54.加入文本 (文本数组 [计次] ＋ #换行符)
    编辑框15.内容 ＝ 编辑框54.内容
 
.计次循环尾 ()