+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : كيف أجعل عملية البحث لا تتحسس بحالة الأحرف الكبيرة والصغيرة في Absolute (/showthread.php?tid=10667)
كيف أجعل عملية البحث لا تتحسس بحالة الأحرف الكبيرة والصغيرة في Absolute - فارس المطر - 16-02-2020
السلام عليكم
كيف أجعل عملية البحث لا تتحسس بحالة الأحرف الكبيرة والصغيرة
في قاعدة البيانات Absolute
كود :
begin
Edit1.Text:=TrimLeft(Edit1.Text) ;
if Edit1.Text<>'' then
begin
DataModule1.ABSTable1.IndexFieldNames:='Num_S' ;
DataModule1.ABSTable1.MasterFields:='' ;
DataModule1.ABSTable1.close;
DataModule1.ABSTable1.Filtered:=true ;
DataModule1.ABSTable1.Filter:='[Num_S]='+#39 +Edit1.Text+'*'+#39 ;
DataModule1.ABSTable1.Active:=true;
end else
begin
DataModule1.ABSTable1.close;
DataModule1.ABSTable1.Filtered:=false ;
DataModule1.ABSTable1.Active:=true;
end;
RE: كيف أجعل عملية البحث لا تتحسس بحالة الأحرف الكبيرة والصغيرة في Absolute - لؤي - 17-02-2020
السلام عليكم
To improve peformance of a single-field case-insensitive filter, such as
PHP كود :
FilterOptions := [foCaseInsensitive];
Filter := 'State = ' + QuotedStr('CA');
you should create a case-insensitive index on the search field:
PHP كود :
ABSTable1.AddIndex('idxState_CaseIns', 'State', [ixCaseInsensitive]);
المصدر:
كود :
http://www.componentace.com/help/absdb_manual/speedupsearchesandfilters.htmRE: كيف أجعل عملية البحث لا تتحسس بحالة الأحرف الكبيرة والصغيرة في Absolute - فارس المطر - 17-02-2020
شكرا جزيلا على المساعدة هذا ما كنت ابحث عنه
بعد تجربة الكود نجحت الفكرة لكن مازل عندي خطا بسيط سأحاول حله
تحياتي...