Получить адрес метода

[Altera]

Всем привет!
Ситуация такая. могут вводиться несколько команд (текстовых)
На каждую из них есть свой обработчик (метод). Параметры у них одни и те же и объявлен тип функции

делаю так

type
   tSomeFunc = function(const aStr: string; const aInt: integer): boolean;
   ...
   public
   function firstFunc(const aStr: string; const aInt: integer): boolean;
   function secondFunc(const aStr: string; const aInt: integer): boolean;
   ...


procedure executeCmd(const cmd, aStr: string; const aInt: integer): boolean;
var
func: tSomeFunc;
begin
   @func := MethodAddress(cmd); // Адрес 0 равен! :o
   if @func = nil then
      result := false;
   else
      result := func(string, aInt);  
end;

Помогите чем можете

[alexBlack]

type
   tSomeFunc = function(const aStr: string; const aInt: integer): boolean of object;

   {$METHODINFO ON}
   TMyClass = class
   public
      function firstFunc(const aStr: string; const aInt: integer): boolean;
      function secondFunc(const aStr: string; const aInt: integer): boolean;

      function executeCmd(const cmd, aStr: string; const aInt: integer):boolean;
   end;
   {$METHODINFO OFF}

function TMyClass.executeCmd(const cmd, aStr: string; const aInt: integer): boolean;
var func: tSomeFunc;
begin
   @func := MethodAddress(cmd);
   if @func = nil then
      result := false
   else
      result := func(aStr, aInt);
end;

[Altera]

Большое спасибо!