如何获取DBLookupComboBox中的值到SQL语句中使用

Question

我用DBLookupComboBox下拉显示所有的表名，然后想选中某个表，用到下面的insert into 表名 中，怎么将这个选中的值传到下面的SQL语句中呢？我用DBLookupComboBox1.Text传不过去。   sql:='delete from DBLookupComboBox1.text where date=:date';
   ADOQuery1.Close;
   ADOQuery1.SQL.Clear;
   ADOQuery1.SQL.Text:=sql;
   ADOQuery1.Parameters.ParamByName('date').Value:=date;
   ADOQuery1.ExecSQL;   sql:='insert into DBLookupComboBox1.Text (date,jobe1,name1,tele1) values (:date,:jobe1,:name1,:tele1)';
   ADOQuery1.Close;错误信息显示DBLookupComboBox1.Text 对象无效。

Answer 1

sql := 'insert into ' + DBLookupComboBox1.Text + ' (date,jobe1,name1,tele1) values (:date,:jobe1,:name1,:tele1)';

Answer 2

sql := 'insert into ' + DBLookupComboBox1.Text + ' (date,jobe1,name1,tele1) values (:date,:jobe1,:name1,:tele1)';