كيفية ايجاد قيمة عدة حقول في اكثر من جدول دفعة واحدة ؟

Question

السلام عليكم 
لدي الكود التالي الذي قمت فيه الجمع بين جدولين t1 ; و t2  باستعمال UNION 
احاول ايجاد قيمة عدة حقول  باستعمال البرامتر في اكثر من جدول دفعة واحدة  علما ان هذه القيم محصورة بين عددين 




 

 

 

 

 

 

 

 

 

الكود المستعمل :

ADOQuery1.SQL.Clear;
ADOQuery1.SQL.add('SELECT [تاريخ نهاية الصلاحية]  ,DATEDIFF("d",date(),[تاريخ نهاية الصلاحية] ) as d2 from t2 UNION select [تاريخ نهاية الصلاحية]  ,DATEDIFF("d",date(),[تاريخ نهاية الصلاحية] ) as d1  from t1');
ADOQuery1.Open;
if 15..0 = ADOQuery1.FieldByName('d1').Value or 15..0 = ADOQuery1.FieldByName('d1').Value  then
 begin
ShowMessage('تم ايجاد القيمة ')

 end
else
ShowMessage('لم نجد القيمة ');
end;

شكرا..