#define WrapDelphiCall3(t,n,t1,p1,t2,p2,t3,p3) inline t n(t1 p1, t2 p2, t3 p3) { 
__asm mov eax, p1 
__asm mov edx, p2 
__asm mov eсx, p3 
__asm push ebx 
__asm mov ebx, this 
__asm call dword ptr [ebx].p##n 
__asm pop ebx }