seçilen editlerle filtreleme

[EeCOMP]

selamlar
ben bir program üzerinde çalışıyorum veritabanı kullanıyorum (paradox)
benim formumda neredeyse 20 adet edit var bu editlerden hangisine veri girilirse veri girilenler baz alınarak filtreleme yapılıp arama yapılacak ve sonuçlar db gridde listelenecek mesela benim formumda diyelim yıl, ay, gün, ürün cesidi ,isim var mesela yıl ay ve isim editleri dolduruldu 2003 yılının 6. ayında filan kişiye ne kadar satış yapıldı gibi bunlar filtreleme ile aratılıp dbgridde listelenecek bunu nasıl yapabilirim bide dbgridde listelettiğim verileri nasıl tarih sırasına göre dizebilirim veri giriş sırasına göre listeliyo bu konularda bana yardımcı olursanız çok sevinirim
not: program amatör bir programdır veritabanı olarak sadece paradox biliyorum sql felan hiç bilmiyorum
kendinize iyi bakın hoşçakalın

[husonet]

Forum'da cevabı var. Arama yolu ile daha hızlı yanıt bulabilirsiniz.

Kolay Gelsin...

[sadettinpolat]

bildiğim kadarıyle bunun basit bir yolu yok.
bütün editleri teker teker kontrol edip gerekli olan sql ifadesini sizin oluşturmanız lazım.

Kod: Tümünü seç

örnek

strSql := 'Select * from Musteriler Where ';

if edtMusteriAd.Text <>'' Then
   strSql := strSql + ' MusteriAd =' + #39 + edtMusteriAd.Text + #39 + ' or';

if edtMusteriSoyad.Text <>'' Then
   strSql := strSql + ' MusteriSoyAd =' + #39 + edtMusteriSoyAd.Text + #39 + ' or';

if edtMusteriNo.Text <>'' Then
   strSql := strSql + ' MusteriNo =' + edtMusteriNo.Text + ' or';

bu şekilde devam eder.
sorgunun tipine göre or yerine and kullanabilirsin.

dikkat etmen gereken husus bütün şartları ekledikten sonra sql ifadesinin en sonunda fazladan bir or kalıyor. onuda Delete prosedürüyle silmen lazım.

sıralam işlemi için combobox bileşenine sırasıyla
MusteriAd,MusteriSoyad ve MusteriNo striglerini ekle

sonra

Kod: Tümünü seç

case combobox1.itemindex of
 0: strSql := strSql + ' order by MusteriAd';
 1: strSql := strSql + ' order by MusteriSoyad';
 3: strSql := strSql + ' order by MusteriNo';
End;

kodlarda yazım hatası olabilir
kolay gelsin...