超简单问题,回答正确马上给分.
lyq 2004-04-09 08:52:39 FrmSearchResult:=TfrmSearchResult.create(self);
frmSearchResult.datasource1.DataSet:=nil;
frmSearchResult.datasource1.DataSet:=QSearchResult; frmSearchResult.dxDBGrid1.CreateDefaultColumns(QSearchResult,self);
for i:=0 to listv3.Items.Count-1 do
begin
if listv3.Items [i].SubItems[2]<>'' then
begin
frmSearchResult.dxDBGrid1.Columns[i].summaryfooterfield:=listv3.Items [i].SubItems[2];
if listv3.Items [i].SubItems[2]='求和' then
begin
frmSearchResult.dxDBGrid1.Columns[i].summaryfooterformat:='合计:0.000';
frmSearchResult.dxDBGrid1.Columns[i].summaryfootertype:=cstSum;
end
else
if listv3.Items [i].SubItems[2]='计数' then
begin
frmSearchResult.dxDBGrid1.Columns[i].summaryfooterformat:='共0条记录';
frmSearchResult.dxDBGrid1.Columns[i].summaryfootertype:=cstCount;
end
else
if listv3.Items [i].SubItems[2]='最大值' then
begin
frmSearchResult.dxDBGrid1.Columns[i].summaryfooterformat:='最大值:0.000';
frmSearchResult.dxDBGrid1.Columns[i].summaryfootertype:=cstMax;
end
else
if listv3.Items [i].SubItems[2]='最小值' then
begin
frmSearchResult.dxDBGrid1.Columns[i].summaryfooterformat:='最小值:0.000';
frmSearchResult.dxDBGrid1.Columns[i].summaryfootertype:=cstMin;
end
else
if listv3.Items [i].SubItems[2]='平均' then
begin
frmSearchResult.dxDBGrid1.Columns[i].summaryfooterformat:='平均值:0.000';
frmSearchResult.dxDBGrid1.Columns[i].summaryfootertype:=cstAvg;
end;
end;
end;
frmSearchResult.dxDBGrid1.KeyField:=dxdbgrid1.Columns[0].FieldName;
frmSearchResult.showmodal;
运行后没有对数据进行处理,不知还欠缺什么