Ｅｘｃｅｌファイルを読む procedure TForm1.Button23Click(Sender: TObject); var de:Variant;//DBEngine db:Variant;//Database rs:Variant;//Recordset const dbOpenTable:Integer = 1; begin //表示用コントロールをクリア ListBox1.Items.Clear; ListBo…