+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : الفلترة باستخدام combobox (/showthread.php?tid=8194)
الفلترة باستخدام combobox - احمد العراقي - 28-10-2016
مرحبا انا عضو جديد في المنتدى و هذه اول مشاركة لي
في الحقيقة عندي مشكلة لدية برنامج يقوم بالفلترة في عدة حقول حيث يتم اختيار الحقل من combobox وهذا الكود المستخدم لكن لا يعمل لا ادري لماذا؟؟؟؟
التقاط.JPG (الحجم : 70.69 ك ب / التحميلات : 29)
كود :
procedure Tfrmmain.SpeedButton1Click(Sender: TObject);
var s:String;
begin
if edit1.Text<>'' then
begin
if combobox1.ItemIndex:=0 then s:='id like '+QuotedStr(edit1.Text+'*');
if combobox1.ItemIndex:=1 then s:='date like '+QuotedStr(edit1.Text+'*');
if combobox1.ItemIndex:=2 then s:='name like '+QuotedStr(edit.Text+'*');
if combobox1.ItemIndex:=3 then s:='subject like '+QuotedStr(edit1.Text+'*');
adotable1.Filter:=s;
adotable1.Filtered:=true;
end
else
adotable1.Filtered:=false;
end;
end.RE: الفلترة باستخدام combobox - S.FATEH - 28-10-2016
السلام عليكم راجع دروس دلفي عند الشرط تستخدم = بدل :=
if combobox.itemindex = 0
RE: الفلترة باستخدام combobox - Mr.DOS - 28-10-2016
سلام عليكم
يبدو انك نسيت end; بغض النضر عن الخطأ الاول بدل := بـــ =
RE: الفلترة باستخدام combobox - احمد العراقي - 29-10-2016
(28-10-2016, 07:35 PM)Mr.DOS كتب : سلام عليكم
يبدو انك نسيت end; بغض النضر عن الخطأ الاول بدل := بـــ =
مشكورين حبايب
كانت مشكلة عاصية عندي فكرت بكل شيء الا := يجب ان تكون = 
لا اعلم كيف غفات عنها و انا تعبان منذ فترة لاني لم استطع حل هذه المشكلة البسيطة جدا صراحة كثرت المشاكل تجعلك تغفل عن ابسط الامور فتظنها معقدة فاذا بالحل امامك و انت لا تراه.على كل حال اشكركم جزيل الشكر على الرد.
(28-10-2016, 06:24 PM)S.FATEH كتب : السلام عليكم راجع دروس دلفي عند الشرط تستخدم = بدل :=
if combobox.itemindex = 0
نعم بالفعل هذه هي المشكلة هههههههه فكرت بكل شيء ممكن الا هذه, على كل حال شكرا جزيلا على الرد
RE: الفلترة باستخدام combobox - khiro08 - 10-02-2017
كيف اقوم بالفلترة ب معاملين في نفس الوقت مثالا الإسم و التاريخ
RE: الفلترة باستخدام combobox - Mustapha29 - 31-03-2017
ضع بينهما AND