Timage32 sollte eine Property namens TAG haben. Dort kannst du ein NativeInt speichern. Ein paar Möglichkeiten (mit Objekten der Klasse aus dem anderen Thread):
- xxx.Tag := NativeInt(MyImage); und nachher andersrum casten
- Ein TDictionary<Integer, TMyImage> und im TAG speicherst du dann den (eindeutigen) Integer Wert.
- Ein TDictionary<TImage32, TMyImage>
- Eine eigene abgeleitete Komponente von TImage32, die zusätzlich properties für das Image enthält.
Danke, Dein letzter Vorschlag gefällt mir am besten, daran habe ich auch gedacht, muss mir da aber noch erarbeiten, wie man das am besten macht.