怎么获得类函数指针

如何获得类函数指针？
普通函数可以用@获得，如@fun
但是不能用在类函数上，有无其他办法呢？

[解决办法]
类似这种形式 TXX = procedure/function(....) of object;
具体可摆渡
[解决办法]