用ADOQuery怎么删除几天前的数据

用ADOQuery如何删除几天前的数据?
用ADOQuery如何删除几天前的数据?例如：有个表叫data，里面有个字段叫“产生日期”，用ADOQuery如何删除3天前的数据，这个sql怎么写？

[解决办法]

Delphi(Pascal) code

with adoquery1 dobegin  sql.Text:='delete from [data] where 产生日期<=:dt_';  Parameters.ParamByName('dt_').Value:=FormatDateTime('yyyy-mm-dd',now-3);  ExecSQL;end;
[解决办法]
SQL code
delete from data where 产生日期<Dateadd(day,-3,MID(convert(varchar(19,getdate())),1,10))