請教各位先進: 我有主檔pura,明細檔purb 當我點主檔的一筆資料,明細檔就會將同一inv_no明細顯示出來, 那我要如何將明細檔的數量,金額作加總顯示在form1上

建議您可利用AggregateField的方式來作作看。

請問AggregateField的方式要如何用呢? 可以詳細說明嗎?

請參考 http://delphi.ktop.com.tw/topic.php?TOPIC_ID=33280 http://delphi.ktop.com.tw/topic.php?TOPIC_ID=39820 另外請多利用搜尋條件,本站相關資料不少,有問題在POST... TRY TRY SEE.

您好 就您剛剛的問題，ｃｈｉｎ大大應給您相關資料的方向了，如果您這邊還有什麼實作方面的問題的，在DELPHI裡有DEMO可供您這邊看,也比較方便您這邊實作，在DEMO裡的MIDAS目錄裡應有AGGREGATE相關的範例。(我的是D7有，其他的版本小弟就不清楚了，但您可以找找應當找得到)

你可以在主檔pura所對應的Query的 onafterscroll事件寫 舉例 :

procedure TfrmAppMapUser.aqTmpAfterScroll(DataSet: TDataSet);
var
  sumQty , sumAmt : integer;
begin
  sumQty := 0; //<---數量
  sumAmt := 0; //<----金額
  if query1.state in [dsBrowse] then
  begin
    query2.DisableControls ;// <--可用可不用
    query2.first ;
    while not query2.eof do
    begin
      sumQty := sumQty query2.FieldByName('數量').asinteger;
      sumAmt := sumAmt query2.FieldByName('金額').asinteger;
      query2.next;
    end;
    query2.EnableControls ; // <--可用可不用
    Label1.text := inttostr(sumQty );  //<---顯示數量
    Label2.text := inttostr(sumAmt );  //<----顯示金額
  end;
end;

ps: query1 <----主檔 query2 <----明細檔 天行健 君子當自強不息~~@.@

------
天行健
君子當自強不息~~@.@

另一種作法 : 你再拿一個Query 同樣連結到主檔的query做設定 這個query的名字 假設 groupQuery 設定完後 在這個新的query 裡面的sql屬性 直接寫sql 例 :  select inv_no,sum(數量) as sumqty,sum(金額) as sumamt from purb  where 0=0  group by inv_no    然後在formshow的時候 就open 這個query    同樣你可以在主檔pura所對應的Query的 onafterscroll事件寫

procedure TfrmAppMapUser.aqTmpAfterScroll(DataSet: TDataSet);
begin
  label1.text := inttostr(groupquery.FieldByName('sumqty').asinteger);
  label2.text := inttostr(groupquery.FieldByName('sumamt').asinteger);
end;

這個應該比較簡單 天行健 君子當自強不息~~@.@ 發表人 - T.J.B 於 2004/08/11 14:47:41 發表人 - T.J.B 於 2004/08/11 14:50:57

------
天行健
君子當自強不息~~@.@

感謝各位先進的指導