CxGrid Master Detail Summary genel toplam almak

[Abrak]

s.a. arkadaşlar
3 gündür uğraşıyorum artık kafam karmakarışık oldu

AviEW
. BviEW


CXGRİD üzerinde master detail ilişkili tablom var BvİEW Footer de toplamlarım var, bu BivEW miktar toplamlarını birtürlü AviEW fotuer alanında gösteremedim yardımcı olursanız sevinirim

[Lost Soul]

http://www.divshare.com/download/17008915-48c

[Abrak]

http://www.divshare.com/download/17008915-48c

malasef bununla ilgili bir örnek mevcut değil

[Lost Soul]

kızma ama bu ve bundan daha fazlası mevcut o örnekte. Sadece bakmayı bilmiyorsun. Tıpkı internettte group ve summarry ile ilgili istemedeğin kadar örnek varken bulamadığın gibi.

[Abrak]

kızma ama bu ve bundan daha fazlası mevcut o örnekte. Sadece bakmayı bilmiyorsun. Tıpkı internettte group ve summarry ile ilgili istemedeğin kadar örnek varken bulamadığın gibi.

kızacak bir durum yok allah rızası için karşılıksız bilgi alışverişi olan biryer olduğunun farkındayım

peki bana o demoda bakmam yeri öğretirmisin rica etsem...




şuanda sanırım yada yanlış anlaşılma var aradığım group toplamları değil Master Detail ilişkisi içerisinde detaildeki toplamları Master deki group footer e yazdırma tekrar bakıyorum gene bulamıyorum

[Abrak]

ben link atmak yerine sonucu paylaşmak istedim

çok uğraştım ama değdi detail tablodaki footer alanını master alanda göstermek için ayrıca detail tabloda değişiklik olduğunda masterdeki footer i alanını anında güncelliyor

Kod: Tümünü seç

  private
    { Private declarations }
    procedure Toplamalanı(var MSG:TMessage); Message WM_MyMessage;

Kod: Tümünü seç

procedure TForm1.cxGrid1DBTableView1DataControllerSummaryFooterSummaryItemsSummary(
  ASender: TcxDataSummaryItems; Arguments: TcxSummaryEventArguments;
  var OutArguments: TcxSummaryEventOutArguments);
var
  ADC: TcxCustomDataController;
begin
  ADC := ASender.Summary.DataController.GetDetailDataController(Arguments.RecordIndex, 0);
  OutArguments.Value := ADC.Summary.FooterSummaryValues[0];
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
  cxGrid1DBTableView1.DataController.Summary.Recalculate; //Master Toplam ı güncellemek için
end;

procedure TForm1.Table2OnChange(Sender: TField);
begin
  PostMessage(Self.Handle,WM_MyMessage,0,0); ///Detail tabloda değişiklik olduğunda tetikliyor
end;

procedure TForm1.FormShow(Sender: TObject);
begin
  Table2.FieldByName('Miktarlar').OnChange:=Table2OnChange; //detail tablonun ilgili alanında değişiklik olduğunda 
end;

procedure TForm1.ToplamAlanı(var MSG: TMessage);
begin
  cxGrid1DBTableView1.DataController.Summary.Recalculate;
end;