filtreleme

[erdogan_ozkaya]

arkadaşlar iki sutunum var "Cinsiyet" "Adı" aşağıdaki kod ile, "Adı" filtreleyebiliyorum fakat edit1 yazarkende sadece erkekleri veya sadece bayanları filtrelesin.
umarım anlatabilmişimdir.

Teşekkürler.

Kod: Tümünü seç

procedure TKayit.Edit1Change(Sender: TObject);
begin
 begin
   form1.Close;
   form1.SQL.Clear;
   form1.SQL.Add('select * from kayit where Adi Like "%'+Trim(Edit1.Text)+'%"'); // burda edit1 ve  edit2 nesnesindeki bilgiya göre sorgulasın
   form1.Open;
   form1.First;
   Caption:='Bulunan Kayıt : '+veri.FieldByName('Adi').AsString;
end;
end;

[erdogan_ozkaya]

Arkadaşlar teşekkürler çözdüm ihtiyacıolan arkadaş olursa aşağıdaki gibi.

Kod: Tümünü seç

veri.Close;
veri.SQL.Clear;
veri.SQL.Add('select * from kayit where Adi Like "%'+Trim(Edit1.Text)+'%"');
veri.SQL.Add(' AND (cinsiyet = "' + edit2.text + '")');
veri.Open;

[aslangeri]

s.a.
çözümünüzü paylaştığınız için teşekkürler.

[conari]

Cinsiyeti için Edit yerine combobox olarak kullan.
Erkek,Kadın,Hepsi ekle
Query eklerken de Hepsi seçilimi diye kontrol ettir ona göre sorguya ekleme yap.

[erdogan_ozkaya]

tşk. ederim dediğiniz gibi yaptım