一.實現效果
1.打開文件；
2.保存文件；
3.根據一定的規則切割展示文本內容；
二、源碼
|
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
|
.版本 2.支持庫 iext.程序集 窗口程序集_啟動窗口.程序集變量 程序集_讀入的字節集, 字節集.子程序 _打開文件_被選擇.局部變量 臨時_文件路徑, 文本型.局部變量 i, 整數型.局部變量 臨時_文件內容, 文本型.局部變量 臨時_分割每行文本, 文本型, , "0".局部變量 臨時_分割文本, 文本型, , "0".局部變量 臨時_索引, 整數型.如果真 (通用對話框1.打開 ()) ' 如果用戶選擇了打開某個文件 執行以下操作 臨時_文件路徑 ＝ 通用對話框1.文件名 程序集_讀入的字節集 ＝ 讀入文件 (臨時_文件路徑) 臨時_文件內容 ＝ 到文本 (程序集_讀入的字節集) 臨時_分割每行文本 ＝ 分割文本 (臨時_文件內容, #換行符, ) .計次循環首 (取數組成員數 (臨時_分割每行文本), i) 臨時_分割文本 ＝ 分割文本 (臨時_分割每行文本 [i], “----”, ) 臨時_索引 ＝ 超級列表框1.插入表項 (-1, 到文本 (i), , , , ) 超級列表框1.置標題 (臨時_索引, 1, 臨時_分割文本 [1]) 超級列表框1.置標題 (臨時_索引, 2, 臨時_分割文本 [2]) .計次循環尾 ().如果真結束.子程序 _保存文件_被選擇.如果真 (通用對話框2.打開 ()) 寫到文件 (通用對話框2.文件名, 程序集_讀入的字節集).如果真結束 |
