一个传参数问题

                            
with   ADOQuery1   do   
              begin  
                  close;  
                  with   ADOQuery1.SQL   do   begin  
                  Clear;  
                  Add('select   top   20   xpidate,xpinumber,xpibr   from   xpi')   ;  
                  Add('where   xpidate=:rq1   order   by   xpidate   desc')   ;  
                  end;  
                  ADOQuery1.Parameters.ParamByName('rq1').Value   :=   rrqq1;  
                  ADOQuery1.Prepared;  
                  ADOQuery1.Open;  
              end;  
  为什么rrqq1没传成功

查看回复