delphi4arab منتديات دلفي للعرب

نسخة كاملة : رسالة خطأ بخصوص الفلترة
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم
قمت بعمل فلترة في الحدث on change لعنصر edit لكن عندما أقوم بعملية الفلترة تظهر رسالة خطأ
كالتالي

كود :
Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another
PHP كود :
procedure TForm1.Edit1Change(Sender: TObject);
begin
if Edit1.Text <>'' then
begin
ADOTable1
.Filter := 'Nom_et_Prénom like '+ quotedstr('*'+ Edit1.Text +'*');
ADOTable1.Filtered :=true;
end
else
ADOTable1.Filtered :=false;
end; 
بارك الله فيك أخي
الأن اشتغل معي الكود
المشكلة كانت في انه يجب وضع edit بين نجمتين و انا قمت بوضع نجمة واحدة فقط
شكرا
تفضل

كود :
http://www.dz-soft.net/2012/01/blog-post_932.html