掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
テキストファイルを読込で個別のRichEditに1行ずつ表示させるには？ (ID：4592)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
サンプルを書いてみました。 procedure?TForm2.Button1Click(Sender:?TObject); var ????fn:string; FileList:TStringList; begin FileList := TStringList.Create; try ????fn:='c:\試作\tenpo.txt'; ??? ?FileList.LoadFromFile(fn); RichEdit1.Lines.Add(FileList[0]); RichEdit2.Lines.Add(FileList[1]); RichEdit3.Lines.Add(FileList[2]); RichEdit4.Lines.Add(FileList[3]); finally FileList.Free; end; end; これでいいのでは？ ちなみに行数が変化したり、RichEditの個数が変化するときはちょっと工夫が必要になります。
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.