vbe6ext.tlh

让powerpoint支持插入internet资源

    __declspec(property(get=GetHasOpenDesigner))
    VARIANT_BOOL HasOpenDesigner;
    __declspec(property(get=GetProperties))
    _PropertiesPtr Properties;

    //
    // Wrapper methods for error-handling
    //

    VARIANT_BOOL GetSaved ( );
    _bstr_t GetName ( );
    void PutName (
        _bstr_t pbstrReturn );
    IDispatchPtr GetDesigner ( );
    _CodeModulePtr GetCodeModule ( );
    enum vbext_ComponentType GetType ( );
    HRESULT Export (
        _bstr_t FileName );
    VBEPtr GetVBE ( );
    _VBComponentsPtr GetCollection ( );
    VARIANT_BOOL GetHasOpenDesigner ( );
    _PropertiesPtr GetProperties ( );
    WindowPtr DesignerWindow ( );
    HRESULT Activate ( );

    //
    // Raw methods provided by interface
    //

    virtual HRESULT __stdcall get_Saved (
        VARIANT_BOOL * lpfReturn ) = 0;
    virtual HRESULT __stdcall get_Name (
        BSTR * pbstrReturn ) = 0;
    virtual HRESULT __stdcall put_Name (
        BSTR pbstrReturn ) = 0;
    virtual HRESULT __stdcall get_Designer (
        IDispatch * * ppDispatch ) = 0;
    virtual HRESULT __stdcall get_CodeModule (
        struct _CodeModule * * ppVbaModule ) = 0;
    virtual HRESULT __stdcall get_Type (
        enum vbext_ComponentType * pKind ) = 0;
    virtual HRESULT __stdcall raw_Export (
        BSTR FileName ) = 0;
    virtual HRESULT __stdcall get_VBE (
        struct VBE * * lppaReturn ) = 0;
    virtual HRESULT __stdcall get_Collection (
        struct _VBComponents * * lppcReturn ) = 0;
    virtual HRESULT __stdcall get_HasOpenDesigner (
        VARIANT_BOOL * lpfReturn ) = 0;
    virtual HRESULT __stdcall get_Properties (
        struct _Properties * * lpppReturn ) = 0;
    virtual HRESULT __stdcall raw_DesignerWindow (
        struct Window * * lppcReturn ) = 0;
    virtual HRESULT __stdcall raw_Activate ( ) = 0;
};

struct __declspec(uuid("eee00921-e393-11d1-bb03-00c04fb6c4a6"))
_VBComponent : _VBComponent_Old
{
    //
    // Property data
    //

    __declspec(property(get=GetDesignerID))
    _bstr_t DesignerID;

    //
    // Wrapper methods for error-handling
    //

    _bstr_t GetDesignerID ( );

    //
    // Raw methods provided by interface
    //

    virtual HRESULT __stdcall get_DesignerID (
        BSTR * pbstrReturn ) = 0;
};

struct __declspec(uuid("be39f3da-1b13-11d0-887f-00a0c90f2744"))
VBComponent;
    // [ default ] interface _VBComponent

