Prozedur umleiten?

[jim_raynor]

Zitat von Pseudemys Nelsoni:

BTW: wieso kommt denn kein "of object" mit dran?

Das of object ist nur ein Zusatz bei der Definition von Prozedur/Methodenzeigern.

Delphi-Quellcode:

type
  TNotifyEvent = procedure(Sender: TObject) of object;

Jetzt hast du einen Methodenzeiger. Wenn du jetzt eine Variable vom Typ TNotifyEvent anlegst, kannst du nur Methoden (Prozeduren/Funktionen die innerhalb von Objekten liegen) zu weisen.

definierst du dagegen

Delphi-Quellcode:

type
  TNotifyEvent = procedure(Sender: TObject);

Also ohne of object, dann kannst du der einer Variable vom Typ TNotifyEvent nur eine normale Prozedur/Funktion zuweisen. Ein Zuweisung von einer Methode (siehe oben) funktioniert hier nicht. Problem ist ja, dass bei Methoden immer der Zeiger auf Self (also das Objekt) mitgeführt werden müssen. Klarer wird dies wenn du mal sizeof(TNotifyEvent) in beiden Fällen machst. Da wirst du sehen, dass im ersten Fall der Typ 8 Byte groß ist (Zeiger auf Prozedur und auf das Objekt) und im zweiten Fall nur 4 Byte (nur Zeiger auf Prozedur).

P.S: TNotifyEvent ist vielleicht etwas unglücklich, da es diesen Typen ja bereits gibt, aber hoffe, das macht das Problem etwas klarer.