التعديل على كود فلترة

[tahar1983]

السلام عليكم
اريد التعديل على هذا الكود بحيث يصبح يبحث على الكلمة المدخلة مهما كان موقعها

كود :

            if edit5.Text <>'' then begin form1.adotable9.filter := 'Cité_AR like '+ quotedstr(edit5.Text+ '*'); form1.adotable9.filtered := true;   end   else   form1.adotable9.Filtered := false;

مثلا يصبح يجلب   كلمة المرجة في الكلمات
..........المرجة........
المرجة...........
...........الكمية.........المرجة

مهما كان موقعها

[أبو معاذ]

وعليكم السلام ورحمة الله وبركاته.

جرب الكود التالي :

كود :

if edit5.Text <>'' then begin   form1.adotable9.filter := 'Cité_AR like %'+ quotedstr(edit5.Text+ '%');   form1.adotable9.filtered := true; end else   form1.adotable9.Filtered := false;

[tahar1983]

وعليكم السلام ورحمة الله وبركاته.

جرب الكود التالي :

كود :

if edit5.Text <>'' then begin   form1.adotable9.filter := 'Cité_AR like %'+ quotedstr(edit5.Text+ '%');   form1.adotable9.filtered := true; end else   form1.adotable9.Filtered := false;

لم ينجح ضهر خطا

[Ndagor]

كود :

form1.adotable9.filter := 'Cité_AR like '+ quotedstr('%'+edit5.Text+ '%');

[tahar1983]

بارك الله فيك لقد نجح الكود