【结贴】时间段过滤

ynzhhl · 发表于 2010-3-12 10:25:20

我想实现打开功能时默认查询出当前日期前30天到当前日期的数据，请问如何写代码？或者如何实现？

lixy · 发表于 2010-3-12 10:41:38

把自动打开数据集的属性都去掉，让其不自动打开数据集。
然后再功能主窗体的create事件上用sqlfilter设置sql条件。

ynzhhl · 发表于 2010-3-12 10:58:49

取这个时间段的代码怎么写？

lixy · 发表于 2010-3-12 11:05:44

你先把sql语句造出来。在查询分析器试验好。然后把where部分赋值给sqlfilter

ynzhhl · 发表于 2010-3-12 11:37:11

我在业务信息-数据集条件的地方设置了：KmResult.日期 >= getdate() - 90，打开数据集时，条件生效了，把这个值赋给sqlfilter后没有生效
能不能麻烦你们在解答问题的时候尽量详细一点，初学，理解起来有点困难。

lixy · 发表于 2010-3-12 11:43:52

http://bbs.justep.com/forum.php?mod=viewthread&tid=590
5楼。

ynzhhl · 发表于 2010-3-12 11:57:22

我也是这样写的，刚才测试出已经生效了。
不过被另一个问题影响，所以没看出来
这数据集的数据量很大，我把数据集条件里的SQL条件取消后，窗口打不开（几分钟都没有反应，估计是因为这个代码是创建窗体时生效，但是创建窗体的同时要打开数据集）
这个怎么办？

lixy · 发表于 2010-3-12 13:11:39

No.2

把自动打开数据集的属性都去掉，让其不自动打开数据集。
或者你在信息的create事件里面赋值那个数据集的sqlfilter:='1<>1'

ynzhhl · 发表于 2010-3-12 13:15:36

你说这个都做了，

代码：
procedure TMainForm.BizFormCreate(Sender: TObject);
begin
//  DataSetBroker1.DataSet.Close ;
  TBizDataSet(DataSetBroker1.DataSet)
  DataSetBroker1.DataSet.Open ;
  TBizDataSet(DataSetBroker1.DataSet).SQLFiltered :=false;
  TBizDataSet(DataSetBroker1.DataSet).SQLFilter := '1 = 1';
  TBizDataSet(DataSetBroker1.DataSet).SQlFilter := 'KmResult.Fdate >= getdate() - 80';
  TBizDataSet(DataSetBroker1.DataSet).SQLFiltered :=true;

end;

截图

lixy · 发表于 2010-3-12 13:26:19

你在信息的create事件 info...
你要检查自动打开，需要检查4个地方。http://bbs.justep.com/forum.php?mod=viewthread&tid=25826

		自动登录	找回密码
密码			立即注册