DbGrid Sütün Toplamı Almak (Query Alan Toplamı)

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Kullanıcı avatarı
pro_imaj
Kıdemli Üye
Mesajlar: 1364
Kayıt: 18 Oca 2005 05:45
Konum: Dünyadan

DbGrid Sütün Toplamı Almak (Query Alan Toplamı)

Mesaj gönderen pro_imaj »

Merhaba
Arkadaşlar Dbgrid ile listelenen alanları satır olarak işleme tabi tutabiliyorum ama sütün olarak nasıl yapılabilr bilmiyorum.



Örn: QueryStokmiktar alanlarını toplatmak istiyorum .

StokMiktar
10
15
50


StokMiktar sonuç =75

Bu şekil


Saygılarımla
Çalışmalarınızda başarılar.
Gün gelecek, dilleri, elleri ve ayakları yapmış oldukları bütün kötülükleri tek tek bildirerek aleyhlerinde şahitlik edecektir. [Nur Suresi 24]
_________________
Uğur1982
Üye
Mesajlar: 383
Kayıt: 11 Mar 2005 03:18
Konum: İzmir

Mesaj gönderen Uğur1982 »

Kullanıcı avatarı
pro_imaj
Kıdemli Üye
Mesajlar: 1364
Kayıt: 18 Oca 2005 05:45
Konum: Dünyadan

teşekkür ederim

Mesaj gönderen pro_imaj »

teşekkür ederim.

ben aslında incelemiştim ama bulamamıştım :oops:


Kolay gelsin
Gün gelecek, dilleri, elleri ve ayakları yapmış oldukları bütün kötülükleri tek tek bildirerek aleyhlerinde şahitlik edecektir. [Nur Suresi 24]
_________________
Kullanıcı avatarı
pro_imaj
Kıdemli Üye
Mesajlar: 1364
Kayıt: 18 Oca 2005 05:45
Konum: Dünyadan

olmuyor

Mesaj gönderen pro_imaj »

denedim ama hep hata veriyor.

bir örnek yazarsanız sevinirim.

saygılarımla

Çalışmalarınızda başarılar
Gün gelecek, dilleri, elleri ve ayakları yapmış oldukları bütün kötülükleri tek tek bildirerek aleyhlerinde şahitlik edecektir. [Nur Suresi 24]
_________________
Uğur1982
Üye
Mesajlar: 383
Kayıt: 11 Mar 2005 03:18
Konum: İzmir

Mesaj gönderen Uğur1982 »

merhaba;

Forma 1 Query ,Datasource1,DBGrid koy, bağlantılarını yap
bir butonun clik' ine

Kod: Tümünü seç

with Query1 do
begin
  Close;
  SQL.Clear;
  SQL.Add('select sum(HesaplanacakAlan) from TabloAdi');
  Open;
end;
Firebird kullanıyorsan IBX bileşenleriyle deneyebilirsin.

iyi günler.
Kullanıcı avatarı
vedatkaba
Kıdemli Üye
Mesajlar: 866
Kayıt: 06 Oca 2004 06:50
Konum: DARICA/GEBZE

Mesaj gönderen vedatkaba »

uğurun verdiği kodlada olmuyorsa hatanızla beraber yazın.hatanızı bir görelim ona göre çözüm bulalım.ama kod doğru çalışması gerek .kolay gelsin.
***********************************
Kamil odur ki; koya dünyada bir eser,
Eseri olmayanın, yerinde yeller eser.

***********************************
Kullanıcı avatarı
pro_imaj
Kıdemli Üye
Mesajlar: 1364
Kayıt: 18 Oca 2005 05:45
Konum: Dünyadan

Arkadaşlar olmuyor.

Mesaj gönderen pro_imaj »

invalid columb name 'CiroSonuc'
hatası veriyor.



with Query1 do
begin
Close;
SQL.Clear;
SQL.Add('select sum(CiroSonuc) from FINSAT460.CHK');
Open;
end;

bu kodu yazdım uğur arkadaşımızın belittiği gibi yaptım

birtürlü olmuyor.

Not: Kafama takılan nokta CiroSonuc alanını topluyorumya ben bu sonucu nereye yazıcak bundan dolayı hata veriyor belkide.
Cirosonuc alanını toplayarak bir labele sonucu yazdırmak istiyorum ama olmuyor

Yardımlarınız için tşk ederim.
Kolay gelsin
Gün gelecek, dilleri, elleri ve ayakları yapmış oldukları bütün kötülükleri tek tek bildirerek aleyhlerinde şahitlik edecektir. [Nur Suresi 24]
_________________
Uğur1982
Üye
Mesajlar: 383
Kayıt: 11 Mar 2005 03:18
Konum: İzmir

Mesaj gönderen Uğur1982 »

merhaba;

Kod: Tümünü seç

FINSAT460.CHK
bu tablo ismi değil bence hata bundan kaynaklanıyor.
.CHK bunu kaldır öyle bir dene .

Kod: Tümünü seç

Sonucu nereye yazıcak
bağlantıları yaptın isen gridde gösterir.
Ya da daha pratik olsun diyorsan
Open; kodunun altına

Kod: Tümünü seç

