Wenn ich Dich richtig verstehe, könntest Du Deine Objekte kapseln...
Delphi-Quellcode:
MyRecordOderClass = record/class
TS: TDateTime;
State: Integer;
MyObject: TObject;
end;
Dann müsstest Du immer dieses kapselnde Objekt speichern.
Oder Du benutzt an anderer Stelle ein Dictionary, in dem Du zu jedem Objekt den Zeitstempel+Status speicherst.