VS2017真正免注册调用大漠插件

#include “stdafx.h“
#include “atlbase.h“
#include “obj.h“

class MyDispatchDriver
{
public:
    IDispatch* p;
    MyDispatchDriver（）
    {
        p = NULL;
    }
    MyDispatchDriver（IDispatch* lp）
    {
        if （（p = lp） != NULL）
            p->AddRef（）;
    }
    ~MyDispatchDriver（） { if （p） p->Release（）; }
    HRESULT GetIDOfName（LPCOLESTR lpsz DISPID* pdispid）
    {
        HRESULT hr = -1;
        if （p == NULL） return hr;
        return p->GetIDsOfNames（IID_NULL （LPOLESTR*）&lpsz 1 LOCALE_USER_DEFAULT pdispid）;
    }
    HRESULT Invoke0（DISPID dispid VARIANT* pvarRet = NULL）
    {
        HRESULT hr = -1;
        DISPPARAMS dispparams = { NULL NULL 0 0};
        if （p == NULL） return hr;
        return p->Invoke（dispid IID_NULL LOCALE_USER_DEFAULT DISPATCH_METHOD &dispparams pvarRet NULL NULL）;
    }
    HRESULT InvokeN（DISPID dispid VARIANT* pvarParams int nParams VARIANT* pvarRet = NULL）
    {
        HRESULT hr = -1;
        DISPPARAMS dispparams = { pvarParams NULL nParams 0};
        if （p == NULL） return hr;
        return p->Invoke（dispid IID_NULL LOCALE_USER_DEFAULT DISPATCH_METHOD &dispparams pvarRet NULL NULL）;
    }
};

dmsoft::dmsoft（）
{
    CLSID clsid;
    IUnknown * pUnknown = NULL;
    HRESULT hr;

    obj = NULL;
    hr = ::CLSIDFromProgID（ L“dm.dmsoft“ &clsid ）;
    if （FAILED（hr））
    {
        return;
    }

    hr = ::CoCreateInstance（ clsid NULL CLSCTX_ALL IID_IUnknown （LPVOID *）&pUnknown）;
    if （FAILED（hr））
    {
        return;
    }

    pUnknown->QueryInterface（IID_IDispatch （void **）&obj）;
    if （pUnknown） pUnknown->Release（）;
}

dmsoft::~dmsoft（）
{
        if （obj） obj->Release（）;
}

long dmsoft::SetRowGapNoDict（long row_gap）
{
    static DISPID dispatch_id = -1;
    MyDispatchDriver spDisp（obj）;
    HRESULT hr;
    COleVariant pn[1];
    CComVariant vResult;

    pn[0] = COleVariant（row_gap）;

    if （dispatch_id == -1）
    {
        spDisp.GetIDOfName（L“SetRowGapNoDict“&dispatch_id）;
    }

    hr = spDisp.InvokeN（dispatch_idpn1&vResult）;
    if （SUCCEEDED（hr））
    {
        return vResult.lVal;
    }
    return 0;
}

long dmsoft::MoveDD（long dxlong dy）
{
    static DISPID dispatch_id = -1;
    MyDispatchDriver spDisp（obj）;
    HRESULT hr;
    COleVariant pn[2];
    CComVariant vResult;

    pn[1] = COleVariant（dx）;
    pn[0] = COleVariant（dy）;

    if （dispatch_id == -1）
    {
        spDisp.GetIDOfName（L“MoveDD“&dispatch_id）;
    }

    hr = spDisp.InvokeN（dispatch_idpn2&vResult）;
    if （SUCCEEDED（hr））
    {
        return vResult.lVal;
    }
    return 0;
}

long dmsoft::FreeScreenData（long handle）
{
    static DISPID dispatch_id = -1;
    MyDispatchDriver spDisp（obj）;
    HRESULT hr;
    COleVariant pn[1];
    CComVariant vResult;

    pn[0] = COleVariant（handle）;

    if （dispatch_id == -1）
    {
        spDisp.GetIDOfName（L“FreeSc

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

    ..A..H.     40960  2019-02-24 18:03  test.vs estv15.suo

     文件   77717504  2019-02-24 18:03  test.vs estv15Browse.VC.db

     文件  120586240  2019-02-24 17:11  test.vs estv15ipch407de3634375c9e0.ipch

     文件    3549752  2019-01-22 20:26  testDebugdm.dll

     文件   10877440  2019-02-24 17:58  testDebug est.exe

     文件   24510160  2019-02-24 17:58  testDebug est.ilk

     文件   30068736  2019-02-24 17:58  testDebug est.pdb

     文件    3549752  2019-01-22 20:26  test estDebugdm.dll

     文件     102173  2019-01-22 20:26  test estDebugdm.tlh

     文件     101724  2019-01-22 20:26  test estDebugdm.tli

     文件    1929766  2019-02-24 16:59  test estDebugobj.obj

     文件       9727  2019-02-24 17:03  test estDebugRegDM.obj

     文件    1011620  2019-02-24 16:59  test estDebugstdafx.obj

     文件         69  2019-02-24 17:58  test estDebug est.log

     文件      74208  2019-02-24 16:59  test estDebug est.obj

     文件   56754176  2019-02-24 16:59  test estDebug est.pch

     文件    1431972  2019-02-24 16:59  test estDebug est.res

     文件       3352  2019-02-24 17:58  test estDebug est.tlogCL.command.1.tlog

     文件      92046  2019-02-24 17:58  test estDebug est.tlogCL.read.1.tlog

     文件       3456  2019-02-24 17:58  test estDebug est.tlogCL.write.1.tlog

     文件       1494  2019-02-24 17:58  test estDebug est.tloglink.command.1.tlog

     文件       6054  2019-02-24 17:58  test estDebug est.tloglink.read.1.tlog

     文件        658  2019-02-24 17:58  test estDebug est.tloglink.write.1.tlog

     文件        248  2019-02-24 16:59  test estDebug est.tlog
c.command.1.tlog

     文件     164564  2019-02-24 16:59  test estDebug est.tlog
c.read.1.tlog

     文件        142  2019-02-24 16:59  test estDebug est.tlog
c.write.1.tlog

     文件        192  2019-02-24 17:58  test estDebug est.tlog est.lastbuildstate

     文件      48113  2019-02-24 17:58  test estDebug estDlg.obj

     文件    1362944  2019-02-24 17:58  test estDebugvc141.idb

     文件    9359360  2019-02-24 17:58  test estDebugvc141.pdb

............此处省略34个文件信息