テキストファイルを読み書きする

テキストファイルを読み書きする最も簡単な方法は TStringList クラスを使用することです。

■ TStringList の使用例 
var
  sltText  :  TStringList;
  intCount :  integer;
begin
  sltText  :=  TStringList.Create;

  //ファイルを開く 
  sltText.LoadFromFile('C:\Borland\Delphi\Readme.txt'); 

  //行数
  intCount :=  sltText.Count; 

  //最終行に追加
  sltText.Add('Delphi Object Pascal'); 

  //指定行を削除 
  sltText.Delete(3); 

  //指定行に追加
  sltText.Insert(1, 'TurboPascal'); 

  //全てクリア
  sltText.Clear; 

  //ファイルを保存 
  sltText.SaveToFile('C:\Temp\Readme.txt');
  sltText.Free;
end;