ACCESS中的日期问题

Question

我在ACCESS中定义了一个表，有个字段是datetime类型，
现在我要用系统日期来跟那个日期来做个比较，
然后把日期大于当前系统日期的记录显示出来？
但这样写出错了，请问哪位大哥懂的，提示一下！procedure TForm4.FormCreate(Sender: TObject);
var dt:Tdate;
begin
     dt:=now();
     form4.ADOQuery1.Active:=false;
     form4.ADOQuery1.SQL.Clear;
     form4.ADOQuery1.SQL.Text:='select * from course where timeout>'''+datetimetostr(dt)+'''';
     form4.ADOQuery1.Active:=true;
end;

Answer 1

前边的都不变
adoquery1.sql.text := 'select * from course where timeout >:#timeout';
ADOQuery1.Parameters.ParamByName('#timeout').value := FormatDateTime('yyyy-mm-dd',dt);
adoquery1.open;

Answer 2

嗯嗯，楼上正解。Access数据库访问日期型数据要在前面加上‘#’。

Answer 3

直接：     form4.ADOQuery1.SQL.Text:='select * from course where timeout>#'+datetimetostr(dt)+'#';