السلام عليكم ورحمة الله وبركاته
نجحت في البحث في جدول الاب ولاكن في جدول الابن يحصل خطأ :confused:
ابستخدم الكود التالي
كود :
if Edit1.Text <>'' then
begin
If RadioButton1.Checked then
ADOTable1.Filter := 'neam like ' + quotedstr('*'+ Edit1.Text +'*');
ADOTable1.Filtered :=true;
end
else
ADOTable1.Filtered :=false;
begin
if RadioButton2.Checked then
ADOTable2.Filter := 'DSDesigner2 like ' + quotedstr('*'+ Edit1.Text +'*');
ADOTable2.Filtered :=true;
end;
ADOTable2.Filtered :=False
;
بعد تنفيذ الامر والبحث بجدول الاب تظهر النتائج وعند التحويل للبحث في جدول الابن
يظهر الخطأ
