CODE:0045A758 loc_45A758: ; CODE XREF: ComObj::_16532+40j
CODE:0045A758 ; ComObj::_16532+51j
CODE:0045A758 lea eax, [ebp+dwMessageId]
CODE:0045A75E push eax ; dwMessageId
CODE:0045A75F xor ecx, ecx
CODE:0045A761 mov cl, [ebx+2]
CODE:0045A764 inc ecx
CODE:0045A765 xor eax, eax
CODE:0045A767 mov al, [ebx+1]
CODE:0045A76A lea edx, [ebx+eax+3]
CODE:0045A76E mov eax, [ebp+var_4]
CODE:0045A771 call unknown_libname_947 ; BDS 2005-2006 and Delphi6-7 Visual Component Library
CODE:0045A776 test esi, esi
CODE:0045A778 jz short loc_45A781
CODE:0045A77A mov eax, esi
CODE:0045A77C call @Variants@@VarClear$qqrr8TVarData ; Variants::__linkproc__ VarClear(TVarData &)
CODE:0045A781
CODE:0045A781 loc_45A781: ; CODE XREF: ComObj::_16532+78j
CODE:0045A781 mov eax, [ebp+arg_C]
CODE:0045A784 push eax
CODE:0045A785 push esi
CODE:0045A786 lea ecx, [ebp+dwMessageId]
CODE:0045A78C mov edx, ebx
CODE:0045A78E mov eax, [ebp+var_4]
CODE:0045A791 call @Comobj@DispatchInvoke$qqrx36System@_DelphiInterface$t9IDispatch_p16System@TCallDescpa65536$ipvp14System@Variant ; Comobj:: DispatchInvoke(System:: DelphiInterface<IDispatch>,System::TCallDesc *,int (*)[65536],void *,System::Variant *)
CODE:0045A796 pop esi
CODE:0045A797 pop ebx
CODE:0045A798 mov esp, ebp
CODE:0045A79A pop ebp
CODE:0045A79B retn
CODE:0045A79B @ComObj@_16532 endp
CODE:0045A79B