利用ATL （BCB #include <atl/atlbase.h>）
BSTR->LPSTR  
  BSTR   word;  
  USES_CONVERSION;  
  OLE2A(word);  
   
  char*   ->   BSTR  
  char   buf[10];  
  BSTR   word;  
  USES_CONVERSION;  
  word   =   SysAllocString(A2W(buf)); 
或（不用ATL）
char * ->BSTR
wchar_t buf[4]={char1，char2，char3};
BSTR   word= SysAllocString(buf);