Da sieht man mal wieder, das man die konkrete Implementierung kapseln/verbergen sollte. Nun hast Du den Salat. Aber im Ernst: Nicht die paar 1000 Objekte sind das Problem, sondern deine Liste.
Also: Wenn Du die 1000 Elemente in der Liste erzeugst, instantiiere dir einfach 1000 Hilfsobjekte, die das TDateTime enthalten. Ich gehe jede Wette ein, das das schnell genug geht:
Delphi-Quellcode:
t := GetTickCount;
for i:=1 to 1000 do foo:= THilfsObjekt.Create;
Writeln (GetTickCount - t);
Ausgabe: 0 oder 18 (ms). Garantiert.