大虾帮我看看这段代码，在线等待。。。。。。。。。

数据库用的自带的paradox，那个Zhbh和Yblx本来就是字符型的字段，那个没什么，关键是日期型S字段frq的处理
var
  Present,StartDate,EndDate: TDateTime;
  Year, Month, Day: Word;
begin  //只列出了其中一段
          Present:=now;
          DecodeDate(Present,Year, Month, Day);
          Month:=StrToInt(Trim(MaskEdit1.Text));
          Day:=1;
          StartDate:=EncodeDate(Year,Month,Day);
          Day:=28;
          EndDate:=EncodeDate(Year,Month,Day);
          Query1.Close;
          Query1.SQL.Clear;
          Query1.SQL.Add('Select Ybsj From jlybsj');
          Query1.SQL.Add('Where (Zhbh='+QuotedStr(ComboBox1.Text)+')');
          Query1.SQL.Add(' And (Yblx='+QuotedStr(ComboBox2.Text)+')');
          Query1.SQL.Add('And (Sfrq>:StartDate And Sfrq<:EndDate)');
          Query1.Open;
          Query1.ParamByName('StartDate').AsDateTime:=StartDate;
          Query1.ParamByName('EndDate').AsDateTime:=EndDate;
end
错误：Field 'StartDate'is of unknown type
意图比较明显，请大虾指点错在哪，应该怎么改