（ ﾟДﾟ)ノ　Delギコ猫のﾌﾟﾛｸﾞﾗﾐﾝｸﾞ相談室part2

>>870
メソッドをTMethod型にキャストすることでそのメソッドのインスタンスと
関数アドレスが分かります。この二つを比較することで同一性が判断できます。

if (TMethod(method1).Code=TMethod(method2).Code) and // 関数アドレス比較
　(TMethod(method1).Data=TMethod(method2).Data) then // インスタンス比較
begin
　// method1 と method2 は一致した！
end;