请教各位高手:Table控件的Filter过滤日期、数字整型字段怎样写? (100分)

  • 主题发起人 主题发起人 gaohua21
  • 开始时间 开始时间
G

gaohua21

Unregistered / Unconfirmed
GUEST, unregistred user!
在运行时用Table控件的Filter属性过滤日期字段数据应怎样写?
过滤数字型(整型)字段应怎样定?
 
Table1.DatabaseName:='DBDEMOS';
Table1.TableName:='events.db';
procedure TForm1.Button1Click(Sender: TObject);
begin
Table1.Filtered:=False;
Table1.Filter:='Event_Date >= '+DateToStr(DateTimePicker1.Date);
Table1.Filtered:=True;
end;
 
Table1.Filter:='Event_Date >= '+FloatToStr(DateTimePicker1.Date);
 
Table1.Filter:='Event_Date >= '+formatdatetime('yyyy-mm-dd',DateTimePicker1.Date);
 
Table1.Filter:='Event_Date >= '''+DateToStr(DateTimePicker1.Date)+'''';
 
后退
顶部