Zitat von
jaenicke:
Zudem fehlt deinem TMyProcedure noch der Parameter.
Zitat von
Jackie1983:
Delphi-Quellcode:
TMyProcedure = procedure of Object;
TNaviTree = record
proc : TMyProcedure;
parameter : pointer;
end;
Der Parameter für die Procedure liegt in TNaviTree. So können bei proc verschiedene Proceduren hinterlegt werden ohne das ich an die parameter gebunden bin.