20-01-2015, 04:12 PM
كيف فلترة الاعداد و التاريخ والوقت باستخدام ADOQuery
هذه محاولتي
هذه محاولتي
كود :
procedure TForm1.sEdit1Change(Sender: TObject);
begin
if sRadioButton1.Checked=true then
begin
if sedit1.text = '' then begin
adotable1.filter :='';
adotable1.filtered := false ;
end;
if sedit1.Text <> '' then begin
DoIncrementalFilter(ADOTable1, 'nom_etud', sEdit1.Text);
adotable1.Filtered := true;
end;
end;