请教关于TTable控件的条件查询.

Question

Table1.First;
        While not Table1.Eof do
        if (Table1.FieldByName('rq').asdatetime>form3.DateTimePicker1.Datetime  and Table1.FieldByName('rq').asdatetime<form3.DateTimePicker2.Datetime then
            begin
            Memo1.Lines[0]:=Table1.fieldbyname('ccap').asstring;
            end
        else
            begin
            Table1.Next;
            end;

Answer 1

Table1.First;
        While not Table1.Eof do
        if (Table1.FieldByName('rq').asdatetime>form3.DateTimePicker1.Datetime  and Table1.FieldByName('rq').asdatetime<form3.DateTimePicker2.Datetime then
             Memo1.Lines[0]:=Table1.fieldbyname('ccap').asstring;
        Table1.Next;
            end;