TThrowUserExceptionProc = procedure of object;
( TThrowUserExceptionProc)();
OrbPas
This is type OrbPas.TThrowUserExceptionProc.