aParam := { aTTitle, aTTitle2, aTSuperHd, aTHeading, aTFooting, aTTitle3, aTCell, ... } 
    ????CallDLL( "lib32_c#xlsole.DLL" , , "RunExcelOle" , cFile, lActivate, aParam )  
  
    If lActivate .And. FILE(cFile) 
       ShellExecute( 0, "Open", cFile,,, 3 ) 
    EndIf

     case CTYPE_LONG: 
          hb_retnl( ( LONG ) rc.Long ); 
          break; 
       case CTYPE_CHAR_PTR: 
       case CTYPE_UNSIGNED_CHAR_PTR: 
 		 hb_retc((char*) rc.Pointer); 
 		 break; 
       case CTYPE_UNSIGNED_CHAR: 
       case CTYPE_UNSIGNED_INT: 
       case CTYPE_INT_PTR: 
       case CTYPE_UNSIGNED_SHORT_PTR:

@echo off  
 rem call "C:\Program Files (x86)\Microsoft Visual Studio 14.0\VC\vcvarsall.bat" x86 
 call "C:\Program Files\Microsoft Visual Studio 9.0\VC\vcvarsall.bat" x86 
 mkdir OBJ 
 cd OBJ 
 cl.exe /MT ..\Lib32_CPP_demo.cpp /link /DLL /OUT:Lib32_CPP_demo.dll 
 cl.exe /MT ..\test_dll.cpp 
 move Lib32_CPP_demo.dll .. 
 move test_dll.exe .. 
 cd.. 
 echo =========================================================================== 
 echo  Testing the Library - Lib32_CPP_demo.dll 
 echo =========================================================================== 
 start test_dll.exe

Скрытый текст

if not defined MG_BCC     set MG_BCC=c:\borland\bcc55 
 if not defined MV_CSWITCH set MV_CSWITCH=-w -w-par -w-inl 
 if exist build.log del build.log > nul  
 :    
   echo %MG_BCC% >>build.log 
   rem call compile Lib32_CPP_demo.c 
   %MG_BCC%\BIN\bcc32.EXE -c -tW -d -6 -O2 -OS -Ov -Oi -Oc -I%MG_BCC%\include -L%MG_BCC%\lib %MV_CSWITCH% Lib32_CPP_demo.cpp >>build.log 
   if errorlevel 1 goto err  
  
   rem Link for create dll 
   %MG_BCC%\BIN\ilink32.EXE -Tpd -x -I%MG_BCC%\include -L%MG_BCC%\lib -L%MG_BCC%\lib\PSDK Lib32_CPP_demo.obj,Lib32_CPP_demo.dll,,import32.lib+cw32.lib+user32.lib,, >>build.log 
   if errorlevel 1 goto err  
   goto end  
  
 :err  
   echo ===== Error ! View file build.log =======  
   pause  
  
 :end