delphi中的SQL语句 急，在线等指教

程序大致如下，运行结果显示 SQL语句中UPDATA有问题 求指教
with ADOQuery1 do
    begin
      close;
      SQL.Clear;
      SQL.Add('update msn set 编号=:a,姓名=:b,性别=:c,出生日期=:d,民族=:e,家庭电话=:f,手机号码=:g,QQ号码=:h,E-mail=:i,备注=:j,类型=:k,照片=:l');
      SQL.Add('where 姓名='+quotedstr(treeview1.Selected.Text));
      Parameters.ParamByName('a').Value:=trim(edit1.Text);
      Parameters.ParamByName('b').Value:=trim(edit2.Text);
      Parameters.ParamByName('c').Value:=combobox1.Text;
      Parameters.ParamByName('d').Value:=datetostr(DatetimePicker1.Date);
      Parameters.ParamByName('e').Value:=trim(edit3.Text);
      Parameters.ParamByName('f').Value:=trim(edit4.Text);
      Parameters.ParamByName('g').Value:=trim(edit5.Text);
      Parameters.ParamByName('h').Value:=trim(edit6.Text);
      Parameters.ParamByName('i').Value:=trim(edit7.Text);
      Parameters.ParamByName('k').Value:=combobox2.Text;
      Parameters.ParamByName('j').Value:=memo1.Lines.Text;
      Parameters.ParamByName('l').Value:=trim(edit8.Text);
      ExecSQL;
      messageDlg('修改成功',mtwarning,[mbyes],0);

答案：非要绑在一棵树上吊死，用ADOdataset组件，直接写上select语句，比这要简单直观的多，搞的这么复杂，还要设什么ABCDEFG参数。我真不理解，非要简单的问题搞复杂。不就是一个修改一条数据记录吗。

其他：this.drpjiaobanren.Items.Add(new ListItem(aa[i], dd.Tables[0].Rows[有人知道那个sql语句中去除重复元素的关键词是什么么（50分，在线……）用 where 前加空格，或者showmessage（adoquery1.sql.text）看看错在哪里 SQL.Add('where 姓名='+quotedstr(treeview1.Selected.Text));
改成
SQL.Add('where 姓名='''+quotedstr(treeview1.Selected.Text) + '''');

上一个：将delphi编写的单机数据库程序改为网络版的应注意什么
下一个：Delphi 第三方控件dbgrideh的问题。