如何获得类函数指针？普通函数可以用@获得，如@fun但是不能用在类函数上，有无其他办法呢？[解决办法]类似这种形式 TXX = procedure/function(....) of object;具体可摆渡[解决办法]
