>>49
関数ポインタ方を先に定義します。

例えば type TMyFunc = function (x:integer):Integer;

で TMyFunc型の引数で関数を定義すればよろしい