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

أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .

سلام الله عليكم

لي كود فلترة لم يشتغل معي

جدول يحتوي على حقل NOM

كود :
procedure TForm1.Button1Click(Sender: TObject);

[align=left]Var x:string;

Begin

x:=edit2.Text  ;

table2.Filter:='NOM=''x''' ;

Table2.Filtered:=True ;[/align]

وجدت الحل شكرا

كود :
[align=left]x:=edit2.Text ;

table2.Filter:='Nom='+quotedStr(x)+'or Prenom='+quotedStr(x)+ 'or adresse='+quotedStr(x) ;

Table2.Filtered:=true;

edit2.Text:='';
[/align]

بارك الله فيك أخي الكريم لقد استفدت من مشكلتك

شكرا

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

لؤي

لؤي

بولفعة