Query1.Sql.Clear; Query1.Sql.add('Select * from Itog where Den between: Edit4.text and edit5.text); Query1.Active:=true;
:Value1 and :Value2';