So gehts doch auch:
Delphi-Quellcode:
Type
TDateTimeContainer = Class
DateTime : TDateTime;
Constructor Create(aDateTime : TDateTime)
End;
Constructor TDateTimeContainer.Create(aDateTime : TDateTime);
Begin
DateTime := aDateTime;
End;
...
MyStringList.AddObject (MyString, TDateTimeContainer.Create(MyDateTime));
Man muss die Objekte später nur wieder freigeben, das ist alles.
Das Bild hängt schief.