Verdaderamente entendí otra cosa, pero comento para los que aún utilizan versiones "antiguas" de Delphi, como yo, se puede hacer con lo que pasé anteriormente:
Código:
var
MiFecha: TDateTime;
begin
MiFecha := StrToDate('01/01/1970') + (1058324400000 * MILLISECOND);
end;
Obviamente que existiendo la función IncMilliSecond, y si no necesitamos que nuestro código sea compatible con versiones anteriores, recomiendo usarla.
Saludos!