Edit4.text框中能显示统计数据
Edit5.text框中不能显示统计数据

部分代码:

with ADOQuery1 do
begin
close;
SQL.Clear;
sql.Add(sql_str); //添加SQL查询语句
open;
sum:=0;
summ:=0;
if N54.Checked=true then begin
first;
while not eof do
begin
if ADOQuery1.fieldbyname('管道段长度').asstring<>'' then
sum:=sum+ADOQuery1.fieldbyname('管道段长度').value;
if ADOQuery1.fieldbyname('总孔数').asstring<>'' then
summ:=sum+ADOQuery1.fieldbyname('总孔数').value;
next;
end;
Edit4.text:=inttostr(sum);
Edit5.text:=inttostr(summ);

SELECT 管道段长度=SUM(管道段长度), 总孔数=SUM(总孔数) FROM 表 where 条件
______________________
edit4.text:=ADOQuery1.fieldbyname('管道段长度').asstring;
edit5.text:=ADOQuery1.fieldbyname('总孔数').asstring;

楼上的做法要再添一个adoquery。