Обертка Native для DBX32 (использование в 1С)

#include "Dbx32.h"
#include "DbxUtils.h"

extern DbxContext     tContext;       //  Global DBX Conversation Data
extern long           tStatus;        //  Global Return status variable

//
//     Conversation and Context Structure - Returned by TOpenDesign
//
    
typedef struct                //           (pcb/sch/cmp)
{
    HCONV     hConv;          // Converstation handle
    long      appInst;        // Application instance
    long      version;        // DBX version
    long      language;       // Language type
    HWND      hWnd;           // Server's window handle.
    HANDLE    hMmf;           // Handle to memory mapped file.
    void*     pMmf;           // Pointer to mapped view of MMF.
 
} DbxContext;

long 
DLLX TOpenDesign (long language,
                  long version, 
                  const char* pDesignName, 
                  DbxContext* pContext);
//
// TOpenDesign - (PCB/Sch) Establishes communication channel with 
// -----------             the specified ACCEL EDA application
//
//  Parameter     Type/Description
//  ---------     ----------------
//
//  language      long         Calling program language 
//                             (constant DBX_LANGUAGE)
//  version       long         DBX program version
//                             (constant DBX_VERSION)
//  pAppName      char*        Input application name ("pcb" or "sch")
//  pContext      DbxContext*  Output DBX converstation data
//
//
//  returns       long         DBX completion status
//

DbxContext *tContext = new DbxContext();
long tStatus;

tStatus = TOpenDesign(DBX_LANGUAGE, DBX_VERSION, "pcb", tContext);

extern DbxContext     tContext;

DbxContext     tContext;

//DbxContext *tContext = new DbxContext();
//long tStatus;
tStatus = TOpenDesign(DBX_LANGUAGE, DBX_VERSION, "pcb", & tContext);

extern DbxContext     tContext; //  переменная объявленная в другом месте
extern long tStatus;   //  переменная объявленная в другом месте
 
tStatus = TOpenDesign(DBX_LANGUAGE, DBX_VERSION, "pcb", & tContext);[

DbxContext     tContext;

bool CAddInNative::CallAsFunc(const long lMethodNum,
                tVariant* pvarRetValue, tVariant* paParams, const long lSizeArray)

pvarRetValue
Тип: tVariant*. Указатель на структуру tVariant, содержащую возвращаемое значение.

#define TV_VT(X)          ((X)->vt)

TV_VT(pvarRetValue) = VTYPE_INT;
TV_VT(pvarRetValue) = tStatus;//тип long

 m_iMemory->AllocMemory((void**)&pvarRetValue->pstrVal, paParams->strLen);

extern DbxContext tContext;
extern long tStatus;

    DbxContext tContext;
    long    tStatus;
 
    tStatus = TOpenDesign(DBX_LANGUAGE, DBX_VERSION, "pcb", &tContext);
    if (tStatus != DBX_OK)
        std::cout << "Error: " << tStatus << (tStatus == DBX_CONNECTION_ERROR ? " CONNECTION ERROR." : " .") << std::endl;

DbxContext tContext;
long tStatus;

// dbxsavw.h : interface of the CDbxsamp4View class
//
/////////////////////////////////////////////////////////////////////////////
 
#include "dbx32.h"
 
class CDbxsamp4View : public CView
{
public:
 
    CButton *pStartButton;
    CButton *pExitButton;
    
protected: // create from serialization only
    CDbxsamp4View();
    DECLARE_DYNCREATE(CDbxsamp4View)
 
// Operations
public:
 
..........
 
    DbxContext      tContext;       // Global DBX Conversation Data
    long            tStatus;        // Global Return status variable
};

// taken from ranges-v3
template<typename T>
struct static_const
{
    static constexpr T value{};
};
    template<typename T>
constexpr T static_const<T>::value;

pvarRetValue->vt = VTYPE_I4;
pvarRetValue->lVal = tStatus;

pvarRetValue->vt = VTYPE_PWSTR;
pvarRetValue->pwstrVal = wsOutStr;
pvarRetValue->strLen = newsize - 1;

struct _tVariant *pvarVal;