+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : يظهر هذا الخطا في الفلترة (/showthread.php?tid=5323)
يظهر هذا الخطا في الفلترة - unja - 16-06-2013
[FONT=Arial Narrow]السلام عليكم
قمت بربط قاعدة بيانات اكسس مع الدالفي عن طريق ado
عند اجراء الفلترة (اي عند الكتابة في edit ) يظهر هذا الخطا
علما اني استعمل هذا كود الفلترة
كود :
http://img15.hostingpics.net/pics/362990371.jpgPHP كود :
if edit1.Text <>'' then
begin
ADOTable1.Filter :='tele like '+ quotedstr(edit1.Text +'*');
ADOTable1.Filtered :=true;
end
else
ADOTable1.Filtered :=false;
يظهر هذا الخطا في الفلترة - لؤي - 17-06-2013
و عليكم السلام
شيئ من النت :
كود :
procedure DoIncrementalFilter(Dataset: TDataSet; const FieldName, SearchTerm: string);
begin
Assert(Assigned(Dataset), 'No dataset is assigned');
if SearchTerm = '' then
Dataset.Filtered := False
else
begin
Dataset.Filter := FieldName + ' LIKE ' + QuotedStr(SearchTerm + '*');
Dataset.Filtered := True;
end;
end;كود :
DoIncrementalFilter(ADOTable1, 'tele', Edit1.Text);يظهر هذا الخطا في الفلترة - unja - 21-06-2013
لم تشتغل معي
يظهر هذا الخطا في الفلترة - SpLeNtEr SeLL - 21-06-2013
كود :
if Edit1.Text <>'' then
begin
DataModule2.ADOTable1.Filter := 'Nom like ' +QuotedStr(edit1.Text+'*');
DataModule2.ADOTable1.Filtered := true;
end else
begin
DataModule2.ADOTable1.Filtered := false;
end;يظهر هذا الخطا في الفلترة - مبرمج مبتدأ - 01-12-2013
نفس المشكلة التي وقعت فيها
عل وجدت لها حل أخي ؟
يظهر هذا الخطا في الفلترة - chikh - 02-12-2013
Paradox and Dbase استعمل "*"
do (Sql Server ,Ms Access استعمل "%"
غير '*' ب '%' في الكود
يظهر هذا الخطا في الفلترة - Mr.DOS - 02-12-2013
قم بإستبدال علامة التنصيص و النجمة '*' بالرمز التالي %
افصل بمسافة بين الحقل المراد فلترته ' tele like' والعلامة +
ليصبح الكود كمايلي
كود :
if edit1.Text <>'' then
begin
ADOTable1.Filter :='tele like ' + quotedstr(edit1.Text +'%');
ADOTable1.Filtered :=true;
end
else
ADOTable1.Filtered :=false;يظهر هذا الخطا في الفلترة - مبرمج مبتدأ - 05-12-2013
صارت لي نفس المشكلة و الحل هو :
كود :
begin
with (adotable1) do
begin
if edit1.Text = '' then
filtered := false
else
begin
Filter := 'اسم الحقل like ' + QuotedStr('*' +Edit1.Text + '*');
filtered := true ;
end;
end;
end;يظهر هذا الخطا في الفلترة - unja - 06-12-2013
هذا هو حل المشكلة
بارك الله في الجميع
PHP كود :
ADOTable1.Filter := 'tele = ' + Edit1.Text;
ADOTable1.Filtered :=true;
اسم الحقل هو tele
الكود الذي طرحته في الموضوع يقوم با البحث في الحقل من نوع string
اما هذا يبحث في
integer