var date:TDateTime;
    S: String;
date:= Table1.FieldByName('date').AsDateTime;
s:=DateTimeToStr(date);由于没有完全弄明白你的意思,只好写这么些了。

解决方案 »

  1.   

    paradox 日期型可以用引号不过要这样'01/01/2001';
      

  2.   

    sry,写得急了点。
    即:若用query查询dbf表(有日期型的)
    var s:string='2001-04-30';
    query1.sql.add('select * from table1 where mydate='''+s+'''');
    //mydate是table1中一日期型字段
    可以实现。
    但若是paradox表,以上程序不能通过,好像不能把一个字符串作为日期型来用
      

  3.   

        SQL:=SQL+' and TTime >= :Begin_Date and  TTime <= :End_Date ' ;
    LOOKUP_TABLE.ParamByName('Begin_Date').AsDatetime :=Tdatetime类型如NOW ;可以使用strtodatetime进行转换
      

  4.   

        SQL:=SQL+' and TTime >= :Begin_Date and  TTime <= :End_Date ' ;
    LOOKUP_TABLE.ParamByName('Begin_Date').AsDatetime :=Tdatetime类型如NOW ;可以使用strtodatetime进行转换
      

  5.   

    to big_worm(大青虫) :
    我知道可以用param来解决很方便,别人问我的,我只想给个答复。