struct __declspec(uuid("0002e18c-0000-0000-c000-000000000046"))
Property : IDispatch
{
    //
    // Property data
    //

    __declspec(property(get=GetValue,put=PutValue))
    _variant_t Value;
    __declspec(property(get=GetApplication))
    ApplicationPtr Application;
    __declspec(property(get=GetParent))
    _PropertiesPtr Parent;
    __declspec(property(get=GetIndexedValue,put=PutIndexedValue))
    _variant_t IndexedValue[][][][];
    __declspec(property(get=GetNumIndices))
    short NumIndices;
    __declspec(property(get=GetName))
    _bstr_t Name;
    __declspec(property(get=GetVBE))
    VBEPtr VBE;
    __declspec(property(get=GetCollection))
    _PropertiesPtr Collection;
    __declspec(property(get=GetObject,put=PutRefObject))
    IUnknownPtr Object;

    //
    // Wrapper methods for error-handling
    //

    _variant_t GetValue ( );
    void PutValue (
        const _variant_t & lppvReturn );
    _variant_t GetIndexedValue (
        const _variant_t & Index1,
        const _variant_t & Index2 = vtMissing,
        const _variant_t & Index3 = vtMissing,
        const _variant_t & Index4 = vtMissing );
    void PutIndexedValue (
        const _variant_t & Index1,
        const _variant_t & Index2,
        const _variant_t & Index3 = vtMissing,
        const _variant_t & Index4 = vtMissing,
        const _variant_t & lppvReturn = vtMissing );
    short GetNumIndices ( );
    ApplicationPtr GetApplication ( );
    _PropertiesPtr GetParent ( );
    _bstr_t GetName ( );
    VBEPtr GetVBE ( );
    _PropertiesPtr GetCollection ( );
    IUnknownPtr GetObject ( );
    void PutRefObject (
        IUnknown * lppunk );

    //
    // Raw methods provided by interface
    //

    virtual HRESULT __stdcall get_Value (
        VARIANT * lppvReturn ) = 0;
    virtual HRESULT __stdcall put_Value (
        VARIANT lppvReturn ) = 0;
    virtual HRESULT __stdcall get_IndexedValue (
        VARIANT Index1,
        VARIANT Index2,
        VARIANT Index3,
        VARIANT Index4,
        VARIANT * lppvReturn ) = 0;
    virtual HRESULT __stdcall put_IndexedValue (
        VARIANT Index1,
        VARIANT Index2,
        VARIANT Index3 = vtMissing,
        VARIANT Index4 = vtMissing,
        VARIANT lppvReturn = vtMissing ) = 0;
    virtual HRESULT __stdcall get_NumIndices (
        short * lpiRetVal ) = 0;
    virtual HRESULT __stdcall get_Application (
        struct Application * * lpaReturn ) = 0;
    virtual HRESULT __stdcall get_Parent (
        struct _Properties * * lpppReturn ) = 0;
    virtual HRESULT __stdcall get_Name (
        BSTR * lpbstrReturn ) = 0;
    virtual HRESULT __stdcall get_VBE (
        struct VBE * * lpaReturn ) = 0;
    virtual HRESULT __stdcall get_Collection (
        struct _Properties * * lpppReturn ) = 0;
    virtual HRESULT __stdcall get_Object (
        IUnknown * * lppunk ) = 0;
    virtual HRESULT __stdcall putref_Object (
        IUnknown * lppunk ) = 0;
};

struct __declspec(uuid("0002e188-0000-0000-c000-000000000046"))
_Properties : IDispatch
{
    //
    // Property data
    //

    __declspec(property(get=GetApplication))
    ApplicationPtr Application;
    __declspec(property(get=GetParent))
    IDispatchPtr Parent;
    __declspec(property(get=GetCount))
    long Count;
    __declspec(property(get=GetVBE))
    VBEPtr VBE;

    //
    // Wrapper methods for error-handling
    //

    PropertyPtr Item (
        const _variant_t & index );
    ApplicationPtr GetApplication ( );
    IDispatchPtr GetParent ( );
    long GetCount ( );
    IUnknownPtr _NewEnum ( );
    VBEPtr GetVBE ( );

    //
    // Raw methods provided by interface
    //

    virtual HRESULT __stdcall raw_Item (
        VARIANT index,
        struct Property * * lplppReturn ) = 0;
    virtual HRESULT __stdcall get_Application (
        struct Application * * lppaReturn ) = 0;
    virtual HRESULT __stdcall get_Parent (
        IDispatch * * lppidReturn ) = 0;
    virtual HRESULT __stdcall get_Count (
        long * lplReturn ) = 0;
    virtual HRESULT __stdcall raw__NewEnum (
        IUnknown * * lppiuReturn ) = 0;
    virtual HRESULT __stdcall get_VBE (
        struct VBE * * lppaReturn ) = 0;
};

struct __declspec(uuid("0002e18b-0000-0000-c000-000000000046"))
Properties;
    // [ default ] interface _Properties

struct __declspec(uuid("da936b62-ac8b-11d1-b6e5-00a0c90f2744"))
_AddIns : IDispatch
{
    //
    // Property data
    //

    __declspec(property(get=GetVBE))
    VBEPtr VBE;
    __declspec(property(get=GetParent))
    IDispatchPtr Parent;
    __declspec(property(get=GetCount))
    long Count;

    //
    // Wrapper methods for error-handling
    //

    AddInPtr Item (
        const _variant_t & index );
    VBEPtr GetVBE ( );
    IDispatchPtr GetParent ( );
    long GetCount ( );
    IUnknownPtr _NewEnum ( );
    HRESULT Update ( );

    //
    // Raw methods provided by interface
    //

    virtual HRESULT __stdcall raw_Item (
        VARIANT index,
        struct AddIn * * lppaddin ) = 0;
    virtual HRESULT __stdcall get_VBE (
        struct VBE * * lppVBA ) = 0;
    virtual HRESULT __stdcall get_Parent (
        IDispatch * * lppVBA ) = 0;
    virtual HRESULT __stdcall get_Count (
        long * lplReturn ) = 0;
    virtual HRESULT __stdcall raw__NewEnum (
        IUnknown * * lppiuReturn ) = 0;
    virtual HRESULT __stdcall raw_Update ( ) = 0;
};

