1. tablo master 2. tablo detail yap , form create olurken her 2 tabloyuda sql ile cagır.

1. tablonun first une git, bookmark koy , 2. tablo otomatikmen filtrelenecekdir ,
2. tabloyu first den eof kadar gez ve ilgili fielgları topla , en son bookmarkı bozmadan 1.tabloda ki gerekli yere total degeri edit et.

1. tablo TblFirma , 2. tablo TblFirmaFatura olsun.
2. tabloda faturatutarı die bi field ın var sayalım, 1. tablodada faturatoplam.
var
  B : TBookmark;
  FaturaToplam : double ;
begin
 
  TblFirma.first;                 // master tablomuzun ilk satırındayız ve detail tabloyu filtreledik
  while not TblFirma.eof do   
  begin
    FaturaToplam := 0;
    try
      B :=TblFirma.getbookmark;  //master tablomuza nokta koyduk ki detail da gezerken
      TblFirmaFatura.first                //sıramızı bozmasın
      while not TblFirmaFatura.eof do  //detail tablomuzun  first une gittik ve artık ofirmanın
      begin                                         //bütün faturalarını filtreledik
        faturatoplam := faturatoplam + TblFirmaFaturafaturatutarı.value ;//baştan aşşa
        TblFirmaFatura.next;   //dolaşarak total fatura toplamını bulduk
      end;
  finally //en son da master tablomuzdaki nokta koydugumuz yere geri döndük 
    TblFirma.gotobookmark(B);
    mdtblfirma.edit;            //master tablomuza edit açtık ve gerekli fielda sonucu postladı
    mdtblFirmaFaturaToplam := faturatoplam ;
    mdtblfirma.post;
    TblFirma.freebookmark(B);
  end;
  TblFirma.next;  //yeni firmaya geçtik.
end;
   
kusura bakma iş çıkışı acil oldu biras, burda esinlenebilirsin.

     erdogan kardeşim , code copy paste yaptıkdan tablo isimlerinin degişikliklerini yapmış var sayıyorum.
    1. si sen bu fatura görüntüleme işlemini bi butona basarakmı yoksa form acıldıkdan sonramı görmek istiyorsun..
   2.gridde göremedim demişsin,
   2.a gridin gerekli database baglantılarını sağlandın mı, tablodaki fieldları code calışmadan gridde görebiliyormusun,
   2.b  code calışıtı demişsin , code calıştıkdan sonra hesap field ımı boş görünüyor yoksa bütün grid mi boş görünüyor.

arkadaşlar denediz elinize sağlık , ama denedim yapamadım demek yeterli olmuyor , nerde cevap alamadınız , code yazdınız "trace" ettinizmi sonuç dogru geliyormu...hangi controllerde takılıyorsunuz istediğinizi alamıyorsunuz ?

ek de demişsin ama eki göremedim ben..

Erdoğan arkadaşım öncelikle kolay gelsin;
sorguları formun show unda degil creatinden cekmen lazım ki form acılmadan öncede datasetler dolsun, işleme hazır olsunlar ,

senin master tablon
      carikart bunu adoquery ile , name ine AdoQueryCariKart de
senin detail tablon
      faturalar bununda adotable ile , database den cagır.   name ine AdoTableFaturalar de
     
      bu iki tabloyu master-detail şekilde yapılandır. 
      aşşadaki codu önce bi butona yaz dene , sonra bi procedure e yaz istediğin yerde kullan.
            var
        B : TBookmark; 
        FaturaToplam : double ;
      begin   
        AdoQueryCariKart.first;    // master tablomuzun ilk satırındayız ve detail tabloyu filtreledik         
        while not AdoQueryCariKart.eof do   
        begin   
        FaturaToplam := 0; 
        try   
          B :=AdoQueryCariKart.getbookmark;                //master tablomuza nokta koyduk ki detail da gezerken     
          AdoTableFaturalar.first                          //sıramızı bozmasın 
          while not AdoTableFaturalar.eof do               //detail tablomuzun  first une gittik ve artık ofirmanın     
          begin                                            //bütün faturalarını filtreledik     
            FaturaToplam := FaturaToplam + AdoTableFaturalar.FieldByName('Fatura_Toplam').value ;  //baştan aşşa     
            AdoTableFaturalar.next;                         //dolaşarak total fatura toplamını bulduk     
          end;                                 
        finally                                             
          AdoQueryCariKart.gotobookmark(B);                  //en son da master tablomuzdaki nokta koydugumuz yere geri döndük
          AdoQueryCariKart.edit;                            //master tablomuza edit açtık ve gerekli fielda sonucu postladı       
          AdoQueryCariKartTOPLAMM.value := FaturaToplam ;   
          AdoQueryCariKart.post;   
          AdoQueryCariKart.freebookmark(B); 
        end;
        AdoQueryCariKart.next;   //yeni firmaya geçtik.
      end;
            senin tablolarına göre yukarıdaki codu düzenledim, bu code bende calışıyoru şuan , sana bi not adoquery ile database e baglanma
      da bilgi eksilikğin var, bunu önce araştırmanı tavsiye ediyorum,
      TADOConnection objesi olmadan hiç bi database e ado larla sorugu cekemezsin.
      programı sana yollamıyorum nie dersen , bu işi araştırarak ögrendiğinde cok yol katetmiş olduğunu anlıyacaksın.
      kusura bakma biras aceleye geldi , işteyim malesef. umarım işine yarar.
      kolay gelsin.  olmadı yolluyayım

eki aç  orda TADOconnection ın ayarını db nerdeyse ona göre ayarla ve calıştır. kolay gelsin.

nasıl istersen herkeze faydamız dokunsun , ama bu sana yolladığım yapıyı , anladıgın an cok şeyi kolaylıkla yapabileceksin. ne kadar kolaymış demi ) kolay gelsin..