Hier gibt es keinen Zauberstab:
Delphi-Quellcode:
type TEineMethode=procedure of object;
type TFoo=class
procedure EineMethode;
procedure andereMethode;
end;
var Foo:TFoo;
//jetzt kann man eben irgendwo (für Ereignisse meist in einer Klasse)
//eine Variable deklarieren
var gEineMethode:TeineMethode;
begin
Foo:=TFoo.Create;
gEineMethode:=Foo.EineMethode;
//jetzt steht in der Variablen gEineMethode der Zeiger auf die Methode EineMethode der Instanz Foo. Das sind simple 8 Bytes (2 Zeiger)
//jetzt kannst du geMeineMethode ainfach aufrufen und es wird die darin gespeicherte Methode aufgerufen
gEineMethode;
//und wir können eine andere Methode drin speichern:
gEineMethode:=Foo.andereMethode;
//und aufrufen
gEineMethode
end;
Dieser Beitrag ist für Jugendliche unter 18 Jahren nicht geeignet.