[Страдалецъ]

Код:

AdoQuery1.SQL.Text := Format('select * from YouTable where YouField in %d..%d',[Value1,Value2]);
AdoQuery1.Open;

или

Код:

AdoQuery1.SQL.Text := 'select * from YouTable where YouField between :Value1 and :Value2';
AdoQuery1.Parameters.ParamValue['Value1'] := Value1;
AdoQuery1.Parameters.ParamValue['Value2'] := Value2;
AdoQuery1.Open;