易语言删除文本数组空白行

或 取文本长度 (文本数组 [计次]) ≤ 0 或 文本数组 [计次] ＝ #换行符
判断循环首 (成员数 ＞ 0 且 计次 ＞ 0)
如果真 (文本数组 [计次] ＝ “”)
删除成员 (文本数组, 计次, 1)
成员数 ＝ 取数组成员数 (文本数组)
如果真 (计次 ＞ 成员数)
计次 ＝ 成员数 ＋ 1