為什么執行效率很慢?

Question

如下程序段,query.connectionstring 正確.
procedure TF_qrycode.Button3Click(Sender: TObject);
begin
try
query.SQL.Text:='update i_e_detail set ied02=:cdate,ied05='''+edit6.text+''',ied06='+edit7.Text +',ied07='+edit8.Text+',ied08='+edit9.text+',ied10='''+edit10.text +''',ied11='''+edit11.text+''',ied12='''+edit12.Text +'''';
query.sql.text:=query.sql.Text + ' where ied01='+edit2.text;
query.Parameters.ParamValues['cdate']:=strtodate(edit3.text);
query.Prepared :=true;
//showmessage(query.sql.Text);
query.ExecSQL;
except
 showmessage('更新數據時發生問題,請檢查後再做修改!');
 exit;
end;
adoquery1.Refresh;
showmessage('更新成功!!');
query.close;
end;
剛開始很快的,后來加了一個parameters, 變得很慢....誰幫忙解決一下..