title: Adoquery1: CommandText does not return a result set
body: <pre><code>procedure TForm1.Button1Click(Sender: TObject);
  begin    
    ADOQuery1.close;    
    ADOQuery1.SQL.text:='insert into veresiye (product,price,piece,total) 
                                       VALUES (:par0,:par1,:par2,:par3)';    
    ADOQuery1.Parameters.ParamByName('par0').Value:=Edit1.Text;    
    ADOQuery1.Parameters.ParamByName('par1').Value:=Edit2.Text;    
    ADOQuery1.Parameters.ParamByName('par2').Value:=Edit3.Text;    
    ADOQuery1.Parameters.ParamByName('par3').Value:=Edit4.Text;    
    ADOQuery1.Open;    
    ADOQuery1.ExecSQL;
  end;
  </code></pre>
  
  <p>and I get this error message:</p>
  
  <blockquote>
    <p>Adoquery1: CommandText does not return a result set</p>
  </blockquote>
  
  <p>Why do I get this error and how can I fix it?</p>