高手请进：急啊，两天来一直困绕我的问题。

Question

SQLStr:='Select*From '+'"'+SQLStr1+'"'+'WHERE XH='+CkcpXh;
(1')SQLStr:=SQLStr+'ANd Ptime=:Ptime';
   with CkjlQuery do
   begin
      Close;
      SQL.Clear;
      SQL.Add(SQLStr);
(2')   ParamByName('Ptime').AsDateTime:=DateTimePicker1.DateTime;
      open;
   end

Answer 1

不知道你的程序运行后是报什么错误！
我大概猜测一下：是不是sql语句写错了，你的使用方法有错误！
正确的方式应该是：应该先添加sql语句，再给查询参数赋值！
Sql.add(SqlStr);
ParamByName('Ptime').AsDateTime:=DateTimePicker1.DateTime;
第一个错误可能是少了一个空格所至。
例如：SqlStr := SqlStr + ' and Ptime=Param1';//次处添加一个空格;

Answer 2

ParamByName('paraml').AsDateTime:=DateTimePicker1.DateTime;
参数名要和sql语句中一致

Answer 3

第一句中Where部分应写为: +'WHERE XH='''+CkcpXh+'''';