小问题，解决即刻给分。

Question

这样写错了，帮我改一下
//department为dbcombobox组件
str:=department.text;
AdoDataSet2.CommandText := 'select * From employee where  department='+str;

Answer 1

AdoDataSet2.CommandText := 'select * From employee where  department='''+str+'''';

Answer 2

department是字符型吗？
如果是。
str:=department.text;
AdoDataSet2.CommandText := 'select * From employee where  department=' + chr(39)str+ chr(39);

Answer 3

str:=Trim(department.text);
AdoDataSet2.CommandText := 'select * From employee where  department='+str;

Answer 4

str:=Trim(department.text);
AdoDataSet2.CommandText := 'select * From employee where  department='''+str'''';

Answer 5

1.如果str是字符型的，代码如下：
str:=Trim(department.text);
AdoDataSet2.CommandText := 'select * From employee ' 
                          +'where  department='+QuotedStr(str)+';
2.如果str是数值型的，代码如下：
str := DepartMent.values;
AdoDataSet2.CommandText := 'select * From employee ' 
                          +'where  department='+inttostr(str)+';

Answer 6

AdoDataSet2.CommandText := 'select * From employee where  department='''+str+'''';

Answer 7

AdoDataSet2.CommandText := 'select * From employee where  department='+inttostr(str);

Answer 8

字段department如果是数据类型的话，你写的就不错。
如果是字符类型的话则要在SQL语句中加单引号括起来。
str :='select * from employee where department='+#39+department.text+#39;
AdoDataSet2.CommandText := str;