如何在TBDEClientDataset的CommandText的Where子句中处理Access的日期时间型字段的比较？

Question

先将日期转成浮点数再去比较.
var FloatTime: Real;FloatTime:=StrToDateTime('2002-06-15 10:00:00');然后再用：'Select * from 表1 where 时间 >= '+FloatToStr(FloatTime)

Answer 1

Select * from 表1 where 时间 >= '''2002-06-15 10:00:00'''

Answer 2

使用参数化查询吧；先添加一个QUERY控件，然后执行下面的程序。
procedure TForm1.Button1Click(Sender: TObject);
begin
   with query1 do
        begin
           close;
           sql.Clear;
           sql.Add('select * from orders where shipdate<=:rq');
           parambyname('rq').AsDateTime:=strtodatetime('2002-06-15 10:00:00');
           open;
        end;
end;

Answer 3

哦，忘了告诉你上面的表orders应该改成你的表名“表1”，相应的shipdate也应改成你的字段名“时间 ”。不知道你的DELPHI是否支持中文代码。