Wie kann ein Zeiger auf eine Funktion als Paramater übergeben werden?

[FriendOfDelphi]

Zitat von himitsu:

Delphi-Quellcode:

protected 
  procedure WndProc(var Message: TMessage); override;

if Message.Msg = WM_APP + x then

Notfalls kann man auch über RegisterWindowMessage gehn.

Siehe das Bild in "Understanding the message-handling system"
WndProc ist die erste Anlaufstelle, wo alles durchkommt und (vermutlich) danach werden die entsprechenden Dispatch-Methoden ala procedure NAME(var Message: TWM_TYPE); message WM_MESSAGE; abgearbeitet.

Besteht nicht die Möglichkeit an der Stelle procedure NAME(var Message: TWM_TYPE); message WM_MESSAGE; den Wert von "WM_MESSAGE" von außerhalb der Klasse als Parameter zu übergeben?