Как передать правильно параметр.

[ZHDN]

Имеется ComboBox каторому забиты Items
0: TableName
1: TableName

На копочку пишу.

Query1.Close;
Query1.SQL.Text:='Delete From :param1 where.....';
Query1.Parameters.ParamByName('Param1').Value:=Combobox1.Text;
Query1.Open;

На что пишит ошибку:

"Необходимо обьявить табличную переменную "@P" "

Как сделать чтоб работало?

[veniside]

это извращение не сработает, будьте проще:

Query1.Close;
Query1.SQL.Text:='Delete From ' + Combobox1.Text + ' where.....';
Query1.Open;

[ZHDN]

Сообщение от veniside

это извращение не сработает, будьте проще:

Query1.Close;
Query1.SQL.Text:='Delete From ' + Combobox1.Text + ' where.....';
Query1.Open;

Чет я даже об этом и не падумал.Спасибо.

[ZHDN]

procedure TForm1.Button1Click(Sender: TObject);
  begin
  ADOQuery1.Close;
  DateTimePicker1.time:=DateTimePicker2.time;
  DateTimePicker3.time:=DateTimePicker4.time;
  ADOQuery1.SQL.Text:='DELETE FROM '+ Combobox1.Text +' WHERE SimpleTime BETWEEN :param1 AND :Param2';
  ADOQuery1.Parameters.ParamByName('Param1').Value:=DateTimePicker1.DateTime;
  ADOQuery1.Parameters.ParamByName('Param2').Value:=DateTimePicker3.DateTime;
  ADOQuery1.Open;
  end;

Ошибка: ADOQuery1 : CommandText does not return a result set

[Аватар]

Вместо ADOQuery1.Open вставить ADOQuery1.ExecSQL