delphi - 查询以按不同字段的日期获取数据

Question

我想使用比较日期（收入、结果日期和另一个字段）从数据库中获取数据我使用这种格式：

Form6.ADOTable1.Filter := 'student_name like '+QuotedStr(sEdit1.Text) +
       ' and income_date  >='''+date1+''' and income_date  <= '''+date2+'''+
       ' and outcome_date >='''+date1+''' and outcome_date <= '''+date2+'''';

当我运行程序时出现错误，我不知道为什么。请帮我。 我正在使用德尔福 7

Answer 1

由于错误不清楚，您可以尝试不同的方法来过滤您的记录：添加一个 TADOQuery 组件。在连接属性中建立数据库连接。然后将以下代码应用于您之前使用的任何事件：

With ADOQuery1 do 
begin
    close;
    sql.clear;
    sql.add('SELECT * FROM table 
             WHERE student_name like '+QuotedStr(sEdit1.Text)+' 
             AND income_date  >='+date1+'
             AND income_date  <='+date2+' 
             AND outcome_date >='+date1+' 
             AND outcome_date <='+date2);
    open;
end;

If you are using DBCommponents, Make sure you link them with ADOQury1 instead of ADOTable1.