把上面代码转换成C++ builder

把下面代码转换成C++ builderfunction SeeImageAndReport(const aHandle: THandleconst aPatientType: PC

把下面代码转换成C++ builder
function SeeImageAndReport(const aHandle: THandle;  
  const aPatientType: PChar; 
  const acode:PChar  
  ):Integer; stdcall; external 'KPPacsInterface.dll';

  function UnInitDll: integer; stdcall; external 'KPPacsInterface.dll';

  function InitDll(const aDllPath :PChar; 
  const aLogID: PChar;  
  const aLogName: PChar; 
  const aDBIsWebService: Integer
  ) :Integer; stdcall; external 'KPPacsInterface.dll';