Question

Delphi7中Paradox数据库的问题

我的数据表中有“日期”一列（AffDate），程序功能是在数据库中取得本年的相关数据。
var
Year,Month,Day:Word;
begin
with qeyShow do begin
close;
{清空SQL}
SQL.Clear;
{获得年数，月份数}
DecodeDate(mc.Date,Year,Month,Day);
{添加SQL}
SQL.Add('SELECT UserName,AffDetail,How,AffDate FROM detail.db WHERE EXTRACT(YEAR FROM AffDate)=:d ORDER BY AffDate');
{添加SQL参数}
qeySHow.ParamByName('d').AsString:=IntToStr(Year);
qeyShow.Open;
qeyShow.Active:=true;
end;
其中SQL语句'SELECT UserName,AffDetail,How,AffDate FROM detail.db WHERE EXTRACT(YEAR FROM AffDate)=:d ORDER BY AffDate'；

EXTRACT（YEAR FROM AffDate）是paradox内置函数，用于取得AffDate中的年份数，我把参数d打印出来，的确是取得了年数2010，但是数据库报错：相关类型不匹配。我在Database Desktop中运行SQL语句
'SELECT UserName,AffDetail,How,AffDate FROM detail.db WHERE EXTRACT(YEAR FROM AffDate)=2010 ORDER BY AffDate'

可以正确查询。但是放到程序里就不行。

Paradox实在是太老了，网上的相关资料很少，而我又不得不使用这个数据库。希望高手们给个解答，谢谢谢谢，能解决的话我给100分，万分感谢

Answer 1

肯定是拼错了呗，单步跑完拼SQL语句那行看看到底多什么少什么了。