掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
テキストファイル内の改行コード除去方法 (ID:11054)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
TStringList に読み込むと自動的に改行で区切られます。ですから改行コードを 除去するには、その文字部分だけをコピーしていけばいいです。 procedure TForm1.Button1Click(Sender: TObject); var SL:TStringList; MS:TMemoryStream; i:integer; begin SL := TStringList.Create; MS := TMemoryStream.Create; try SL.LoadFromFile('c:\test.txt'); MS.SetSize(Length(SL.Text)); for i := 0 to SL.Count-1 do MS.Write(PChar(SL[i])^,Length(SL[i])); MS.SetSize(MS.Position); // サイズを調整する MS.SaveToFile('c:\test.txt'); finally SL.Free; MS.Free; end; end;
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.