掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
stringlistでのテキストファイル処理について (ID:44450)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
var slst : TStringList; i : Integer; s : String; begin slst := TStringList.Create; slst.LoadFormFile('処理するファイルパス'); for i := 0 to slst.Count -1 do begin s := slst[i]; {sの処理} end; slst.Free; end; 上記のようにstringlistにテキストファイルを読み込ませてます。 テキストファイルは固定長のファイルです。 最終行まで問題なく書込がされているファイルでしたら、 全く問題ないのですが、 内容最終行に1行余計な行がプラスされている状態(1バイトスペース)で 読み込むと、 なぜか3万数行あるはずが168行しか読み込みません。 件数はstringlist.countです。 回避方法があれば教えていただきたくお願いします。 ちなみに AssignFile(tf, '処理するファイルパス'); Reset(tf); の方法でしたら、問題なく読込出来ました。
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.