Sql ile toplam kayıt sayısını bulmak.

[beyaztilki]

merhaba kolay gelsin .
aşağıdaki kodu kullanıyorum ancak ne yaptıysam hata mesajından kurtulamadım. bana bu konu hk. yardımlarınız için şimdiden teşekkürler.

modul_x.tablo_y.Close;
modul_x.tablo_y.SelectSQL.Clear;
modul_x.tablo_y.SelectSQL.Add('select durumu ,count (is_id) as toplam from islistesi where durumu='deneme' GROUP BY durumu');
label7.caption:=modul_x.tablo_y.params[0].AsString;
modul_x.tablo_y.open;

yapmak istediğim olay şu ; elimde bir tablo var bu tabloda durumu olarak belirtilen bir alanım mevcut. comboboxda seçtiğim seçeneğe göre grid nesnemde kayıtlar listeleniyor. kaç kaydın bulunduğunu label veya formun captionu na aktarmak istiyorum. bu yukardaki sorguyu sql maneger içinde denediğimde hata vermiyor. ama delphide hata mesajı ile karşılaşıyorum.

acemice bir soru olduğunu biliyorum ama çözüm bulamadım açıkcası burada hata nerede ?

[Battosai]

label7.caption:=modul_x.tablo_y.Fields[1].AsString;

[beyaztilki]

label7.caption:=modul_x.tablo_y.Fields[1].AsString;

bu dediğin olmadı başka bir yöntem olabilir mi acaba. ayrıca tüm kayıtların toplamını göster diyorum gene aynı acaba form create değilde başka bir yere yazmak mı gerekiyor.

[aslangeri]

s.a.
birde tabloyu open ettikten sonra deneyin isterseniz.
kolay gelsin.

[beyaztilki]

kusura bakmayın çok sıktım ama hala çözüm olmadı nerde hata olduğunu bulamıyorum. 'aslangeri' senin dediğin gibi de olmadı. acaba aşağıdaki koda göre çıkan sonucu label yazdıran bir kod örneği yazarmısınız?

modul_x.tablo_y.Close;
modul_x.tablo_y.SelectSQL.Add('select count(*) from y');
..................
modul_x.tablo_y.Open;


şimdiden sağaolun.

[Battosai]

modul_x.tablo_y.Close;
modul_x.tablo_y.SelectSQL.Add('select count(*) from y');
modul_x.tablo_y.Open;
label7.caption:=modul_x.tablo_y.Fields[0].AsString;

[beyaztilki]

aynı işlemi yeni projede yaptım bu sefer farklı bir hata verdi. hatam nerdedir bilgi verebilirmisiniz.
hata mesajı : project project1.exe raised exception class EIBnterbaseError with message 'dynamic SQL Error sql error code=-104
token unkown - line , column 1
select '.process stopped. şeklinde hata veriyor.

[beyaztilki]

arkadaşlar yardımlarınız için teşekkürler. verdiğiniz bilgilerle bayağı deneme yaptıktan sonra aşağıdaki kod ile son halini aldı. çok çok teşekkürler.

IBQuery1.Close;
IBQuery1.SQL.Clear;
IBQuery1.SQL.Add('select count(*) from islistesi where durumu like:durum group by durumu');
IBQuery1.Params[0].AsString:=ComboBox2.Text;
IBQuery1.Open;
Label1.Caption:=IBQuery1.Fields[0].AsString;


yaptığı iş şu - tabiki bilmeyen arkadaşlara yardım olsun diye yanlı anlaşılmasın. - combobox2 de yazılı veriyi sorguluyor ve kaçtane bulduysa toplam kayıt sayısını label1 e aktarıyor.