如下代码 if radiobutton1.Checked then
begin
// dsb_cx.DataSet.open;
tsqldataset(dsb_cx.DataSet).open;
pk1 := sysutils.DateToStr(datetimepicker1.Date);
pk2 := sysutils.DateToStr(datetimepicker2.Date);
tsqldataset(dsb_cx.DataSet).SQLFilter := 'rq between '''+pk1+''' and '''+pk2+''' and bm='''+bm+''' ';
tsqldataset(dsb_cx.DataSet).SQLFiltered := true;
datagrid.ApplyBestFit(nil);
end;
if radiobutton2.Checked then
begin
///dsb_cx.DataSet.open;
tsqldataset(dsb_cx.DataSet).open ;
pk1 := sysutils.DateToStr(datetimepicker1.Date);
pk2 := sysutils.DateToStr(datetimepicker2.Date);
tsqldataset(dsb_cx.DataSet).SQLFilter := 'rq between '''+pk1+''' and '''+pk2+''' and xm ='''+xm+''' ';
tsqldataset(dsb_cx.DataSet).SQLFiltered := true;
datagrid.ApplyBestFit(nil);
end;
第一次执行时,很慢,
第二次执行时,很快