struct __declspec(uuid("da936b63-ac8b-11d1-b6e5-00a0c90f2744"))
Addins;
    // [ default ] interface _AddIns

struct __declspec(uuid("da936b64-ac8b-11d1-b6e5-00a0c90f2744"))
AddIn : IDispatch
{
    //
    // Property data
    //

    __declspec(property(get=GetDescription,put=PutDescription))
    _bstr_t Description;
    __declspec(property(get=GetVBE))
    VBEPtr VBE;
    __declspec(property(get=GetCollection))
    _AddInsPtr Collection;
    __declspec(property(get=GetProgId))
    _bstr_t ProgId;
    __declspec(property(get=GetGuid))
    _bstr_t Guid;
    __declspec(property(get=GetConnect,put=PutConnect))
    VARIANT_BOOL Connect;
    __declspec(property(get=GetObject,put=PutObject))
    IDispatchPtr Object;

    //
    // Wrapper methods for error-handling
    //

    _bstr_t GetDescription ( );
    void PutDescription (
        _bstr_t lpbstr );
    VBEPtr GetVBE ( );
    _AddInsPtr GetCollection ( );
    _bstr_t GetProgId ( );
    _bstr_t GetGuid ( );
    VARIANT_BOOL GetConnect ( );
    void PutConnect (
        VARIANT_BOOL lpfConnect );
    IDispatchPtr GetObject ( );
    void PutObject (
        IDispatch * lppdisp );

    //
    // Raw methods provided by interface
    //

    virtual HRESULT __stdcall get_Description (
        BSTR * lpbstr ) = 0;
    virtual HRESULT __stdcall put_Description (
        BSTR lpbstr ) = 0;
    virtual HRESULT __stdcall get_VBE (
        struct VBE * * lppVBE ) = 0;
    virtual HRESULT __stdcall get_Collection (
        struct _AddIns * * lppaddins ) = 0;
    virtual HRESULT __stdcall get_ProgId (
        BSTR * lpbstr ) = 0;
    virtual HRESULT __stdcall get_Guid (
        BSTR * lpbstr ) = 0;
    virtual HRESULT __stdcall get_Connect (
        VARIANT_BOOL * lpfConnect ) = 0;
    virtual HRESULT __stdcall put_Connect (
        VARIANT_BOOL lpfConnect ) = 0;
    virtual HRESULT __stdcall get_Object (
        IDispatch * * lppdisp ) = 0;
    virtual HRESULT __stdcall put_Object (
        IDispatch * lppdisp ) = 0;
};

enum vbext_ProcKind
{
    vbext_pk_Proc = 0,
    vbext_pk_Let = 1,
    vbext_pk_Set = 2,
    vbext_pk_Get = 3
};

struct __declspec(uuid("0002e16e-0000-0000-c000-000000000046"))
_CodeModule : IDispatch
{
    //
    // Property data
    //

    __declspec(property(get=GetParent))
    _VBComponentPtr Parent;
    __declspec(property(get=GetVBE))
    VBEPtr VBE;
    __declspec(property(get=GetName,put=PutName))
    _bstr_t Name;
    __declspec(property(get=GetLines))
    _bstr_t Lines[][];
    __declspec(property(get=GetCountOfLines))
    long CountOfLines;
    __declspec(property(get=GetProcStartLine))
    long ProcStartLine[][];
    __declspec(property(get=GetProcCountLines))
    long ProcCountLines[][];
    __declspec(property(get=GetProcBodyLine))
    long ProcBodyLine[][];
    __declspec(property(get=GetCountOfDeclarationLines))
    long CountOfDeclarationLines;
    __declspec(property(get=GetCodePane))
    _CodePanePtr CodePane;

    //
    // Wrapper methods for error-handling
    //

    _VBComponentPtr GetParent ( );
    VBEPtr GetVBE ( );
    _bstr_t GetName ( );
    void PutName (
        _bstr_t pbstrName );
    HRESULT AddFromString (
        _bstr_t String );
    HRESULT AddFromFile (
        _bstr_t FileName );
    _bstr_t GetLines (
        long StartLine,
        long Count );
    long GetCountOfLines ( );
    HRESULT InsertLines (
        long Line,
        _bstr_t String );
    HRESULT DeleteLines (
        long StartLine,
        long Count );
    HRESULT ReplaceLine (
        long Line,
        _bstr_t String );
    long GetProcStartLine (
        _bstr_t ProcName,
        enum vbext_ProcKind ProcKind );
    long GetProcCountLines (
        _bstr_t ProcName,