線上訂房服務-台灣趴趴狗聯合訂房中心
發文 回覆 瀏覽次數:778
推到 Plurk!
推到 Facebook!

如何在在dbgrid中显示数据表里没有的字段值?

答題得分者是:timhuang
blade
一般會員


發表:9
回覆:5
積分:7
註冊:2004-04-14

發送簡訊給我
#1 引用回覆 回覆 發表時間:2005-03-05 22:09:37 IP:220.166.xxx.xxx 未訂閱
比如我在一个学生分数表里面有如下几个字段: 学号、性别、数学、语文、英语、 我想通过一个查询在dbgrid里面显示所有男生的学号、数学、语文、英语和总分(关键点)我通过一个查询来处理。学号、数学、英语的值很好取到,关键是我怎么在dbgrid里来显示这个总分呢?
timhuang
尊榮會員


發表:78
回覆:1815
積分:1608
註冊:2002-07-15

發送簡訊給我
#2 引用回覆 回覆 發表時間:2005-03-05 23:38:32 IP:220.132.xxx.xxx 未訂閱
Hi, 兩種做法,     1. 由資料庫完成, 此法較單純, 僅需修改 sql command即可, 但負載在 server 上, 如,    select 学号, 性别, 数学, 语文, 英语, sum(数学+ 语文+ 英语) as total from tablex    2. 由 Calculated Field 來進行, 此法較麻煩一點, 但負載是在 client 端, db server 是無須進行此部分的計算, 做法摘要如下,    先將 dataset 元件 (如 TTable, TQuery, TADOTable, TADOQuery 等), 中由資料庫來的欄位全部加入, 接下來再新增一個欄位, Field Type 設定為 Calculated, 接下來自行撰寫該 DataSet 元件的 OnCalcFields 事件即可, 該事件內容就是計算總合囉, 範例如下,    
procedure TForm1.ADOQuery1CalcFields(DataSet: TDataSet);
begin
  DataSet.FieldByName('summ').AsInteger :=
    DataSet.FieldByName('数学').AsInteger   
    DataSet.FieldByName('语文').AsInteger  
    DataSet.FieldByName('英语').AsInteger;
end;
系統時間:2024-05-20 1:59:24
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!