CSVファイルの読み込み (ID:37627)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 フォームにButton1とEdit1とEdit2を貼り付けて、Button1のonClickイベントを procedure TForm1.Button1Click(Sender: TObject); var SL, SL2: TStringList; begin SL:=TStringList.Create; try SL2:=TStringList.Create; try SL.LoadFromFile('どこかのファイル.CSV'); //望みのCSVファイルを指定 SL2.CommaText:=SL.Strings[0]; //何行目のデータを読むかを指定 Edit1.Text:=SL2.Strings[0]; //何列目のデータを読むかを指定 Edit2.Text:=SL2.Strings[1] //何列目のデータを読むかを指定 finally SL2.Free end finally SL.Free; end end; こんな風にできます。一度試してみてください。