如何才能更方便获取某一接口方法的地址呢？

[mycopy]

以下方法为获取某一接口方法的地址，如何修改才能通过传入字符串“SetFileName”来获取IFileDialog.SetFileName的地址呢？期望哪位大神告知，谢谢！cnfw@vip.qq.com
function GetMethodPointer(const IntRef{IFileDialog}: IInterface): Pointer; assembler;
{$IFDEF Win64}
asm
mov rax, [IntRef]
add rax, vmtoffset IFileDialog.SetFileName
mov rax, [rax]
end;
{$ELSE}
asm
mov eax, [IntRef]
add eax, vmtoffset IFileDialog.SetFileName
mov eax, [eax]
end;
{$ENDIF}