! CODEBANK 2012 !
İNDİRMEK&DETAYLI BİLGİ ALMAK İÇİN BURAYI TIKLAYINIZ.
ÖNEMLİ AÇIKLAMA: MUTLAKA OKUYUNUZ!
0 Üye ve 1 Ziyaretçi konuyu incelemekte.
procedure TKisilerForm.SearchBtnClick(Sender: TObject);begin if CariRadio.Checked = True then ADOQuery1.close; ADOQuery1.SQL.clear; ADOQuery1.SQL.Add('SELECT * FROM kisiler'); ADOQuery1.SQL.Add('Where kisiID like '''+SearchEdit.Text+'%'' '); ADOQuery1.filtered := True; ADOQuery1.Open; if AdiRadio.Checked = True then ADOQuery1.Close; ADOQuery1.SQL.clear; ADOQuery1.SQL.Add('SELECT * FROM kisiler'); ADOQuery1.SQL.Add('Where Adi like '''+SearchEdit.Text+'%'' '); ADOQuery1.Filtered := True; ADOQuery1.Open; if SoyadiRadio.Checked = True then ADOQuery1.close; ADOQuery1.SQL.clear; ADOQuery1.SQL.Add('SELECT * FROM kisiler'); ADOQuery1.SQL.Add('Where Soyadi like '''+SearchEdit.Text+'%'' '); ADOQuery1.filtered := True; ADOQuery1.Open;end;
