cxGrid Summay sum

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
Kullanıcı avatarı
m_ekici
Kıdemli Üye
Mesajlar: 563
Kayıt: 11 Haz 2003 06:49
Konum: Adana
İletişim:

cxGrid Summay sum

Mesaj gönderen m_ekici »

Merhaba arkadaşlar

cxGrid içerisindeki kolonları runtime oluşturuyorum. tüm kolonların alt toplamları var bunları da tekrar toplamam lazım.
Nailenin bir örneğini buldum ama gruplama ile yapmış. Runtime da oluşturduğum kolon toplamlarını nasıl tekrar toplarım?

İyi çalışmalar
Kullanıcı avatarı
m_ekici
Kıdemli Üye
Mesajlar: 563
Kayıt: 11 Haz 2003 06:49
Konum: Adana
İletişim:

Re: cxGrid Summay sum

Mesaj gönderen m_ekici »

Kod: Tümünü seç

for i := 0 to Query1_.FieldCount - 1 do
      begin
      try
      Tpl := AView.DataController.Summary.FooterSummaryValues[I]
      except
      Tpl := 0;
      end;
      Gtop := Gtop + Tpl;
      end;
Kullanıcı avatarı
freeman35
Admin
Mesajlar: 2385
Kayıt: 12 Haz 2003 04:05
Konum: merkez camii yanı

Re: cxGrid Summay sum

Mesaj gönderen freeman35 »

View ı ve summary ID sini göndermen yeterli

Kod: Tümünü seç

function GetGroupFooterValues(VIW : TcxGridDBTableView; Group, ID : Integer): 
    Extended;
var V : Variant;
begin
  V := null;
  Result := 0.0;
  try
    V := VIW.DataController.Summary.GroupSummaryValues[Group, ID];
    if V <> null then Result := Extended(V);
  finally
  end;
end;

function GetFooterValues(VIW : TcxGridDBTableView; ID : Integer): Extended;
var V : Variant;
begin
  V := null;
  Result := 0.0;
  try
    V := VIW.DataController.Summary.FooterSummaryValues[ID];
    if V <> null then Result := Extended(V);
  finally
  end;
end;
Kolay gele
ZAGOR TENAY TÜRK'tür... TÜRK kalacak...
Zoru başarırım, İmkansız zaman alır
FreeMan 35.5

Soru sormaya üşenmiyorsan, sorunun çözümünü yazmaya da üşenme !!!
Cevapla