cxgrid ustalarına bir soru......?

[mk64]

iki adet cxgridim var bunların her ikisindede sütun toplamı (footer) alanı var bu iki footer alanları birbirinden çıkarıp table alanındaki bakiye alanına nasıl yazdırabilirim.

[mudipasa]

sayın mk64 kardeşim ben forumu karıştırırken dxgrid deki alttoplamı tableye yazma vardı görmüş ve not etmiştim. şuan kaynaklarımdan uzağım eğer benden önce cevap gelmezse tekrar cevap yazarım. sana kolay gelsin..

[acimen]

footer toplam değerini bu satırlar alıyorum ben kolay gelsin.

cxGrid1DBTableView1.DataController.Summary.FooterSummaryItems[0]

[mk64]

benim sorunum ilk planda iki cxgridte bulunan footer alanın farkını almak ve bunu vt'de bir alana yazdırmak.

[acimen]

tamam işte her ikisini al farkını vt ye yaz.

[mk64]

Datamodule1.table5.edit;
Datamodule1.Table5KALANBAKIYE.value := cxGrid1DBTableView1.DataController.Summary.FooterSummaryValues[0]-
cxGrid2DBTableView1.DataController.Summary.FooterSummaryValues[0];
Datamodule1.Table5.post;

yazmış olduğum kod ile "could convert variant of type (Null) into type (Double)" hata mesajı alıyorum ne anlatmak istiyor anlamadım. yardımcı olurmusunuz.

[serkan]

iki cxgriddeki footer toplamlarından birinin veya ikisininde boş olduğunu söylemeye çalışıyor.işlemleri yapmadan önceden
if bloklarıyla footerların toplamında bir değer varmı yokmu kontrol etmen gerekir.[/code]

[DarkEternal]

şu şekilde yapabilirsin...

Kod: Tümünü seç

procedure FooterHesapla;
var
Footer1, Footer2 : Double;
begin

  if cxGrid1DBTableView1.DataController.Summary.FooterSummaryValues[0] = Null then
Footer1 := 0
else
Footer1 := cxGrid1DBTableView1.DataController.Summary.FooterSummaryValues[0];

  if cxGrid2DBTableView1.DataController.Summary.FooterSummaryValues[0] = Null then
Footer2 := 0
else
Footer2 := cxGrid2DBTableView1.DataController.Summary.FooterSummaryValues[0];
  
  Datamodule1.table5.edit;
  Datamodule1.Table5KALANBAKIYE.value :=  Footer1 - Footer2;
  Datamodule1.Table5.post;
end;

[mk64]

teşekkürler darketernal verdiğin kod ile problemim çözüm buldu eline ve aklına sağlık

[DarkEternal]

Rica ederim, probleminin çözülmesine sevindim...