OnMouseOver bei selbst erzeugtem TPicture

[tobi1701]

hallo,

ich habe eine liste erzeugt, die aus records besteht. in diesem record sind wiederum TPicture elemente enthalten.
in der liste wird jeder eintrag angezeigt und das darin enthaltene TPicture wird als verkleinertes thumbnail angezeigt.
ich möchte jetzt, wenn ich mit dem mauszeiger über dem TPicture bin, eine vergrösserte ansicht in einer anderen TPaintBox anzeigen lassen.

doch wie kann ich das machen? es muss ja irgendwie für alle TPictures in allen einträgen der liste die gleiche prozedur aufgerufen werden.
oder kann man das nur machen, wenn mein eintrag ein object ist? und wenn ja, wie?

um hier nicht zu allgemein rumzureden, kann ich ja mal meinen eintrag hinzufügen:

Delphi-Quellcode:

BasicGameEntry = record
   Name,Genre,System,Publisher,Released: string;
   Description: TStrings;
   Rating: integer;
   Picture: Array[1..6] of TPicture;
  end;

so. wie man sehen kann, solle es eine kleine datenbank für spiele werden und so ein eintrag soll bis zu 6 bilder bekommen, die in der listenansicht als thumbs (stretchdraw) angezeigt werden.