тип параметра BSTR у метода COM объекта убивает пргу

[Mike_I]

Привет народ.
Есть COM сервер автоматизации, написан на VStudio. Если ваять клиентску прогу на VB или VStudio то сервер работает нормально.
Но необходимо использовать в Билдер, а в нем при вызове любого метода среди параметров которого есть BSTR приводит к ошибке(а может это и не ошибка - я с билдером до этого не работал). в общем отладка приостанавливается и компилятор выдает окошко с ассимблерным кодом программы. В принципе прога продолжает работать, если продолжить выполнение(F9) то программа выполняется дальше нормально. Но тот метод у которого в параметрах есть BSTR не выполняется. Все прочие методы сервера вызываются и работают нормально.

Вот код:
      _di_IDispatch pFPrDispatch;
      Printer *Printer1;
      pFPrDispatch = GetActiveOleObject("Devicedisp.Printer");
      HRESULT hr = pFPrDispatch->QueryInterface(DIID_IPrinter, (void**)&Printer1);

      wchar_t Nam[3];
      Nam[0] = 'H';Nam[1] = 'I';Nam[2] = 0;

     Printer1->Open(BSTR(Nam)); // здесь происходит то что я описал
     Printer1->ClaimDevice(0); // работает нормально
     Printer1->set_DeviceEnabled(VARIANT_TRUE);

     Кто-нибудь встречался/знает как это исправить?

[sss]

Код:

  BSTR  bstr = SysAllocString( Num) ;
  Printer1->Open( bstr); // здесь происходило то что ты описал
  SysFreeString( bstr);

[Mike_I]

Да заработало большое спасибо.