SQL Ubdate

помогите плиз надо поменять запись в таблице post в строке approve с 1 на вылазиет ошибка delphi query must return exactly one result set use execute

Code:

procedure TForm1.Button2Click(Sender: TObject);
begin
myQuery1.Close;
myQuery1.SQL.Clear;
myQuery1.SQL.Text:='UPDATE post SET approve=:v WHERE id=:n';
myQuery1.ParamByName('v').AsString:='0';
myQuery1.ParamByName('n').AsString:='2129' ;
myQuery1.Open;
myQuery1.Active:=True;

end;

что не правильно делаю