Consulta SQL que usa a data do sistema

Problema:

Preciso fazer uma consulta com SQL que me retorne todos os registros em que o valor de um campo do tipo data seja igual ou anterior à dada do sistema. Como fazer?

Solução:

Query.Close;

Query.SQL.Text := 'select * from Tabela where CampoData <= :Hoje';

Query.ParamByName('Hoje').AsDate := Date;

Query.Open;