掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
改行の無いテキストファイルを読み込むには？ (ID:19675)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
> >TFileStreamでテキストファイルを開き > >FileStream.LoadFromFile(hogehoge) > は、どうやって使うのでしょう？ > 未定義の識別子 : 'LoadFromFile'と出てしまいます。 Help見てみれ TFileStreamにLoadFromFileはない。 たぶんTStringListとごっちゃになってるだけだわ。 > TStringは、試してみましたがダメでした。 ダメなら、どうダメなのか書くこと。 そうじゃないと、何がダメかわからんでしょ？ あと、TStringじゃなくて、TStringListだな。 効率にこだわらないのであれば、TStringListのLoadFromFileでファイルを読み込む。 で、こんな感じや。 var hoge,hoge2: String; stringlsit: TStringList; i:Integer; begin 略 stringlsit.LoadFromFile(ふぁいる) hoge := stringlsit.Text; //漢字があるならAnsiPosが望ましい //改行用文字検索 i := Pos(検索文字, hoge); while i > 0 do begin //これが一行分 hoge2 := Copy(hoge, 1, i-1); //一行分の文字削り取る Delete(hoge, 1, i-1); //次の改行用文字検索 i := Pos(検索文字, hoge); end; end; 動くどうかも、コンパイルが通るかも試してないから、あとは自分で考えな。 「初心者」という単語は、なんでもおまかせにしていいという免罪符じゃないことを覚えておきや。
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.