also bei mir funktioniert dein Beispiel aus der #1
und zwar mit nur einer kleinen Änderung
tfunction = function(const a: extended): extended;
in der
OH steht es zwar anders, aber da du ja die Delphi-Quellcodes hast, hättest du da auch selber mal genauer nachsehn können.