ADOquery.close; ADOQuery.SQL.Text:='SELECT * FROM aaa WHERE field_date > :dat'; ADOQuery.Parameters.ParamByName(dat).value:=date; ADOquery.open;