Delphi操作文件的方法有好多种,包含ini文件,二进制文件,文本文件。
这里介绍代码最少的文本文件的操作。
读文本文件
var
strArr: TStringDynArray; //需要引用 System.Types
begin
strArr := TFile.ReadAllLines('test.txt'); //读取全部内容,需要引用 System.IOUtils
//strArr[0] 文件中第一行的内容
//strArr[1] 文件中第二行的内容
end
写文本文件
var
strArr: TStringDynArray; //需要引用 System.Types
begin
SetLength(strArr, 2);
strArr[0] := 'Hello word!'; //第一行
strArr[1] := 'Hello 我!'; //第二行
TFile.WriteAllLines('test.txt', strArr); //写入全部内容,将覆盖原来内容,需要引用 System.IOUtils
end
···