Auf Visible reagieren

[matashen]

Hallo zusammen,

ich möchte gern auf darauf reagieren wenn in meinem Programm irgendwo ein TImage.visible sich nach true bzw false ändert.
Ich hab schon gelesen das man eigene Ereignisse definieren kann, aber ich steig da absolut nicht durch.
Wie mach ich das ?

Was ich bereits rausgefunden habe:

Als erstes soll ich wohl das Ereignis definieren...so?
TVisibleEvent=procedure(visiblestate:boolean) Anschließend sollte ich die Variable definieren...wie?

Delphi-Quellcode:

TVisibleEvent = ???
  private
    FOnVisible: TVisibleEvent;
  published
    property OnVisible: TVisibleEvent read FOnVisible write FOnVisible;//<=Was das soll kapier ich nicht hab diese definition ausm Buch gelesen
  end;

So und dann sollte dann noch das Ereignis ausgelöst werden, aber da häng ich jetzt komplett...

Dank im Voraus für die Hilfe

Matthias