تم حل مشكلة تكرار النتائج
بما ان الجدول a مربوط بالجدول b وكل منهما يحتوي على عامود يحتوي الرقم
الجدول b ياخذ الارقام من الجدول a كان يجب تعريفه بالكود التالي
كود :
a.nb=b.nb
ويضمن بالكود التالي
كود :
select distinct ( neam),(age),(status),(country)
from a,b
where a.nb=b.nb and age ='17'
للباحث في المستقبل (ان كان هناك خطأ في ماكتبت * التوضيح وشكراً)
بقي الآن كيف أضمنه في الكود التالي
كود :
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
هنا
end;
end;
وتطبيق النتائج على DBGrid1 و DBGrid2
وجزاكم الله خير
بعد فصله في DBGrid 
كيفية البحث في جدول (ابن)