Changeset 42 for Include/OAIdl.ab


Ignore:
Timestamp:
Dec 30, 2006, 11:20:03 PM (18 years ago)
Author:
イグトランス (egtra)
Message:

api_winerror.sbpとapi_winsock2.sbpとの間での定義の重複を除去など。

File:
1 edited

Legend:

Unmodified
Added
Removed

  • Include/OAIdl.ab

    r35 r42  
    66#define _INC_OAIDL_AB
    77
    8 ' verify that the <rpcndr.h> version is high enough to compile this file*/
    9 '/*
    10 '#ifndef __REQUIRED_RPCNDR_H_VERSION__
    11 '#define __REQUIRED_RPCNDR_H_VERSION__ 475
    12 '#endif
    13 '
    14 '#include "rpc.h"
    15 '#include "rpcndr.h"
    16 '
    17 '#ifndef __RPCNDR_H_VERSION__
    18 '#error this stub requires an updated version of <rpcndr.h>
    19 '#endif // __RPCNDR_H_VERSION__
    20 '
    218'#ifndef COM_NO_WINDOWS_H
    22 '#include "windows.h"
    23 '#include "ole2.h"
     9#include <windows.sbp>
     10#include <ole2.ab>
    2411'#endif /*COM_NO_WINDOWS_H*/
    2512
    26 #include <ole2.ab>
    27 '/* header files for imported files */
    28 '#include "objidl.h"
     13#include <objidl.sbp>
    2914
    3015#ifndef __IOleAutomationTypes_INTERFACE_DEFINED__
    … …  
    174159Const FADF_RESERVED = &hf008
    175160
     161Const Enum VARENUM 'WTypes.idl
     162    VT_EMPTY    = 0
     163    VT_NULL = 1
     164    VT_I2   = 2
     165    VT_I4   = 3
     166    VT_R4   = 4
     167    VT_R8   = 5
     168    VT_CY   = 6
     169    VT_DATE = 7
     170    VT_BSTR = 8
     171    VT_DISPATCH = 9
     172    VT_ERROR    = 10
     173    VT_BOOL = 11
     174    VT_VARIANT  = 12
     175    VT_UNKNOWN  = 13
     176    VT_DECIMAL  = 14
     177    VT_I1   = 16
     178    VT_UI1  = 17
     179    VT_UI2  = 18
     180    VT_UI4  = 19
     181    VT_I8   = 20
     182    VT_UI8  = 21
     183    VT_INT  = 22
     184    VT_UINT = 23
     185    VT_VOID = 24
     186    VT_HRESULT  = 25
     187    VT_PTR  = 26
     188    VT_SAFEARRAY    = 27
     189    VT_CARRAY   = 28
     190    VT_USERDEFINED  = 29
     191    VT_LPSTR    = 30
     192    VT_LPWSTR   = 31
     193    VT_RECORD   = 36
     194    VT_INT_PTR  = 37
     195    VT_UINT_PTR = 38
     196    VT_FILETIME = 64
     197    VT_BLOB = 65
     198    VT_STREAM   = 66
     199    VT_STORAGE  = 67
     200    VT_STREAMED_OBJECT  = 68
     201    VT_STORED_OBJECT    = 69
     202    VT_BLOB_OBJECT  = 70
     203    VT_CF   = 71
     204    VT_CLSID    = 72
     205    VT_VERSIONED_STREAM = 73
     206    VT_BSTR_BLOB    = &hfff
     207    VT_VECTOR   = &h1000
     208    VT_ARRAY    = &h2000
     209    VT_BYREF    = &h4000
     210    VT_RESERVED = &h8000
     211    VT_ILLEGAL  = &hffff
     212    VT_ILLEGALMASKED    = &hfff
     213    VT_TYPEMASK = &hfff
     214End Enum
     215
    176216Class VARIANT
    177217Public
    … …  
    588628Private
    589629    p As VoidPtr
    590 '    /* [switch_is][switch_type] */ Union
    591 '        /* [case()] */ lptdesc As *TYPEDESC
    592 '        /* [case()] */ lpadesc As *ARRAYDESC
    593 '        /* [case()] */ hreftype As HREFTYPE
    594 '        /* [default] */  /* Empty union arm */
    595 '    End Union
     630'   /* [switch_is][switch_type] */ Union
     631'       /* [case()] */ lptdesc As *TYPEDESC
     632'       /* [case()] */ lpadesc As *ARRAYDESC
     633'       /* [case()] */ hreftype As HREFTYPE
     634'       /* [default] */  /* Empty union arm */
     635'   End Union
    596636Public
    597637    vt As VARTYPE
    … …  
    752792/* [v1_enum] */
    753793Const Enum INVOKEKIND
    754     INVOKE_FUNC = 1
    755     INVOKE_PROPERTYGET  = 2
    756     INVOKE_PROPERTYPUT  = 4
    757     INVOKE_PROPERTYPUTREF   = 8
     794    INVOKE_FUNC = 1
     795    INVOKE_PROPERTYGET = 2
     796    INVOKE_PROPERTYPUT = 4
     797    INVOKE_PROPERTYPUTREF = 8
    758798End Enum
    759799
    … …  
    868908
    869909Type CUSTDATAITEM
    870     guid As GUID
    871     varValue As VARIANTARG
     910    guid As GUID
     911    varValue As VARIANTARG
    872912End Type
    873913
    … …  
    883923#endif /* __IOleAutomationTypes_INTERFACE_DEFINED__ */
    884924
    885 #ifdef __UNDEFINED__
    886 
    887925#ifndef __ICreateTypeInfo_INTERFACE_DEFINED__
    888926#define __ICreateTypeInfo_INTERFACE_DEFINED__
    … …  
    891929/* [local][unique][uuid][object] */
    892930
    893 'typedef /* [unique] */ ICreateTypeInfo *LPCREATETYPEINFO;
    894 
    895 
    896 EXTERN_C const IID IID_ICreateTypeInfo;
    897 
    898     MIDL_INTERFACE("00020405-0000-0000-C000-000000000046")
    899     ICreateTypeInfo : public IUnknown
    900     {
    901     public:
    902         Function SetGuid(
    903             /* [in] */ REFGUID guid) As HRESULT
    904 
    905         Function SetTypeFlags(
    906             /* [in] */ UINT uTypeFlags) As HRESULT
    907 
    908         Function SetDocString(
    909             /* [in] */ LPOLESTR pStrDoc) As HRESULT
    910 
    911         Function SetHelpContext(
    912             /* [in] */ DWORD dwHelpContext) As HRESULT
    913 
    914         Function SetVersion(
    915             /* [in] */ WORD wMajorVerNum,
    916             /* [in] */ WORD wMinorVerNum) As HRESULT
    917 
    918         Function AddRefTypeInfo(
    919             /* [in] */ ITypeInfo *pTInfo,
    920             /* [in] */ HREFTYPE *phRefType) As HRESULT
    921 
    922         Function AddFuncDesc(
    923             /* [in] */ UINT index,
    924             /* [in] */ FUNCDESC *pFuncDesc) As HRESULT
    925 
    926         Function AddImplType(
    927             /* [in] */ UINT index,
    928             /* [in] */ HREFTYPE hRefType) As HRESULT
    929 
    930         Function SetImplTypeFlags(
    931             /* [in] */ UINT index,
    932             /* [in] */ INT implTypeFlags) As HRESULT
    933 
    934         Function SetAlignment(
    935             /* [in] */ WORD cbAlignment) As HRESULT
    936 
    937         Function SetSchema(
    938             /* [in] */ LPOLESTR pStrSchema) As HRESULT
    939 
    940         Function AddVarDesc(
    941             /* [in] */ UINT index,
    942             /* [in] */ VARDESC *pVarDesc) As HRESULT
    943 
    944         Function SetFuncAndParamNames(
    945             /* [in] */ UINT index,
    946             /* [in][size_is][in] */ LPOLESTR *rgszNames,
    947             /* [in] */ UINT cNames) As HRESULT
    948 
    949         Function SetVarName(
    950             /* [in] */ UINT index,
    951             /* [in] */ LPOLESTR szName) As HRESULT
    952 
    953         Function SetTypeDescAlias(
    954             /* [in] */ TYPEDESC *pTDescAlias) As HRESULT
    955 
    956         Function DefineFuncAsDllEntry(
    957             /* [in] */ UINT index,
    958             /* [in] */ LPOLESTR szDllName,
    959             /* [in] */ LPOLESTR szProcName) As HRESULT
    960 
    961         Function SetFuncDocString(
    962             /* [in] */ UINT index,
    963             /* [in] */ LPOLESTR szDocString) As HRESULT
    964 
    965         Function SetVarDocString(
    966             /* [in] */ UINT index,
    967             /* [in] */ LPOLESTR szDocString) As HRESULT
    968 
    969         Function SetFuncHelpContext(
    970             /* [in] */ UINT index,
    971             /* [in] */ DWORD dwHelpContext) As HRESULT
    972 
    973         Function SetVarHelpContext(
    974             /* [in] */ UINT index,
    975             /* [in] */ DWORD dwHelpContext) As HRESULT
    976 
    977         Function SetMops(
    978             /* [in] */ UINT index,
    979             /* [in] */ BSTR bstrMops) As HRESULT
    980 
    981         Function SetTypeIdldesc(
    982             /* [in] */ IDLDESC *pIdlDesc) As HRESULT
    983 
    984         Function LayOut( void) As HRESULT
    985 
    986     };
     931'TypeDef /* [unique] */ ICreateTypeInfo *LPCREATETYPEINFO;
     932
     933Dim IID_ICreateTypeInfo = [&h00020405, &h0000, &h0000, [&hC0, &h00, &h00, &h00, &h00, &h00, &h00, &h46]] As IID
     934
     935Interface ICreateTypeInfo
     936    Inherits IUnknown
     937
     938        Function SetGuid(
     939            /* [in] */ ByRef guid As GUID) As HRESULT
     940
     941        Function SetTypeFlags(
     942            /* [in] */ uTypeFlags As DWord) As HRESULT
     943
     944        Function SetDocString(
     945            /* [in] */ pStrDoc As LPOLESTR) As HRESULT
     946
     947        Function SetHelpContext(
     948            /* [in] */ dwHelpContext As DWord) As HRESULT
     949
     950        Function SetVersion(
     951            /* [in] */ wMajorVerNum As Word,
     952            /* [in] */ wMinorVerNum As Word) As HRESULT
     953
     954        Function AddRefTypeInfo(
     955            /* [in] */ pTInfo As VoidPtr /* *ITypeInfo */,
     956            /* [in] */ByRef hRefType As HREFTYPE) As HRESULT
     957
     958        Function AddFuncDesc(
     959            /* [in] */ index As DWord,
     960            /* [in] */ ByRef FuncDesc As FUNCDESC) As HRESULT
     961
     962        Function AddImplType(
     963            /* [in] */ index As DWord,
     964            /* [in] */ hRefType As HREFTYPE) As HRESULT
     965
     966        Function SetImplTypeFlags(
     967            /* [in] */ index As DWord,
     968            /* [in] */ implTypeFlags As Long) As HRESULT
     969
     970        Function SetAlignment(
     971            /* [in] */ cbAlignment As Long) As HRESULT
     972
     973        Function SetSchema(
     974            /* [in] */ pStrSchema As LPOLESTR) As HRESULT
     975
     976        Function AddVarDesc(
     977            /* [in] */ index As DWord,
     978            /* [in] */ ByRef VarDesc As VARDESC) As HRESULT
     979
     980        Function SetFuncAndParamNames(
     981            /* [in] */ index As DWord,
     982            /* [in][size_is][in] */ rgszNames As *LPOLESTR,
     983            /* [in] */ cNames As DWord) As HRESULT
     984
     985        Function SetVarName(
     986            /* [in] */ index As DWord,
     987            /* [in] */ szName As LPOLESTR) As HRESULT
     988
     989        Function SetTypeDescAlias(
     990            /* [in] */ ByRef TDescAlias As TYPEDESC) As HRESULT
     991
     992        Function DefineFuncAsDllEntry(
     993            /* [in] */ index As DWord,
     994            /* [in] */ szDllName As LPOLESTR,
     995            /* [in] */ zProcName As LPOLESTR) As HRESULT
     996
     997        Function SetFuncDocString(
     998            /* [in] */ index As DWord,
     999            /* [in] */ szDocString As LPOLESTR) As HRESULT
     1000
     1001        Function SetVarDocString(
     1002            /* [in] */ index As DWord,
     1003            /* [in] */ szDocString As LPOLESTR) As HRESULT
     1004
     1005        Function SetFuncHelpContext(
     1006            /* [in] */ index As DWord,
     1007            /* [in] */ dwHelpContext As DWord) As HRESULT
     1008
     1009        Function SetVarHelpContext(
     1010            /* [in] */ index As DWord,
     1011            /* [in] */ dwHelpContext As DWord) As HRESULT
     1012
     1013        Function SetMops(
     1014            /* [in] */ index As DWord,
     1015            /* [in] */ bstrMops As BSTR) As HRESULT
     1016
     1017        Function SetTypeIdldesc(
     1018            /* [in] */ ByRef IdlDesc As IDLDESC) As HRESULT
     1019
     1020        Function LayOut() As HRESULT
     1021End Interface
    9871022
    9881023#endif  /* __ICreateTypeInfo_INTERFACE_DEFINED__ */
    989 
    9901024
    9911025#ifndef __ICreateTypeInfo2_INTERFACE_DEFINED__
    … …  
    9951029/* [local][unique][uuid][object] */
    9961030
    997 'typedef /* [unique] */ ICreateTypeInfo2 *LPCREATETYPEINFO2;
    998 
    999 
    1000 EXTERN_C const IID IID_ICreateTypeInfo2;
    1001 
    1002     MIDL_INTERFACE("0002040E-0000-0000-C000-000000000046")
    1003     ICreateTypeInfo2 : public ICreateTypeInfo
    1004     {
    1005     public:
    1006         Function DeleteFuncDesc(
    1007             /* [in] */ UINT index) As HRESULT
    1008 
    1009         Function DeleteFuncDescByMemId(
    1010             /* [in] */ MEMBERID memid,
    1011             /* [in] */ INVOKEKIND invKind) As HRESULT
    1012 
    1013         Function DeleteVarDesc(
    1014             /* [in] */ UINT index) As HRESULT
    1015 
    1016         Function DeleteVarDescByMemId(
    1017             /* [in] */ MEMBERID memid) As HRESULT
    1018 
    1019         Function DeleteImplType(
    1020             /* [in] */ UINT index) As HRESULT
    1021 
    1022         Function SetCustData(
    1023             /* [in] */ REFGUID guid,
    1024             /* [in] */ VARIANT *pVarVal) As HRESULT
    1025 
    1026         Function SetFuncCustData(
    1027             /* [in] */ UINT index,
    1028             /* [in] */ REFGUID guid,
    1029             /* [in] */ VARIANT *pVarVal) As HRESULT
    1030 
    1031         Function SetParamCustData(
    1032             /* [in] */ UINT indexFunc,
    1033             /* [in] */ UINT indexParam,
    1034             /* [in] */ REFGUID guid,
    1035             /* [in] */ VARIANT *pVarVal) As HRESULT
    1036 
    1037         Function SetVarCustData(
    1038             /* [in] */ UINT index,
    1039             /* [in] */ REFGUID guid,
    1040             /* [in] */ VARIANT *pVarVal) As HRESULT
    1041 
    1042         Function SetImplTypeCustData(
    1043             /* [in] */ UINT index,
    1044             /* [in] */ REFGUID guid,
    1045             /* [in] */ VARIANT *pVarVal) As HRESULT
    1046 
    1047         Function SetHelpStringContext(
    1048             /* [in] */ ULONG dwHelpStringContext) As HRESULT
    1049 
    1050         Function SetFuncHelpStringContext(
    1051             /* [in] */ UINT index,
    1052             /* [in] */ ULONG dwHelpStringContext) As HRESULT
    1053 
    1054         Function SetVarHelpStringContext(
    1055             /* [in] */ UINT index,
    1056             /* [in] */ ULONG dwHelpStringContext) As HRESULT
    1057 
    1058         Function Invalidate( void) As HRESULT
    1059 
    1060         Function SetName(
    1061             /* [in] */ LPOLESTR szName) As HRESULT
    1062 
    1063     };
    1064 
    1065 
     1031TypeDef LPCREATETYPEINFO2 = /* [unique] */ *ICreateTypeInfo2
     1032
     1033Dim IID_ICreateTypeInfo2 = [&h0002040E, &h0000, &h0000, [&hC0, &h00, &h00, &h00, &h00, &h00, &h00, &h46]] As IID
     1034
     1035Interface ICreateTypeInfo2
     1036    Inherits ICreateTypeInfo
     1037
     1038    Function DeleteFuncDesc(
     1039        /* [in] */ index As DWord) As HRESULT
     1040
     1041    Function DeleteFuncDescByMemId(
     1042        /* [in] */ memid As *MEMBERID,
     1043        /* [in] */ invKind As *INVOKEKIND) As HRESULT
     1044
     1045    Function DeleteVarDesc(
     1046        /* [in] */ index As DWord) As HRESULT
     1047
     1048    Function DeleteVarDescByMemId(
     1049        /* [in] */ memid As *MEMBERID) As HRESULT
     1050
     1051    Function DeleteImplType(
     1052        /* [in] */ index As DWord) As HRESULT
     1053
     1054    Function SetCustData(
     1055        /* [in] */ ByRef guid As GUID,
     1056        /* [in] */ ByRef VarVal As VARIANT) As HRESULT
     1057
     1058    Function SetFuncCustData(
     1059        /* [in] */ index As DWord,
     1060        /* [in] */ ByRef guid As GUID,
     1061        /* [in] */ ByRef VarVal As VARIANT) As HRESULT
     1062
     1063    Function SetParamCustData(
     1064        /* [in] */ indexFunc As DWord,
     1065        /* [in] */ indexParam As DWord,
     1066        /* [in] */ ByRef guid As GUID,
     1067        /* [in] */ ByRef VarVal As VARIANT) As HRESULT
     1068
     1069    Function SetVarCustData(
     1070        /* [in] */ index As DWord,
     1071        /* [in] */ ByRef guid As GUID,
     1072        /* [in] */ ByRef VarVal As VARIANT) As HRESULT
     1073
     1074    Function SetImplTypeCustData(
     1075        /* [in] */ index As DWord,
     1076        /* [in] */ ByRef guid As GUID,
     1077        /* [in] */ ByRef VarVal As VARIANT) As HRESULT
     1078
     1079    Function SetHelpStringContext(
     1080        /* [in] */ dwHelpStringContext As DWord) As HRESULT
     1081
     1082    Function SetFuncHelpStringContext(
     1083        /* [in] */ index As DWord,
     1084        /* [in] */ dwHelpStringContext As DWord) As HRESULT
     1085
     1086    Function SetVarHelpStringContext(
     1087        /* [in] */ index As DWord,
     1088        /* [in] */ dwHelpStringContext As DWord) As HRESULT
     1089
     1090    Function Invalidate() As HRESULT
     1091
     1092    Function SetName(
     1093        /* [in] */ szName As LPOLESTR) As HRESULT
     1094End Interface
    10661095
    10671096#endif  /* __ICreateTypeInfo2_INTERFACE_DEFINED__ */
    … …  
    10741103/* [local][unique][uuid][object] */
    10751104
    1076 'typedef /* [unique] */ ICreateTypeLib *LPCREATETYPELIB;
    1077 
    1078 
    1079 EXTERN_C const IID IID_ICreateTypeLib;
    1080 
    1081     MIDL_INTERFACE("00020406-0000-0000-C000-000000000046")
    1082     ICreateTypeLib : public IUnknown
    1083     {
    1084     public:
    1085         Function CreateTypeInfo(
    1086             /* [in] */ LPOLESTR szName,
    1087             /* [in] */ TYPEKIND tkind,
    1088             /* [out] */ ICreateTypeInfo **ppCTInfo) As HRESULT
    1089 
    1090         Function SetName(
    1091             /* [in] */ LPOLESTR szName) As HRESULT
    1092 
    1093         Function SetVersion(
    1094             /* [in] */ WORD wMajorVerNum,
    1095             /* [in] */ WORD wMinorVerNum) As HRESULT
    1096 
    1097         Function SetGuid(
    1098             /* [in] */ REFGUID guid) As HRESULT
    1099 
    1100         Function SetDocString(
    1101             /* [in] */ LPOLESTR szDoc) As HRESULT
    1102 
    1103         Function SetHelpFileName(
    1104             /* [in] */ LPOLESTR szHelpFileName) As HRESULT
    1105 
    1106         Function SetHelpContext(
    1107             /* [in] */ DWORD dwHelpContext) As HRESULT
    1108 
    1109         Function SetLcid(
    1110             /* [in] */ LCID lcid) As HRESULT
    1111 
    1112         Function SetLibFlags(
    1113             /* [in] */ UINT uLibFlags) As HRESULT
    1114 
    1115         Function SaveAllChanges( void) As HRESULT
    1116 
    1117     };
     1105TypeDef LPCREATETYPELIB = /* [unique] */ *ICreateTypeLib
     1106
     1107
     1108Dim IID_ICreateTypeLib = [&h00020406, &h0000, &h0000, [&hC0, &h00, &h00, &h00, &h00, &h00, &h00, &h46]] As IID
     1109Interface ICreateTypeLib
     1110    Inherits IUnknown
     1111
     1112    Function CreateTypeInfo(
     1113        /* [in] */ szName As LPOLESTR,
     1114        /* [in] */ tkind As *TYPEKIND,
     1115        /* [out] */ ByRef pCTInfo As *ICreateTypeInfo) As HRESULT
     1116
     1117    Function SetName(
     1118        /* [in] */ szName As LPOLESTR) As HRESULT
     1119
     1120    Function SetVersion(
     1121        /* [in] */ wMajorVerNum As Word,
     1122        /* [in] */ wMinorVerNum As Word) As HRESULT
     1123
     1124    Function SetGuid(
     1125        /* [in] */ ByRef guid As GUID) As HRESULT
     1126
     1127    Function SetDocString(
     1128        /* [in] */ szDoc As LPOLESTR) As HRESULT
     1129
     1130    Function SetHelpFileName(
     1131        /* [in] */ szHelpFileName As LPOLESTR) As HRESULT
     1132
     1133    Function SetHelpContext(
     1134        /* [in] */ dwHelpContext As DWord) As HRESULT
     1135
     1136    Function SetLcid(
     1137        /* [in] */ lcid As LCID) As HRESULT
     1138
     1139    Function SetLibFlags(
     1140        /* [in] */ uLibFlags As DWord) As HRESULT
     1141
     1142    Function SaveAllChanges() As HRESULT
     1143End Interface
    11181144
    11191145
    11201146#endif  /* __ICreateTypeLib_INTERFACE_DEFINED__ */
    1121 
    11221147
    11231148#ifndef __ICreateTypeLib2_INTERFACE_DEFINED__
    … …  
    11271152/* [local][unique][uuid][object] */
    11281153
    1129 typedef /* [unique] */ ICreateTypeLib2 *LPCREATETYPELIB2;
    1130 
    1131 
    1132 EXTERN_C const IID IID_ICreateTypeLib2;
    1133 
    1134     MIDL_INTERFACE("0002040F-0000-0000-C000-000000000046")
    1135     ICreateTypeLib2 : public ICreateTypeLib
    1136     {
    1137     public:
    1138         Function DeleteTypeInfo(
    1139             /* [in] */ LPOLESTR szName) As HRESULT
    1140 
    1141         Function SetCustData(
    1142             /* [in] */ REFGUID guid,
    1143             /* [in] */ VARIANT *pVarVal) As HRESULT
    1144 
    1145         Function SetHelpStringContext(
    1146             /* [in] */ ULONG dwHelpStringContext) As HRESULT
    1147 
    1148         Function SetHelpStringDll(
    1149             /* [in] */ LPOLESTR szFileName) As HRESULT
    1150 
    1151     };
     1154TypeDef LPCREATETYPELIB2 = /* [unique] */ *ICreateTypeLib2
     1155
     1156
     1157Dim IID_ICreateTypeLib2 = [&h0002040F, &h0000, &h0000, [&hC0, &h00, &h00, &h00, &h00, &h00, &h00, &h46]] As IID
     1158
     1159Interface ICreateTypeLib2
     1160    Inherits ICreateTypeLib
     1161
     1162    Function DeleteTypeInfo(
     1163        /* [in] */ szName As LPOLESTR) As HRESULT
     1164
     1165    Function SetCustData(
     1166        /* [in] */ ByRef guid As GUID,
     1167        /* [in] */ ByRef VarVal As VARIANT) As HRESULT
     1168
     1169    Function SetHelpStringContext(
     1170        /* [in] */ dwHelpStringContext As DWord) As HRESULT
     1171
     1172    Function SetHelpStringDll(
     1173        /* [in] */ szFileName As LPOLESTR) As HRESULT
     1174
     1175End Interface
    11521176
    11531177
    11541178#endif  /* __ICreateTypeLib2_INTERFACE_DEFINED__ */
    1155 
    1156 #endif '__UNDECLARED__
    11571179
    11581180#ifndef __IDispatch_INTERFACE_DEFINED__
    … …  
    12461268/* [unique][uuid][object] */
    12471269
    1248 typedef /* [unique] */ ITypeComp *LPTYPECOMP;
    1249 
    1250 typedef /* [v1_enum] */
    1251 enum tagDESCKIND
    1252     {   DESCKIND_NONE = 0,
    1253     DESCKIND_FUNCDESC = DESCKIND_NONE + 1,
    1254     DESCKIND_VARDESC = DESCKIND_FUNCDESC + 1,
    1255     DESCKIND_TYPECOMP = DESCKIND_VARDESC + 1,
    1256     DESCKIND_IMPLICITAPPOBJ = DESCKIND_TYPECOMP + 1,
    1257     DESCKIND_MAX = DESCKIND_IMPLICITAPPOBJ + 1
    1258     }   DESCKIND;
    1259 
    1260 typedef union tagBINDPTR
    1261     {
    1262     FUNCDESC *lpfuncdesc;
    1263     VARDESC *lpvardesc;
    1264     ITypeComp *lptcomp;
    1265     }   BINDPTR;
    1266 
    1267 typedef union tagBINDPTR *LPBINDPTR;
    1268 
     1270TypeDef /* [unique] */ ITypeComp *LPTYPECOMP;
     1271
     1272/* [v1_enum] */
     1273Const Enum DESCKIND
     1274    DESCKIND_NONE
     1275    DESCKIND_FUNCDESC = DESCKIND_NONE
     1276    DESCKIND_VARDESC = DESCKIND_FUNCDESC
     1277    DESCKIND_TYPECOMP = DESCKIND_VARDESC
     1278    DESCKIND_IMPLICITAPPOBJ = DESCKIND_TYPECOMP
     1279    DESCKIND_MAX = DESCKIND_IMPLICITAPPOBJ
     1280End Enum
     1281/*
     1282Union BINDPTR
     1283    lpfuncdesc As *FUNCDESC
     1284    lpvardesc As *VARDESC
     1285    lptcomp As *ITypeComp
     1286End Union
     1287
     1288TypeDef LPBINDPTR = *BINDPTR
     1289*/
    12691290
    12701291EXTERN_C const IID IID_ITypeComp;
    … …  
    13001321/* [unique][uuid][object] */
    13011322
    1302 typedef /* [unique] */ ITypeInfo *LPTYPEINFO;
     1323TypeDef /* [unique] */ ITypeInfo *LPTYPEINFO;
    13031324
    13041325
    … …  
    14071428/* [unique][uuid][object] */
    14081429
    1409 typedef /* [unique] */ ITypeInfo2 *LPTYPEINFO2;
     1430TypeDef /* [unique] */ ITypeInfo2 *LPTYPEINFO2;
    14101431
    14111432
    … …  
    14951516/* [unique][uuid][object] */
    14961517
    1497 typedef /* [v1_enum] */
     1518TypeDef /* [v1_enum] */
    14981519enum tagSYSKIND
    14991520    {   SYS_WIN16 = 0,
    … …  
    15031524    }   SYSKIND;
    15041525
    1505 typedef /* [v1_enum] */
     1526TypeDef /* [v1_enum] */
    15061527enum tagLIBFLAGS
    15071528    {   LIBFLAG_FRESTRICTED = 0x1,
    … …  
    15111532    }   LIBFLAGS;
    15121533
    1513 typedef /* [unique] */ ITypeLib *LPTYPELIB;
    1514 
    1515 typedef struct tagTLIBATTR
     1534TypeDef /* [unique] */ ITypeLib *LPTYPELIB;
     1535
     1536TypeDef struct tagTLIBATTR
    15161537    {
    15171538    GUID guid;
    … …  
    15231544    }   TLIBATTR;
    15241545
    1525 typedef struct tagTLIBATTR *LPTLIBATTR;
     1546TypeDef struct tagTLIBATTR *LPTLIBATTR;
    15261547
    15271548
    … …  
    15851606/* [unique][uuid][object] */
    15861607
    1587 typedef /* [unique] */ ITypeLib2 *LPTYPELIB2;
     1608TypeDef /* [unique] */ ITypeLib2 *LPTYPELIB2;
    15881609
    15891610
    … …  
    16231644/* [local][unique][uuid][object] */
    16241645
    1625 typedef /* [unique] */ ITypeChangeEvents *LPTYPECHANGEEVENTS;
    1626 
    1627 typedef
    1628 enum tagCHANGEKIND
    1629     {   CHANGEKIND_ADDMEMBER = 0,
     1646TypeDef /* [unique] */ ITypeChangeEvents *LPTYPECHANGEEVENTS;
     1647
     1648Enum CHANGEKIND
     1649    CHANGEKIND_ADDMEMBER = 0,
    16301650    CHANGEKIND_DELETEMEMBER = CHANGEKIND_ADDMEMBER + 1,
    16311651    CHANGEKIND_SETNAMES = CHANGEKIND_DELETEMEMBER + 1,
    … …  
    16351655    CHANGEKIND_CHANGEFAILED = CHANGEKIND_INVALIDATE + 1,
    16361656    CHANGEKIND_MAX = CHANGEKIND_CHANGEFAILED + 1
    1637     }   CHANGEKIND;
     1657End Enum
    16381658
    16391659
    … …  
    16661686/* [unique][uuid][object] */
    16671687
    1668 typedef /* [unique] */ IErrorInfo *LPERRORINFO;
     1688TypeDef /* [unique] */ IErrorInfo *LPERRORINFO;
    16691689
    16701690
    … …  
    17011721/* [unique][uuid][object] */
    17021722
    1703 typedef /* [unique] */ ICreateErrorInfo *LPCREATEERRORINFO;
     1723TypeDef /* [unique] */ ICreateErrorInfo *LPCREATEERRORINFO;
    17041724
    17051725
    … …  
    17361756/* [unique][uuid][object] */
    17371757
    1738 typedef /* [unique] */ ISupportErrorInfo *LPSUPPORTERRORINFO;
     1758TypeDef /* [unique] */ ISupportErrorInfo *LPSUPPORTERRORINFO;
    17391759
    17401760
    … …  
    18241844/* [uuid][object][local] */
    18251845
    1826 typedef /* [unique] */ IRecordInfo *LPRECORDINFO;
     1846TypeDef /* [unique] */ IRecordInfo *LPRECORDINFO;
    18271847
    18281848
    … …  
    18981918#endif  /* __IRecordInfo_INTERFACE_DEFINED__ */
    18991919
     1920#endif ' __UNDEFINED__
     1921
    19001922
    19011923#ifndef __IErrorLog_INTERFACE_DEFINED__
    … …  
    19051927/* [unique][uuid][object] */
    19061928
    1907 typedef IErrorLog *LPERRORLOG;
    1908 
    1909 
    1910 EXTERN_C const IID IID_IErrorLog;
    1911 
    1912     MIDL_INTERFACE("3127CA40-446E-11CE-8135-00AA004BB851")
    1913     IErrorLog : public IUnknown
    1914     {
    1915     public:
    1916         Function AddError(
    1917             /* [in] */ LPCOLESTR pszPropName,
    1918             /* [in] */ EXCEPINFO *pExcepInfo) As HRESULT
    1919 
    1920     };
     1929TypeDef LPERRORLOG = *IErrorLog
     1930
     1931Dim IID_IErrorLog = [&h3127CA40, &h446E, &h11CE, [&h81, &h35, &h00, &hAA, &h00, &h4B, &hB8, &h51]] As IID
     1932
     1933Interface IErrorLog
     1934    Inherits IUnknown
     1935
     1936    Function AddError(
     1937        /* [in] */ pszPropName As LPCOLESTR,
     1938        /* [in] */ ByRef pExcepInfo As EXCEPINFO) As HRESULT
     1939End Interface
    19211940
    19221941#endif  /* __IErrorLog_INTERFACE_DEFINED__ */
    … …  
    19291948/* [unique][uuid][object] */
    19301949
    1931 typedef IPropertyBag *LPPROPERTYBAG;
    1932 
    1933 
    1934 EXTERN_C const IID IID_IPropertyBag;
    1935 
    1936     MIDL_INTERFACE("55272A00-42CB-11CE-8135-00AA004BB851")
    1937     IPropertyBag : public IUnknown
    1938     {
    1939     public:
    1940         virtual /* [local] */ HRESULT STDMETHODCALLTYPE Read(
    1941             /* [in] */ LPCOLESTR pszPropName,
    1942             /* [out][in] */ VARIANT *pVar,
    1943             /* [in] */ IErrorLog *pErrorLog) As HRESULT
    1944 
    1945         Function Write(
    1946             /* [in] */ LPCOLESTR pszPropName,
    1947             /* [in] */ VARIANT *pVar) As HRESULT
    1948 
    1949     };
     1950TypeDef LPPROPERTYBAG = *IPropertyBag
     1951
     1952Dim IID_IPropertyBag = [&h55272A00, &h42CB, &h11CE, [&h81, &h35, &h00, &hAA, &h00, &h4B, &hB8, &h51]] As IID
     1953
     1954Interface IPropertyBag
     1955    Inherits IUnknown
     1956
     1957    /* [local] */ Function Read(
     1958        /* [in] */ pszPropName As LPCOLESTR,
     1959        /* [out][in] */ ByRef Var As VARIANT,
     1960        /* [in] */ pErrorLog As *IErrorLog) As HRESULT
     1961
     1962    Function Write(
     1963        /* [in] */ pszPropName As LPCOLESTR,
     1964        /* [in] */ ByRef Var As VARIANT) As HRESULT
     1965End Interface
     1966
    19501967#endif  /* __IPropertyBag_INTERFACE_DEFINED__ */
    19511968
    1952 #endif ' __UNDEFINED__
    1953 
    19541969#endif '_INC_OAIDL_AB
Note: See TracChangeset for help on using the changeset viewer.