select max

[yossi]

hola, tengo 1 query con esta sentencia

Código SQL [-]
select max(fecha)
from personas
where personas_id=:id;

lo que quiero hacer en tomar el campo fecha del ultimo registro de ese id, y asignarselo a un datetimepicker, pero si en la tabla personas no hay ningun registro que me tome la fecha actual.

Código Delphi [-]
if query1.isempty then
datetimepicker.date:=now;
else
datetimepicker.date:=query1.fields[0].value;

el problema es que me dice que la funcion max no puede retornar null y no se como hacer la consulta y como hacerla asignacion