Загрузить ActiveX Control с помощью CreateObject без подключения библиотеки типов - VB

Формулировка задачи:

Есть ActiveX Control, написанный на VB6.
Хочу вставить его на форму Borland C++Builder () без создания bpl и использования библиотеки типов.
следующий код работает (если не ошибся с paste):

F:  TForm
{

    Variant m_Object;
    HANDLE m_HWND;
};

    m_Object = Variant::CreateObject();
    m_HWND = (*)(m_Object.OlePropertyGet()); 

    ::SetParent( m_HWND, pnlControl->Handle); 
    ::SetWindowPos ( m_HWND, , , , pnlControl->Width, pnlControl->Height, SWP_SHOWWINDOW);

Похожий код и при подключении с VB6, только синтаксис другой.
Контрол создаётся, кладётся на форму и почти работает.
"Почти" - потому, что у контрола :
1. Не работает Tab Stop
2. Не работает OleDrop
3.

Не срабатывают события UserControl_Show и UserControl_Resize

.
Особенно важно UserControl_Resize.
Пробовал вызывать

::MoveWindow(m_HWND, ,, pnlControl->Width - , pnlControl->Height - , );

- результат - контрол ресайзится, но обработчик "UserControl_Resize" не вызывается :(
Пожалуйста, помогите советом: как сделать, чтобы это окошко стало работать полноценно?
P.S. В примере также проект для VB

Решение задачи: «Загрузить ActiveX Control с помощью CreateObject без подключения библиотеки типов»

textual
                            Листинг программы 
                        
                            OleContainer1->CreateObject(<font color="teal">"XContrlCreateTest.UserControl1"</font>,<font color="blue">false</font>);
    m_Object = OleContainer1->OleObject;
    m_HWND = (<font color="blue">void</font>*)<font color="blue">int</font>(m_Object.OlePropertyGet(<font color="teal">"ControlHWND"</font>));