ShowMessage('Toplam Sonuç : '+FloatToStr(FieldByName('SUM').AsFloat));
iyi günler...
Kullanıcı avatarı
pro_imaj
Kıdemli Üye
Mesajlar: 1364
Kayıt: 18 Oca 2005 05:45
Konum: Dünyadan

Sorunu çözdüm ama tam diil

Mesaj gönderen pro_imaj »

arkadaşlar
sorunuı şöyle çözdüm.

query içini boşaltınca sorun olmuyor.

ama böyle yapamak benim için imkansız bunun başka bir yolu olmalı yani query içini boşaltmadan sonucu alabilmek.
birde ben columnname diye bir alana sonucu yazdı bunu nasıl edite yazdırırım.


Saygılarımla
Çalışmalarınızda başarılar.
Gün gelecek, dilleri, elleri ve ayakları yapmış oldukları bütün kötülükleri tek tek bildirerek aleyhlerinde şahitlik edecektir. [Nur Suresi 24]
_________________
Kullanıcı avatarı
vedatkaba
Kıdemli Üye
Mesajlar: 866
Kayıt: 06 Oca 2004 06:50
Konum: DARICA/GEBZE

Mesaj gönderen vedatkaba »

arkadaşım query nin fieldseditöründe,toplamaya çalıştığın alan belirtilmişse bu alanı ordan sil.ondan sonra dene muhtemelen bundan kaynaklanıyor.zaten SQL toplamı aldıktan sonra sonucu boş bir başlık altında verir yok ben sutun adı belirterek sanal alan yapayım dersen

Kod: Tümünü seç

sum(toplanacakalan) as sonualanı
diye yazarsan olur.bu alana ulaşmak için de.normal tablo alanlarına ulaştığın şekilde yaparsın farkı yok.(fieldseditör bileşen üzerinde sağtıkla) kolay gelsin.

edite yazdırmak içinde

Kod: Tümünü seç

edit1.text:=query1.fields[0].value;
***********************************
Kamil odur ki; koya dünyada bir eser,
Eseri olmayanın, yerinde yeller eser.

***********************************
Kullanıcı avatarı
pro_imaj
Kıdemli Üye
Mesajlar: 1364
Kayıt: 18 Oca 2005 05:45
Konum: Dünyadan

Teşekkür ederim ama olmuyor

Mesaj gönderen pro_imaj »

merhaba
cevablarınız için teşekkür ederim ama olmuyor.

yani sizin belittiğiniz gibi denedim olmuyor.
Query içindeki tüm alanları temizlemedğim sürece hata veriyor.

Bu işlemin bu kadar zahmetli olabileceğini düşünmemiştim.

Bence biryerlerde sorun var
ben kodu tekrar yazıyorum.

with Query1 do
begin
Close;
SQL.Clear;
SQL.Add('select sum(KartTip) from FINSAT460.CHK');
Open;
end;

//bu alanın sonucu edite almayıda anlamadım.

Saygılarımla
Çalışmalarınızda başarılar.
Kolay gelsin Arkadaşlar
Gün gelecek, dilleri, elleri ve ayakları yapmış oldukları bütün kötülükleri tek tek bildirerek aleyhlerinde şahitlik edecektir. [Nur Suresi 24]
_________________
Uğur1982
Üye
Mesajlar: 383
Kayıt: 11 Mar 2005 03:18
Konum: İzmir

Mesaj gönderen Uğur1982 »

verdiği hata nedir?
Kullanıcı avatarı
pro_imaj
Kıdemli Üye
Mesajlar: 1364
Kayıt: 18 Oca 2005 05:45
Konum: Dünyadan

hata msj

Mesaj gönderen pro_imaj »

Query1: Field 'HesapKodu' Not Found

alanlarda hesapkoduda mevcut
onu siliyorum bir başkasını veriyor yani hepsini silmemi istiyor sanırım.

Valla böyle giderse sıyırıcam ya :roll:

Hayretler içindeyim daha önce Sütun toplamları ile ilgii işim olmamıştı.

Yardımlarınız için çook teşekkür ederim arkadaşlar
Saygılarımla
Gün gelecek, dilleri, elleri ve ayakları yapmış oldukları bütün kötülükleri tek tek bildirerek aleyhlerinde şahitlik edecektir. [Nur Suresi 24]
_________________
Kullanıcı avatarı
vedatkaba
Kıdemli Üye
Mesajlar: 866
Kayıt: 06 Oca 2004 06:50
Konum: DARICA/GEBZE

Mesaj gönderen vedatkaba »

bir tablo uzantısımı yoksa clientdataset dosyasımı ?

Daha önce bendede meydana gelmişti,bende bu şkilde halletmiştim halen daha hatanın neden meyfana geldiğini anlamış değilim.kocay gelsin.
***********************************
Kamil odur ki; koya dünyada bir eser,
Eseri olmayanın, yerinde yeller eser.

***********************************
Uğur1982
Üye
Mesajlar: 383
Kayıt: 11 Mar 2005 03:18
Konum: İzmir

Mesaj gönderen Uğur1982 »

Ayrıca bunu alan eklenmemiş bir Query ile deneyin.Çünkü ben öyle denedim. :)

Kod: Tümünü seç

Edit1.Text:= FloatToStr(Query1.FieldByName('SUM').AsFloat);
Cevapla