Funciones con Date
 

Como puedo obtener el valor del primer y ultimo dia del año, existe
alguna función que retorne estos valores del reloj del sistema

la función RecodeDate (creo que de la unidad DateUtils) puede servirte.

El hecho es que esas dos fechas concretas siempre existen y no han variado en 2000 años :D (chiste fácil ya... ). Solo tendrás que recodificar el año de una fecha determinada, e inyectar el dia y mes como unas constantes.

Código Delphi [-]
function LastDayOfYear(const Value:TDateTime):TDateTime
begin
  Result := RecodeDateTime(Value, Yearof(Value), 12,31, 0, 0, 0 ,0);
end;

Saludos

Hay que ver el propósito de esto, puesto que el primer y último día del año siempre serán 1 y 31, a menos que los super-cientificos (astrónomos y demás) lo cambien.

Saludos