搞不懂这个具体哪里错了，实现不了功能

Question

代码如下：procedure Tblsx.ComboBox1Change(Sender: TObject);
begin
  with adoquery3 do
  begin
    Close;
    SQL.Clear;
    SQL.Add('Select * from 模板管理 where 用户名=:a and 模板用处=''主诉'' and 模板名称=:b');
    parameters.parambyname('a').value:=login.czymc;
    parameters.parambyname('b').value:=trim(combobox1.Text);
    Open;
  end;
  if adoquery3.RecordCount>0 then
    dbmemo1.Text :=adoquery3.fieldbyname('模板内容').AsString;
end;dbmemo1.Text由combobox1.Text决定，通过改变combobox1.Text能够及时显示出响应的dbmemo1.Text。各位帮我看看，究竟哪里错了？没出现这个效果啊

Answer 1

用showmessage(sql.text) 看你的sql语句是否正确。若正确 showmessage(adoquery3.fieldbyname('模板内容').AsString) 看你抓取的值有没有