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

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



عمل فيلتر على الارقام ado - hmidadz - 29-11-2013

السلام عليكم شباب

لديا قاعدة اكسس مربوطة بالado بها عمود من نوع عدد حقيقي

مثال
champ1
7022545
70
1542
2542
7015
154552

و النتيجة هكذا
7022545
70
7015

اي الاعداد التي تبدا ب70

هل يوجد دالة تقوم بهذا


عمل فيلتر على الارقام ado - Mr.DOS - 29-11-2013

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

كود :
if edit1.Text<>'' then [color=DarkOrange] begin[/color] adotable1.Filter:='[color=Red]FieldName[/color] like ' +quotedstr(Edit1.text); adotable1.Filtered:=true; [color=DarkOrange] end else[/color] adotable1.filtered:=false;



عمل فيلتر على الارقام ado - Agmcz - 30-11-2013

باستعمال sql
PHP كود :
'select * from Table where FieldName like ''70%'''; 



عمل فيلتر على الارقام ado - hmidadz - 05-12-2013

يا اخي **** ان اعملها ب فيلتر

اما بخصوص الرد الاول من الصديق فتعمل لكن عندما تعمل 70 يقوم بفياتر على 70 فقط وليس 700 كمثال

و شكرا


عمل فيلتر على الارقام ado - Agmcz - 05-12-2013

تفضل
PHP كود :
if Edit1.Text <> '' then
  begin
    ADOTable1
.Filter := 'Field like ' + QuotedStr(Edit1.text + '%') {or QuotedStr(Edit1.text + '*')};
    
ADOTable1.Filtered := True;
  
end
  
else
    
ADOTable1.Filtered := False; 



عمل فيلتر على الارقام ado - hmidadz - 10-12-2013

شكرا يا شباب على الردود