1. 程式人生 > >易語言基礎——讀寫檔案

易語言基礎——讀寫檔案

1.實現效果

1.開啟檔案;
2.儲存檔案;
3.根據一定的規則切割展示文字內容;

這裡寫圖片描述

2.原始碼

.版本 2
.支援庫 iext

.程式集 視窗程式集_啟動視窗
.程式集變數 程式集_讀入的位元組集, 位元組集

.子程式 _開啟檔案_被選擇
.區域性變數 臨時_檔案路徑, 文字型
.區域性變數 i, 整數型
.區域性變數 臨時_檔案內容, 文字型
.區域性變數 臨時_分割每行文字, 文字型, , "0"
.區域性變數 臨時_分割文字, 文字型, , "0"
.區域性變數 臨時_索引, 整數型

.如果真 (通用對話方塊1.開啟 ())
    ' 如果使用者選擇了開啟某個檔案 執行以下操作
    臨時_檔案路徑 = 通用對話方塊1
.檔名 程式集_讀入的位元組集 = 讀入檔案 (臨時_檔案路徑) 臨時_檔案內容 = 到文字 (程式集_讀入的位元組集) 臨時_分割每行文字 = 分割文字 (臨時_檔案內容, #換行符, ) .計次迴圈首 (取陣列成員數 (臨時_分割每行文字), i) 臨時_分割文字 = 分割文字 (臨時_分割每行文字 [i], “----”, ) 臨時_索引 = 超級列表框1.插入表項 (-1, 到文字 (i), , , , ) 超級列表框1.置標題 (臨時_索引, 1, 臨時_分割文字 [1]) 超級列表框1
.置標題 (臨時_索引, 2, 臨時_分割文字 [2]) .計次迴圈尾 () .如果真結束 .子程式 _儲存檔案_被選擇 .如果真 (通用對話方塊2.開啟 ()) 寫到檔案 (通用對話方塊2.檔名, 程式集_讀入的位元組集) .如果真結束