易语言编辑框内容导出txt

版本

2

程序集

窗口程序集1

子程序

__启动窗口_创建完毕

编辑框1是否允许多行

＝

真

编辑框1滚动条

＝

2

子程序

_按钮1_被单击

写到文件

(取运行目录

()

＋

“\我的文件txt”,

到字节集

(编辑框1内容))

子程序

_按钮2_被单击

编辑框1内容

＝

到文本

(读入文件

(取运行目录

()

＋

“\我的文件txt”))

版本 2

支持库 eAPI

支持库 shellEx

程序集 窗口程序集1

程序集变量 文本, 文本型, , "4"

程序集变量 文本组, 文本型, , "0"

程序集变量 字符串, 文本型, , "8"

程序集变量 注册键, 整数型, , "8"

程序集变量 计次, 整数型

程序集变量 计数, 整数型

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

编辑框1是否允许多行 ＝ 真

编辑框2是否允许多行 ＝ 真

编辑框3是否允许多行 ＝ 真

编辑框1滚动条 ＝ 2

字符串 ＝ { “A”, “S”, “D”, “W”, “J”, “K”, “U”, “I” }

注册键值 ()

时钟1时钟周期 ＝ 1000

子程序 _时钟1_周期事件

文本 [1] ＝ 到文本 (读入文件 (取运行目录 () ＋ “\123txt”))

如果真 (文本 [1] ≠ 文本 [2])

  时钟1时钟周期 ＝ 0

  文本处理 ()

如果真结束

子程序 文本处理

文本组 ＝ 分割文本 (文本 [1], #换行符, )

文本 [4] ＝ “”

变量循环首 (取数组成员数 (文本组), 取数组成员数 (文本组) － 1, -1, 计次)

  如果 (计次 ＝ 取数组成员数 (文本组))

      文本 [2] ＝ 文本组 [计次]

  否则

      文本 [3] ＝ 文本组 [计次]

  如果结束

  文本 [4] ＝ 文本组 [计次] ＋ #换行符 ＋ 文本 [4]

变量循环尾 ()

编辑框1加入文本 (#换行符, 文本 [4])

计次 ＝ 倒找文本 (文本 [3], “  ”, , 假) ＋ 1

编辑框2加入文本 (取文本左边 (文本 [3], 计次), #换行符)

计次循环首 (取文本长度 (文本 [2]), 计次)

  计次循环首 (8, 计数)

      如果真 (到大写 (取文本中间 (文本 [2], 计次, 1)) ＝ 字符串 [计数])

          _启动窗口获取焦点 ()

          模拟按键 (取代码 (字符串 [计数], 1), , )

          跳出循环 ()

      如果真结束

  计次循环尾 ()

计次循环尾 ()

文本 [2] ＝ 文本 [1]

编辑框3加入文本 (#换行符)

时钟1时钟周期 ＝ 1000

子程序 注册键值

注册键 [1] ＝ 注册热键 (_启动窗口取窗口句柄 (), 标签1取窗口句柄 (), 0, #A键)

注册键 [2] ＝ 注册热键 (_启动窗口取窗口句柄 (), 标签1取窗口句柄 (), 0, #S键)

注册键 [3] ＝ 注册热键 (_启动窗口取窗口句柄 (), 标签1取窗口句柄 (), 0, #D键)

注册键 [4] ＝ 注册热键 (_启动窗口取窗口句柄 (), 标签1取窗口句柄 (), 0, #W键)

注册键 [5] ＝ 注册热键 (_启动窗口取窗口句柄 (), 标签1取窗口句柄 (), 0, #J键)

注册键 [6] ＝ 注册热键 (_启动窗口取窗口句柄 (), 标签1取窗口句柄 (), 0, #K键)

注册键 [7] ＝ 注册热键 (_启动窗口取窗口句柄 (), 标签1取窗口句柄 (), 0, #U键)

注册键 [8] ＝ 注册热键 (_启动窗口取窗口句柄 (), 标签1取窗口句柄 (), 0, #I键)

子程序 _标签1_反馈事件, 整数型

参数 参数一, 整数型

参数 参数二, 整数型

计次循环首 (8, 计次)

  如果真 (参数一 ＝ 注册键 [计次])

      编辑框3加入文本 (字符串 [计次])

  如果真结束

计次循环尾 ()

--------------------------

有一点小问题,就是123txt是只取最后连续的两行第三行是取不到的,如:

AAAAA            2015-09-04 20:40:33

 S

FFFFFF              2015-09-04 19:33:47

    D

组件用到：编辑框，按钮，通用对话框。

命令用到：读入文件（）

分割文本（）

到文本（）

计次循环（）

具体如下：

版本

2

程序集

窗口程序集1

程序集变量

文件,

文本型

子程序

__启动窗口_创建完毕

编辑框1是否允许多行

＝

真

子程序

_按钮1_被单击

局部变量

得到的文件,

文本型

局部变量

最终的文件,

文本型,

,

"0"

局部变量

容器,

整数型

通用对话框1过滤器

＝

“文本文档(txt)|txt”

如果真

(通用对话框1打开

())

文件

＝

通用对话框1文件名

得到的文件

＝

到文本

(读入文件

(文件))

最终的文件

＝

分割文本

(得到的文件,

“|”,

)

如果真

(取数组成员数

(最终的文件)

＜

1)

信息框

(“错误，文件为空，或没有打开文件”,

0,

)

返回

()

如果真结束

计次循环首

(取数组成员数

(最终的文件),

容器)

编辑框1加入文本

(最终的文件

[容器]

＋

#换行符)

计次循环尾

()

如果真结束

版本 2

支持库 DialogEx子程序 _按钮1_被单击

局部变量 文件路径, 文本型

局部变量 文件号, 整数型编辑框1是否允许多行 ＝ 真

文件路径 ＝ 打开扩展对话框 (“打开”, “txt”, “所有文件()|”, 0, “”, 假, 假, 假)

文件号 ＝ 打开文件 (文件路径, , )

编辑框1内容 ＝ 读入文本 (文件号, )

版本 2

局部变量 文本组, 文本型, , "0"

文本组 ＝ 分割文本 (到文本 (读入文件 (“文本路径”)), #换行符, )

如果真 (编辑框1内容=文本组[1])‘判断编辑框是否等于所载入的文本的第一行文本内容

如果真结束

以上就是关于易语言编辑框内容导出txt全部的内容，包括:易语言编辑框内容导出txt、易语言读取TXT文件内容到编辑框、易语言读取本地TXT文本然后分割文本等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！