パラメータクエリー procedure TForm1.Button18Click(Sender: TObject); var cnn :Variant;//Connection cmd: Variant;//Command rs: Variant;//Recordset sql: string; begin //表示用コントロールをクリア ListBox1.Items.Clear; ListBox2.Items.Clear; cn…