如何統計報表中的total |
尚未結案
|
suntao008
一般會員 發表:70 回覆:38 積分:21 註冊:2003-10-19 發送簡訊給我 |
|
deity
尊榮會員 發表:90 回覆:876 積分:678 註冊:2003-05-09 發送簡訊給我 |
suntao008您好:
select StaDateTime, EndDateTime, DateTime, Total from table1 union all select 'Total' as StaDateTime, null as EndDateTime, sum(DateTime) as DateTime, sum(Total) as Total, from table1或这样也行: procedure TForm1.Button1Click(Sender: TObject); var Total_DateTime,Total_Total:integer; begin Total_DateTime:=0; Total_Total:=0; with query1 do begin close; sql.Clear; sql.Add('select * from table1'); open; first; while not eof do begin Total_DateTime:=Total_DateTime Fieldbyname('DateTime').AsInteger; Total_Total:=Total_Total Fieldbyname('Total').AsInteger; next; end; append; Fieldbyname('StaDateTime').Asstring:='Total'; Fieldbyname('EndDateTime').Asstring:=' '; Fieldbyname('DateTime').AsInteger:=Total_DateTime; Fieldbyname('Total').AsInteger:=Total_Total; post; end; end;试试看吧 <> ============================ 为什么经过多年以后,得失的过程如此冷漠 ============================ > |
zxy666666
中階會員 發表:108 回覆:150 積分:86 註冊:2005-01-14 發送簡訊給我 |
|
pillar62
資深會員 發表:9 回覆:324 積分:271 註冊:2002-04-15 發送簡訊給我 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |