import java.lang.reflect.Method;
import java.net.URL;
import java.net.URLClassLoader;

public class Main {
    public static void main(String[] args) throws Throwable {
        // Вставляйте смело свой URL, откуда хотите. 
        // но результат будет одинаков - какая нахрен разница, откуда получнеы байты класса?
        URLClassLoader loader = new URLClassLoader(new URL[]{new URL("http://files.rsdn.ru/21658/")});
        // грузим класс
        Class<?> coolClassClass = loader.loadClass("CoolClass");
        // инстанс
        Object coolClassInst = coolClassClass.newInstance();
        //получаем метод через рефлексию
        Method method = coolClassClass.getDeclaredMethod("foo", long.class, long.class);
        // чисто утилитарное
        int result = 0;
        
        long time = System.nanoTime();

        //первый проход, без JIT
        for(long i = 0; i < 1000; i ++) {
             result += (Long)method.invoke(coolClassInst, i, i++);
        }
        
        System.err.println(System.nanoTime() - time);
        time = System.nanoTime();
        
        // Ждем джит
        for(long i = 0; i < 100000000; i ++) {
             result += (Long)method.invoke(coolClassInst, i, i++);
        }
        
        // это время ради прикола
        System.err.println(System.nanoTime() - time);
        time = System.nanoTime();
        
        //второй проход, после JIT
        for(long i = 0; i < 1000; i ++) {
             result += (Long)method.invoke(coolClassInst, i, i++);
        }

        System.err.println(System.nanoTime() - time);
                
        // чисто для того, чтобы не перемешался вывод
        Thread.sleep(500);
        // чтобы компилытор вообще все не убрал
        System.out.println(result);
    }
}

public class CoolClass {
    public long foo(long a, long b){
        return a + b;
    }
}

Program rtti_method_call;

{$APPTYPE CONSOLE}

Uses

  System.RTTI, System.Diagnostics, CoolUnit;

Var

 inst   : TObject;
 mtd    : TRttiMethod;

 sw     : TStopwatch;

 Index  : Integer;
 Result : Integer;

 Proc   : Function(Self : Pointer; A, B : Integer) : Integer;

Begin

 With TRttiContext.Create.FindType('CoolUnit.TCoolClass').AsInstance Do
  Begin

   inst := GetMethod('Create').Invoke(MetaclassType, []).AsObject;
   mtd  := GetMethod('Foo');

  End;

 sw := TStopwatch.StartNew;

 // Вызов средствами RTTI
 For Index := 1 To 1000000 Do
  Result := Result + mtd.Invoke(Inst, [Index, Index + 1]).AsInteger;

 WriteLn(sw.ElapsedMilliseconds); // 4358 msec

 // Но мы же знаем сигнатуру метода! И мы в нативе :cool: :) Читерим!!!!!!!
 Proc := mtd.CodeAddress;

 sw := TStopwatch.StartNew;

 // Метод полученный средствами RTTI вызывается напрямую, без малейших проблем
 For Index := 1 To 1000000 Do
  Result := Result + Proc(inst, Index, Index + 1);

 WriteLn(sw.ElapsedMilliseconds); // 1 msec

End.

Unit CoolUnit;

Interface

Type

 TCoolClass = Class(TObject)

  Function Foo(A, B : Integer) : Integer;

 End;

Implementation

Function TCoolClass.Foo(A, B : Integer) : Integer;
Begin

 Result := A + B;

End;

Initialization

 // Чтоб линкер не выкинул класс
 If TCoolClass.ClassInfo = NIL Then
  Halt;

End.