dbgridde sütun toplamı?

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
Kullanıcı avatarı
nitro
Üye
Mesajlar: 1112
Kayıt: 23 Ağu 2004 01:18
Konum: Çanakkale
İletişim:

dbgridde sütun toplamı?

Mesaj gönderen nitro »

s.a.
veritabanı firebird.
bir tablo var. içinde bir sürü kayıt var. bir de aynı tabloya bağlı bir dataset var.
NOT: datasetin cachedupdates özelliği true (iptal'e basıldığı zaman post edilmesin diye)
yeni butonuna basıldığı zaman datasetin select sql'ine hiçbir kayıt bulmayan bir kod ekletiyorum. böylece datasete bağlı olan dbgrid tamamen boş olarak ekrana geliyor. sonra başlıyorum dbgride kayıtları girmeye. ben kayıt girdikçe aşağıda bir editte bir sütunun değerleri toplamı gözüksün istiyorum. şöyle yani:

Kod: Tümünü seç

ekmek  100 ytl
peynir 140 ytl
helva  40 ytl

               toplam: 280 ytl
tabi ben sırayla satır satır işlemleri yazıyorum mesela, toplam da aşağıda duruyor. ekmek satırındaki tutarı 50 ytl yaptığım zaman toplam hemen değişsin istiyorum.

aramalar sonucu elde ettiğim çözümler geçerli olmadı. çünkü

- query kullanamam. çünkü kayıtlar daha post edilmedi.
- queryi datasete bağlasam olay çözülür ama query'e select sum(tutar) from ibdataset1 yazamam di mi? :shock:
- şöyle bi kod kullansam

Kod: Tümünü seç

ibdataset.first;
while not ibdataset.eof do
     begin
     toplam:=toplam + ibdatsettoplam.value;
     ibdataset.next;
     end;
olmaz çünkü bu kod, tabloyu hareketlendirir. kullanıcı birinci satırda işlem yaparken, bi bakar son satıra gelmişim 8)

- calculated field olaylarına baktım ama bir calculated fieldin kullanımını öğrendim. ama o satır bazlı işlem yapıyor. yani calculated field'e toplam nasıl hesaplatacağım? bulamadım
yardımlarınız için şimdiden teşekkürler
Kullanıcı avatarı
selimr
Üye
Mesajlar: 556
Kayıt: 16 Eki 2003 02:07

Mesaj gönderen selimr »

bence memory table kullan,

ve daha sonra hepsini birden kaydet veya iptal et..

jedi seti içinde JvDBEMemoryTable bileşenini kullanabilirsin...

( isteğini yanlış anlamadıysam )
Kullanıcı avatarı
nitro
Üye
Mesajlar: 1112
Kayıt: 23 Ağu 2004 01:18
Konum: Çanakkale
İletişim:

Mesaj gönderen nitro »

nerden bulucam o seti? paralı mı? bedava mı?
Kullanıcı avatarı
selimr
Üye
Mesajlar: 556
Kayıt: 16 Eki 2003 02:07

Mesaj gönderen selimr »

Kullanıcı avatarı
nitro
Üye
Mesajlar: 1112
Kayıt: 23 Ağu 2004 01:18
Konum: Çanakkale
İletişim:

Mesaj gönderen nitro »

bu paket delphi 7 için uygun mudur?
ayrıca p sitede birsürü şey var. hangisini indiricem.
JCL300 build1848.zip diye bişey indiryorum ama doğru şey mi?
Kullanıcı avatarı
selimr
Üye
Mesajlar: 556
Kayıt: 16 Eki 2003 02:07

Mesaj gönderen selimr »

indirilecek olan dosya bu..

JVCL300CompleteJCL195-Build1848.zip

evet delphi 5-6-7-2005 hepsi için uyumlu


indirdikten sonra zipli dosyayi bir klasore aç..
açtığın yerde dizin içinde iki dizin var..

yanlış hatırlamıyorsan.. JVC ve JVCL dizinleri..

daha sonra

delphi kapaliyken;

JVC içindeki install.bat dosyasını çalıştır.. bittikten sonra;
JVCL içindeki install.bat dosyasını çalıştır.. Hepsi bu..


herşey bittikten sonra delphi yi çalıştır.. Componentler kurulmuş olacaktır..
Kullanıcı avatarı
nitro
Üye
Mesajlar: 1112
Kayıt: 23 Ağu 2004 01:18
Konum: Çanakkale
İletişim:

Mesaj gönderen nitro »

dostlar ben bu sorunu çözmüştüm ama sıkıntı çıkarıyor daha orjinal fikirler lazım. ya dos programı logo alınterinde adam fatura kaydı yaparken kullanıcı satır ekledikçe altta toplam oluşuyor. bu kadar zor bişey olmasa gerek bu olay.
Kullanıcı avatarı
nitro
Üye
Mesajlar: 1112
Kayıt: 23 Ağu 2004 01:18
Konum: Çanakkale
İletişim:

Mesaj gönderen nitro »

tmsgrid in DBADVstringgridinde columnsum() diye bi komut var o topluyor. sonucu veriyor ama bu tms gridde enter ile dolaşım olayını yapamadım.
tms gridler hakkında elinde dökümanı falan olan varsa çok makbule geçer.
saygılarımla
Kullanıcı avatarı
vedatkaba
Kıdemli Üye
Mesajlar: 866
Kayıt: 06 Oca 2004 06:50
Konum: DARICA/GEBZE

Mesaj gönderen vedatkaba »

Tms bileşenleri çok güzel bileşendir ama helpinden başka kullanım kaynağı yok galibe (en azından bende yok türkçe veya ingilizce kaynak).Kolay gelsin.
***********************************
Kamil odur ki; koya dünyada bir eser,
Eseri olmayanın, yerinde yeller eser.

***********************************
Kullanıcı avatarı
nitro
Üye
Mesajlar: 1112
Kayıt: 23 Ağu 2004 01:18
Konum: Çanakkale
İletişim:

Mesaj gönderen nitro »

sayın vedatkaba TMS hakkında kendi helpini nerden bulucam?
zaten kendi helpini bulsam yeter. yeterli derecede ingilizcem var. hallederim sanırım.
Cevapla