在进行查询时员工代号和所属部门号都能正确查询，但就员工姓名不能，在数据库中员工代号，员工姓名与所属部门号都为char型，请问下面代码该如何改？
 sql:= 'select * from 职工表 where 0=0';
    str:= '';
   if trim(edid.Text) <> '' then
     str := str + ' and 员工代号=' + trim(edid.Text);
   if edname.Text <> '' then
     str := str + ' and 员工姓名=' + trim(edname.text);
   if trim(cbxdept.Text) <> '' then
     str := str + ' and 所属部门号=' + trim(cbxdept.Text);
   if str <> '' then
     sql := sql + str;
    adoquery1.Close;
    adoquery1.SQL.Clear;
    adoquery1.SQL.Add(sql);
    adoquery1.Open;