■無料ホームページスペース■

TStringListを使う2


TStringListは、ファイルから文字列を読込む、 または、文字列をファイルに保存する事が出来ます。 以下は、ファイル読込、保存の例です。

var
  FName: String;
  i: Integer;
  SL: TStringList;
begin

  //履歴のファイル名
  FName:= AppPath +'RecentFiles.txt';
  if not FileExists(FName) then Exit;

  SL:= TStringList.Create;
  try

    //ファイルから読込
    SL.LoadFromFile(FName);

    for i:= 0 to SL.Count-1 do
      SL[i]:= LowerCase( SL[i] );

    //別名で保存
    FName:= AppPath +'lw_RecentFiles.txt';
    SL.SaveToFile(FName);

  finally
    SL.free;
  end;

end.


[Home] [ (´д`)Edit3Menu]
■お 得情報盛りだくさん
■高性能レンタルサーバ