delphi4arab منتديات دلفي للعرب
الفلترة مرتين - نسخة قابلة للطباعة

+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : الفلترة مرتين (/showthread.php?tid=5989)



الفلترة مرتين - مبرمج مبتدأ - 03-03-2014

السلام عليكم و رحمة الله و بركاته
ما هي طريقة فلترة الجدول مرتين.
مثال: لدي جدول يحتوي على أسماء، أريــد أن أظهر الأسماء التي تحتوي على محمد فقط و من ثم مواليد 1990 فقط
النتيجة: يظهر في الجدول أسامي محمد مواليد 1990 فقط
و جزاكم الله خيرا


الفلترة مرتين - Anter2010 - 03-03-2014

السلام عليكم

كود :
http://fr.wikibooks.org/wiki/Programmation_SQL/Langage_de_manipulation_de_donn%C3%A9es



الفلترة مرتين - مبرمج مبتدأ - 03-03-2014

شكرا عنتر، و لكني أنا لا أستخدم Sql



الفلترة مرتين - Lam.Abdeldjalil - 03-03-2014

السلام عليكم
مثال
كود :
with ADODataSet1 do begin Filtered := False; Filter := 'State = ' + QuotedStr('CA') + ' OR ' + 'State = ' + QuotedStr('CA'); Filtered := True; end;
كود :
http://docwiki.embarcadero.com/Libraries/XE5/en/Data.DB.TDataSet.Filter
بالتوفيق


الفلترة مرتين - مبرمج مبتدأ - 03-03-2014

الكود لم يعمل أخي عبد الجليل، و هذدا الكود الذي استخدمته قبلا
كود :
if checkbox1.Checked then form3.abstable1.Filter := 'datee like' + quotedstr (edit1.Text) +'and'+'Nom_Cln like'+ quotedstr (edit2.Text); form3.ABSTable1.Filtered := true ;




الفلترة مرتين - Lam.Abdeldjalil - 04-03-2014

السلام عليكم

ينقصك % في like
و في التاريخ إستعمل = بدل like

بالتوفيق


الفلترة مرتين - مبرمج مبتدأ - 04-03-2014

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

لم يعمل الكود أخي الكريم، فهو يفلتر لمرة واحدة فقط، علما أني جربت هذا و نفس المشكلة

كود :
[align=left]if radiobutton1.Checked then begin with (form3.abstable1) do begin if edit1.Text = '' then filtered := false else begin Filter := 'datee like ' + QuotedStr('%'+Edit1.Text + '%') +'and'+'Nom_Cln like ' + QuotedStr('%'+Edit2.Text + '%') ;; filtered := true ; end; end; end; [/align]



الفلترة مرتين - مبرمج مبتدأ - 04-03-2014


الحمد لله أن وفقني الله للحل و هو :

في الـ Edit1 حيث أريـد أن أفلتر البيانات حول كلمة 'محمد' أضع الكود التالي:
كود :
form3.ABSTable1.Filter := 'datee like ' + quotedstr('%'+edit1.Text+'%') + 'and ' + 'Nom_Cln like ' + quotedstr('%'+edit2.Text+'%'); form3.ABSTable1.Filtered := true ;
و في الـ Edit2 حيث أريـد أن أفلتر البيانات حول التاريخ أضع نفس الكود




سؤال جانبي: ما هو الكود المناسب لتأخذ الـ Edit2 نفس كود Edit1 بدون أن أضطر لكتابة الكود مرتين ؟


و صل اللهم على سيدنا محمد و على آله وصحبه اجمعين

و شكرا للجميع ...



الفلترة مرتين - Lam.Abdeldjalil - 05-03-2014

الحمد لله
كود :
سؤال جانبي: ما هو الكود المناسب لتأخذ الـ Edit2 نفس كود Edit1 بدون أن أضطر لكتابة الكود مرتين ؟
* في حدث OnChange الخاص بـ Edit2 ضع
كود :
Edit1Change(sender);
* أو في الـ ObjectInspector الخاص بـ Edit2 إختر الحدث Edit1Chang في OnChange

بالتوفيق