可不可以对函数名称加密解密调用呢

能否对函数名称加密解密调用呢？
能否对函数名称method1加密解密呢？我是想调用时，调用加密后函数名称，通过解密，来调用method1.

------解决方案--------------------
procedure callXX(string: 密匙);
begin
if (解密(密匙) = True) then method1;
end;

------解决方案--------------------
不如加密参数,传入参数不正确就exit