仓库管理软件版1楼: 我使用了
procedure TDataModule.DataSet1FilterRecord(DataSet: TDataSet;
var Accept: Boolean);
begin
Accept := 表达式
end;
但我不知道过滤后DataSet1的记录条数，Recordcount是记录总数，不是过滤后的记录条数.
if DataSet1.Recordcount > 0 then //如果DataSet1过滤后有记录则DataSet2插入一个记录
begin
DataSet2.insert;
DataSet2.FieldByName(＇＇DataSet1_ID＇＇).AsInteger := DataSet1.FieldByName(＇＇DataSet1_ID＇＇＇＇).AsIntger;
end;

2楼: DataSet1.Filter := ＇＇****＇＇;
DataSet1.Filtered := True; 如下载财务软件

3楼: 我要问的是如何知道记录条数，不要告诉我只能遍历数据集

4楼: ADODataSet的Bug,
只能在Filtered:=True之后加上 DataSet.Last;然后取RecNO的值.
更保险一些就first; while not eof.....

5楼: Filter后,recordcount就是过滤后的记录数了,如果不是,那是因为你没启用过滤
最好界面上放个DBGrid检测一下

6楼: 那判断过滤数据集为空这样可以吗
if DataSet1.Eof and DataSet1.Bof then//一条记录也没有。

begin
end;

仓库管理软件版7楼: if DataSet1.IsEmpty then //判断是否为空 如果为TRUE那么说明是空

if DataSet1.recordcount<=0 then //这个也可以判断是否为空

DataSet1.recordcount //得出记录总数，返回为INTEGER类型