Yo entendí que era alrevés: a partir del número de día obtener la fecha (del año actual). Podria hacerse así:
Código Delphi
[-]
uses DateUtils;
function DayNumberToDate(DayNumber: Integer): TDate;
begin
Result := EncodeDate(YearOf(Today()), 1, 1) + DayNumber - 1;
end;
Lo que sí, es que este número de día, según entiendo, no corresponde al llamado
día juliano.
// Saludos