| 1 | 'Include/objidl.sbp
|
|---|
| 2 |
|
|---|
| 3 | TypeDef SNB = **OLECHAR
|
|---|
| 4 |
|
|---|
| 5 | Type COSERVERINFO
|
|---|
| 6 | dwReserved1 As DWord
|
|---|
| 7 | pwszName As LPWSTR
|
|---|
| 8 | pAuthInfo As *COAUTHINFO
|
|---|
| 9 | dwReserved2 As DWord
|
|---|
| 10 | End Type
|
|---|
| 11 |
|
|---|
| 12 | /* interface IMarshal */
|
|---|
| 13 | /* [uuid][object][local] */
|
|---|
| 14 |
|
|---|
| 15 | Dim IID_IMarshal = [&h00000003, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
|
|---|
| 16 | Interface IMarshal
|
|---|
| 17 | Inherits IUnknown
|
|---|
| 18 |
|
|---|
| 19 | Function GetUnmarshalClass(
|
|---|
| 20 | /* [in] */ ByRef iid As IID,
|
|---|
| 21 | /* [unique][in] */ pv As VoidPtr,
|
|---|
| 22 | /* [in] */ dwDestContext As DWord,
|
|---|
| 23 | /* [unique][in] */ pvDestContext As VoidPtr,
|
|---|
| 24 | /* [in] */ mshlflags As DWord,
|
|---|
| 25 | /* [out] */ ByRef Cid As CLSID) As HRESULT
|
|---|
| 26 | Function GetMarshalSizeMax(
|
|---|
| 27 | /* [in] */ ByRef iid As IID,
|
|---|
| 28 | /* [unique][in] */ pv As VoidPtr,
|
|---|
| 29 | /* [in] */ dwDestContext As DWord,
|
|---|
| 30 | /* [unique][in] */ pvDestContext As VoidPtr,
|
|---|
| 31 | /* [in] */ mshlflags As DWord,
|
|---|
| 32 | /* [out] */ ByRef Size As DWord) As HRESULT
|
|---|
| 33 | Function MarshalInterface(
|
|---|
| 34 | /* [unique][in] */ pStm As IStream,
|
|---|
| 35 | /* [in] */ ByRef iid As IID,
|
|---|
| 36 | /* [unique][in] */ pv As VoidPtr,
|
|---|
| 37 | /* [in] */ dwDestContext As DWord,
|
|---|
| 38 | /* [unique][in] */ pvDestContext As VoidPtr,
|
|---|
| 39 | /* [in] */ mshlflags As DWord) As HRESULT
|
|---|
| 40 | Function UnmarshalInterface(
|
|---|
| 41 | /* [unique][in] */ pStm As IStream,
|
|---|
| 42 | /* [in] */ ByRef iid As IID,
|
|---|
| 43 | /* [out] */ ByRef ppv As VoidPtr) As HRESULT
|
|---|
| 44 | Function ReleaseMarshalData(
|
|---|
| 45 | /* [unique][in] */ pStm As *IStream) As HRESULT
|
|---|
| 46 | Function DisconnectObject(
|
|---|
| 47 | /* [in] */ dwReserved As DWord) As HRESULT
|
|---|
| 48 | End Interface
|
|---|
| 49 |
|
|---|
| 50 | /* interface IMarshal2 */
|
|---|
| 51 | /* [uuid][object][local] */
|
|---|
| 52 |
|
|---|
| 53 | Dim IID_IMarshal2 = [&h000001Cf, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
|
|---|
| 54 | Interface IMarshal2
|
|---|
| 55 | Inherits IMarshal
|
|---|
| 56 | End Interface
|
|---|
| 57 |
|
|---|
| 58 | /* interface IMalloc */
|
|---|
| 59 | /* [uuid][object][local] */
|
|---|
| 60 |
|
|---|
| 61 | Dim IID_IMalloc = [&h00000002, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
|
|---|
| 62 | Interface IMalloc
|
|---|
| 63 | Inherits IUnknown
|
|---|
| 64 |
|
|---|
| 65 | Function Alloc(
|
|---|
| 66 | /* [in] */ cb As SIZE_T) As VoidPtr
|
|---|
| 67 | Function Realloc(
|
|---|
| 68 | /* [in] */ pv As VoidPtr,
|
|---|
| 69 | /* [in] */ cb As SIZE_T) As VoidPtr
|
|---|
| 70 | Sub Free(
|
|---|
| 71 | /* [in] */ pv As VoidPtr)
|
|---|
| 72 | Function GetSize(pv As VoidPtr) As SIZE_T
|
|---|
| 73 | Function DidAlloc(pv As VoidPtr) As Long
|
|---|
| 74 | Sub HeapMinimize()
|
|---|
| 75 | End Interface
|
|---|
| 76 |
|
|---|
| 77 | /* interface IMallocSpy */
|
|---|
| 78 | /* [uuid][object][local] */
|
|---|
| 79 |
|
|---|
| 80 | Dim IID_IMallocSpy = [&h0000001d, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
|
|---|
| 81 | Interface IMallocSpy
|
|---|
| 82 | Inherits IUnknown
|
|---|
| 83 |
|
|---|
| 84 | Function PreAlloc(
|
|---|
| 85 | /* [in] */ cbRequest As SIZE_T) As HRESULT
|
|---|
| 86 | Function PostAlloc(
|
|---|
| 87 | /* [in] */ pActual As VoidPtr) As VoidPtr
|
|---|
| 88 | Function PreFree(
|
|---|
| 89 | /* [in] */ pRequest As VoidPtr,
|
|---|
| 90 | /* [in] */ fSpyed As BOOL) As VoidPtr
|
|---|
| 91 | Sub PostFree(
|
|---|
| 92 | /* [in] */ fSpyed As BOOL)
|
|---|
| 93 | Function PreRealloc(
|
|---|
| 94 | /* [in] */ pRequest As VoidPtr,
|
|---|
| 95 | /* [in] */ cbRequestt As SIZE_T,
|
|---|
| 96 | /* [out] */ ByRef ppNewRequest As VoidPtr,
|
|---|
| 97 | /* [in] */ fSpyed As BOOL) As HRESULT
|
|---|
| 98 | Function PostRealloc(
|
|---|
| 99 | /* [in] */ pActual As VoidPtr,
|
|---|
| 100 | /* [in] */ fSpyed As BOOL) As VoidPtr
|
|---|
| 101 | Function PreGetSize(
|
|---|
| 102 | /* [in] */ pRequest As VoidPtr,
|
|---|
| 103 | /* [in] */ fSpyed As BOOL) As VoidPtr
|
|---|
| 104 | Function PostGetSize(
|
|---|
| 105 | /* [in] */ cbActual As SIZE_T,
|
|---|
| 106 | /* [in] */ fSpyed As BOOL) As HRESULT
|
|---|
| 107 | Function PreDidAlloc(
|
|---|
| 108 | /* [in] */ pRequest As VoidPtr,
|
|---|
| 109 | /* [in] */ fSpyed As BOOL) As VoidPtr
|
|---|
| 110 | Function PostDidAlloc(
|
|---|
| 111 | /* [in] */ pRequest As VoidPtr,
|
|---|
| 112 | /* [in] */ fSpyed As BOOL,
|
|---|
| 113 | /* [in] */ fActual As Long) As Long
|
|---|
| 114 | Sub PreHeapMinimize()
|
|---|
| 115 | Sub PostHeapMinimize()
|
|---|
| 116 | End Interface
|
|---|
| 117 |
|
|---|
| 118 | /* interface IStdMarshalInfo */
|
|---|
| 119 | /* [uuid][object][local] */
|
|---|
| 120 |
|
|---|
| 121 | Dim IID_IStdMarshalInfo = [&h00000018, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
|
|---|
| 122 |
|
|---|
| 123 | Interface IStdMarshalInfo
|
|---|
| 124 | Inherits IUnknown
|
|---|
| 125 |
|
|---|
| 126 | Function GetClassForHandler(
|
|---|
| 127 | /* [in] */ dwDestContext As DWord,
|
|---|
| 128 | /* [unique][in] */ pvDestContext As VoidPtr,
|
|---|
| 129 | /* [out] */ ByRef clsid As CLSID) As HRESULT
|
|---|
| 130 | End Interface
|
|---|
| 131 |
|
|---|
| 132 | /* interface IExternalConnection */
|
|---|
| 133 | /* [uuid][local][object] */
|
|---|
| 134 |
|
|---|
| 135 | Const Enum EXTCONN
|
|---|
| 136 | EXTCONN_STRONG = 1
|
|---|
| 137 | EXTCONN_WEAK = 2
|
|---|
| 138 | EXTCONN_CALLABLE = 4
|
|---|
| 139 | End Enum
|
|---|
| 140 |
|
|---|
| 141 | Dim IID_IExternalConnection = [&h00000019, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
|
|---|
| 142 |
|
|---|
| 143 | Interface IExternalConnection
|
|---|
| 144 | Inherits IUnknown
|
|---|
| 145 |
|
|---|
| 146 | Function AddConnection(
|
|---|
| 147 | /* [in] */ extconn As DWord,
|
|---|
| 148 | /* [in] */ reserved As DWord) As DWord
|
|---|
| 149 | Function ReleaseConnection(
|
|---|
| 150 | /* [in] */ extconn As DWord,
|
|---|
| 151 | /* [in] */ reserved As DWord,
|
|---|
| 152 | /* [in] */ fLastReleaseCloses As BOOL) As DWord
|
|---|
| 153 | End Interface
|
|---|
| 154 |
|
|---|
| 155 | Type MULTI_QI
|
|---|
| 156 | pIID As * /*Const*/ IID
|
|---|
| 157 | pItf As IUnknown
|
|---|
| 158 | hr As HRESULT
|
|---|
| 159 | End Type
|
|---|
| 160 |
|
|---|
| 161 | Dim IID_IMultiQI = [&h00000020, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
|
|---|
| 162 | Interface IMultiQI
|
|---|
| 163 | Inherits IUnknown
|
|---|
| 164 |
|
|---|
| 165 | Function QueryMultipleInterfaces(
|
|---|
| 166 | /* [in] */ cMQIs As DWord,
|
|---|
| 167 | /* [out][in] */ pMQIs As *MULTI_QI) As HRESULT
|
|---|
| 168 | End Interface
|
|---|
| 169 |
|
|---|
| 170 | /* interface AsyncIMultiQI */
|
|---|
| 171 | /* [uuid][local][object] */
|
|---|
| 172 |
|
|---|
| 173 |
|
|---|
| 174 | Dim IID_AsyncIMultiQI = [&h000e0020, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
|
|---|
| 175 | Interface AsyncIMultiQI
|
|---|
| 176 | Inherits IUnknown
|
|---|
| 177 |
|
|---|
| 178 | Function Begin_QueryMultipleInterfaces(
|
|---|
| 179 | /* [in] */ cMQIs As DWord,
|
|---|
| 180 | /* [out][in] */ pMQIs As *MULTI_QI) As HRESULT
|
|---|
| 181 | Function Finish_QueryMultipleInterfaces(
|
|---|
| 182 | /* [out][in] */ pMQIs As *MULTI_QI) As HRESULT
|
|---|
| 183 | End Interface
|
|---|
| 184 |
|
|---|
| 185 | /* interface IInternalUnknown */
|
|---|
| 186 | /* [uuid][local][object] */
|
|---|
| 187 | Dim IID_IInternalUnknown = [&h00000021, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
|
|---|
| 188 | Interface IInternalUnknown
|
|---|
| 189 | Inherits IUnknown
|
|---|
| 190 |
|
|---|
| 191 | Function QueryInternalInterface(
|
|---|
| 192 | /* [in] */ ByRef riid As IID,
|
|---|
| 193 | /* [out] */ ByRef ppv As Any) As HRESULT
|
|---|
| 194 | End Interface
|
|---|
| 195 |
|
|---|
| 196 | /* interface IEnumUnknown */
|
|---|
| 197 | /* [unique][uuid][object] */
|
|---|
| 198 |
|
|---|
| 199 | Dim IID_IEnumUnknown = [&h00000100, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
|
|---|
| 200 | Interface IEnumUnknown
|
|---|
| 201 | Inherits IUnknown
|
|---|
| 202 |
|
|---|
| 203 | /* [local] */ Function Next(
|
|---|
| 204 | /* [in] */ celt As DWord,
|
|---|
| 205 | /* [out] */ rgelt As *IUnknown,
|
|---|
| 206 | /* [out] */ ByRef celtFetched As DWord) As HRESULT
|
|---|
| 207 | Function Skip(
|
|---|
| 208 | /* [in] */ celt As DWord) As HRESULT
|
|---|
| 209 | Function Reset() As HRESULT
|
|---|
| 210 | Function Clone(
|
|---|
| 211 | /* [out] */ ByRef enumUnk As IEnumUnknown) As HRESULT
|
|---|
| 212 | End Interface
|
|---|
| 213 |
|
|---|
| 214 | /* interface IBindCtx */
|
|---|
| 215 | /* [unique][uuid][object] */
|
|---|
| 216 |
|
|---|
| 217 | Type BIND_OPTS
|
|---|
| 218 | cbStruct As DWord
|
|---|
| 219 | grfFlags As DWord
|
|---|
| 220 | grfMode As DWord
|
|---|
| 221 | dwTickCountDeadline As DWord
|
|---|
| 222 | End Type
|
|---|
| 223 |
|
|---|
| 224 | Type BIND_OPTS2
|
|---|
| 225 | ' Inherits BIND_OPTS
|
|---|
| 226 | cbStruct As DWord
|
|---|
| 227 | grfFlags As DWord
|
|---|
| 228 | grfMode As DWord
|
|---|
| 229 | dwTickCountDeadline As DWord
|
|---|
| 230 |
|
|---|
| 231 | dwTrackFlags As DWord
|
|---|
| 232 | dwClassContext As DWord
|
|---|
| 233 | locale As LCID
|
|---|
| 234 | pServerInfo As *COSERVERINFO
|
|---|
| 235 | End Type
|
|---|
| 236 |
|
|---|
| 237 | Type BIND_OPTS3
|
|---|
| 238 | ' Inherits BIND_OPTS
|
|---|
| 239 | cbStruct As DWord
|
|---|
| 240 | grfFlags As DWord
|
|---|
| 241 | grfMode As DWord
|
|---|
| 242 | dwTickCountDeadline As DWord
|
|---|
| 243 |
|
|---|
| 244 | dwTrackFlags As DWord
|
|---|
| 245 | dwClassContext As DWord
|
|---|
| 246 | locale As LCID
|
|---|
| 247 | pServerInfo As *COSERVERINFO
|
|---|
| 248 |
|
|---|
| 249 | hwnd As HWND
|
|---|
| 250 | End Type
|
|---|
| 251 |
|
|---|
| 252 | Const Enum BIND_FLAGS
|
|---|
| 253 | BIND_MAYBOTHERUSER
|
|---|
| 254 | BIND_JUSTTESTEXISTENCE
|
|---|
| 255 | End Enum
|
|---|
| 256 |
|
|---|
| 257 | Dim IID_IBindCtx = [&h0000000E, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
|
|---|
| 258 | Interface IBindCtx
|
|---|
| 259 | Inherits IUnknown
|
|---|
| 260 |
|
|---|
| 261 | Function RegisterObjectBound(
|
|---|
| 262 | /* [unique][in] */ punk As IUnknown) As HRESULT
|
|---|
| 263 | Function RevokeObjectBound(
|
|---|
| 264 | /* [unique][in] */ punk As IUnknown) As HRESULT
|
|---|
| 265 | Function ReleaseBoundObjects() As HRESULT
|
|---|
| 266 | /* [local] */ Function SetBindOptions(
|
|---|
| 267 | /* [in] */ ByRef bindopts As BIND_OPTS) As HRESULT
|
|---|
| 268 | /* [local] */ Function GetBindOptions(
|
|---|
| 269 | /* [out][in] */ ByRef bindopts As BIND_OPTS) As HRESULT
|
|---|
| 270 | Function GetRunningObjectTable(
|
|---|
| 271 | /* [out] */ ByRef rot As IRunningObjectTable) As HRESULT
|
|---|
| 272 | Function RegisterObjectParam(
|
|---|
| 273 | /* [in] */ pszKey As LPOLESTR,
|
|---|
| 274 | /* [unique][in] */ unk As IUnknown) As HRESULT
|
|---|
| 275 | Function GetObjectParam(
|
|---|
| 276 | /* [in] */ pszKey As LPOLESTR,
|
|---|
| 277 | /* [out] */ ByRef unk As IUnknown) As HRESULT
|
|---|
| 278 | Function EnumObjectParam(
|
|---|
| 279 | /* [out] */ ByRef enumstr As IEnumString) As HRESULT
|
|---|
| 280 | Function RevokeObjectParam(
|
|---|
| 281 | /* [in] */ pszKey As LPOLESTR) As HRESULT
|
|---|
| 282 | End Interface
|
|---|
| 283 |
|
|---|
| 284 | /* interface IEnumMoniker */
|
|---|
| 285 | /* [unique][uuid][object] */
|
|---|
| 286 |
|
|---|
| 287 | Dim IID_IEnumMoniker = [&h00000102, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
|
|---|
| 288 | Interface IEnumMoniker
|
|---|
| 289 | Inherits IUnknown
|
|---|
| 290 | /* [local] */ Function Next_(
|
|---|
| 291 | /* [in] */ celt As DWord,
|
|---|
| 292 | /* [length_is][size_is][out] */ rgelt As *IMoniker,
|
|---|
| 293 | /* [out] */ ByRef celtFetched As DWord) As HRESULT
|
|---|
| 294 | Function Skip(
|
|---|
| 295 | /* [in] */ celt As DWord) As HRESULT
|
|---|
| 296 | Function Reset() As HRESULT
|
|---|
| 297 | Function Clone(
|
|---|
| 298 | /* [out] */ enumMon As IEnumMoniker) As HRESULT
|
|---|
| 299 | End Interface
|
|---|
| 300 |
|
|---|
| 301 | /* interface IRunningObjectTable */
|
|---|
| 302 | /* [uuid][object] */
|
|---|
| 303 |
|
|---|
| 304 | Dim IID_IRunningObjectTable = [&h00000010, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
|
|---|
| 305 | Interface IRunningObjectTable
|
|---|
| 306 | Inherits IUnknown
|
|---|
| 307 |
|
|---|
| 308 | Function Register(
|
|---|
| 309 | /* [in] */ grfFlags As DWord,
|
|---|
| 310 | /* [unique][in] */ unkObject As IUnknown,
|
|---|
| 311 | /* [unique][in] */ mkObjectName As IMoniker,
|
|---|
| 312 | /* [out] */ ByRef dwRegister As DWord) As HRESULT
|
|---|
| 313 | Function Revoke(
|
|---|
| 314 | /* [in] */ dwRegister As DWord) As HRESULT
|
|---|
| 315 | Function IsRunning(
|
|---|
| 316 | /* [unique][in] */ mkObjectName As IMoniker) As HRESULT
|
|---|
| 317 | Function GetObject(
|
|---|
| 318 | /* [unique][in] */ mkObjectName As IMoniker,
|
|---|
| 319 | /* [out] */ ByRef unkObject As IUnknown) As HRESULT
|
|---|
| 320 | Function NoteChangeTime(
|
|---|
| 321 | /* [in] */ dwRegister As DWord,
|
|---|
| 322 | /* [in] */ ByRef filetime As FILETIME) As HRESULT
|
|---|
| 323 | Function GetTimeOfLastChange(
|
|---|
| 324 | /* [unique][in] */ mkObjectName As IMoniker,
|
|---|
| 325 | /* [in] */ ByRef filetime As FILETIME) As HRESULT
|
|---|
| 326 | Function EnumRunning(
|
|---|
| 327 | /* [out] */ ByRef enumMoniker As IEnumMoniker) As HRESULT
|
|---|
| 328 | End Interface
|
|---|
| 329 |
|
|---|
| 330 | Dim IID_IPersist = [&h0000010c, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
|
|---|
| 331 | Interface IPersist
|
|---|
| 332 | Inherits IUnknown
|
|---|
| 333 |
|
|---|
| 334 | Function GetClassID(
|
|---|
| 335 | /* [out] */ ByRef ClassID As CLSID) As HRESULT
|
|---|
| 336 | End Interface
|
|---|
| 337 |
|
|---|
| 338 | Dim IID_IPersistStream = [&h00000109, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
|
|---|
| 339 | Interface IPersistStream
|
|---|
| 340 | Inherits IPersist
|
|---|
| 341 |
|
|---|
| 342 | Function IsDirty() As HRESULT
|
|---|
| 343 |
|
|---|
| 344 | Function Load(
|
|---|
| 345 | /* [unique][in] */ Stm As IStream) As HRESULT
|
|---|
| 346 | Function Save(
|
|---|
| 347 | /* [unique][in] */ Stm As IStream,
|
|---|
| 348 | /* [in] */ fClearDirty As BOOL) As HRESULT
|
|---|
| 349 | Function GetSizeMax(
|
|---|
| 350 | /* [out] */ ByRef cbSize As ULARGE_INTEGER) As HRESULT
|
|---|
| 351 | End Interface
|
|---|
| 352 |
|
|---|
| 353 | /* interface IMoniker */
|
|---|
| 354 | /* [unique][uuid][object] */
|
|---|
| 355 |
|
|---|
| 356 | Const Enum MKSYS
|
|---|
| 357 | MKSYS_NONE = 0
|
|---|
| 358 | MKSYS_GENERICCOMPOSITE = 1
|
|---|
| 359 | MKSYS_FILEMONIKER = 2
|
|---|
| 360 | MKSYS_ANTIMONIKER = 3
|
|---|
| 361 | MKSYS_ITEMMONIKER = 4
|
|---|
| 362 | MKSYS_POINTERMONIKER = 5
|
|---|
| 363 | MKSYS_CLASSMONIKER = 7
|
|---|
| 364 | MKSYS_OBJREFMONIKER = 8
|
|---|
| 365 | MKSYS_SESSIONMONIKER = 9
|
|---|
| 366 | MKSYS_LUAMONIKER = 10
|
|---|
| 367 | End Enum
|
|---|
| 368 |
|
|---|
| 369 | /* [v1_enum] */ Const Enum MKREDUCE
|
|---|
| 370 | MKRREDUCE_ONE = (3 << 16)
|
|---|
| 371 | MKRREDUCE_TOUSER = (2 << 16)
|
|---|
| 372 | MKRREDUCE_THROUGHUSER = (1 << 16)
|
|---|
| 373 | MKRREDUCE_ALL = 0
|
|---|
| 374 | End Enum
|
|---|
| 375 |
|
|---|
| 376 | Dim IID_IMoniker = [&h0000000f, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
|
|---|
| 377 | Interface IMoniker
|
|---|
| 378 | Inherits IPersistStream
|
|---|
| 379 |
|
|---|
| 380 | /* [local] */ Function BindToObject(
|
|---|
| 381 | /* [unique][in] */ bc As IBindCtx,
|
|---|
| 382 | /* [unique][in] */ mkToLeft As IMoniker,
|
|---|
| 383 | /* [in] */ ByRef riidResult As IID,
|
|---|
| 384 | /* [iid_is][out] */ ByRef Result As Any) As HRESULT
|
|---|
| 385 | /* [local] */ Function BindToStorage(
|
|---|
| 386 | /* [unique][in] */ bc As IBindCtx,
|
|---|
| 387 | /* [unique][in] */ mkToLeft As IMoniker,
|
|---|
| 388 | /* [in] */ ByRef riid As IID,
|
|---|
| 389 | /* [iid_is][out] */ ByRef Obj As Any) As HRESULT
|
|---|
| 390 | Function Reduce(
|
|---|
| 391 | /* [unique][in] */ bc As IBindCtx,
|
|---|
| 392 | /* [in] */ dwReduceHowFar As DWord,
|
|---|
| 393 | /* [unique][out][in] */ ByRef mkToLeft As IMoniker,
|
|---|
| 394 | /* [out] */ ByRef mkReduced As IMoniker) As HRESULT
|
|---|
| 395 | Function ComposeWith(
|
|---|
| 396 | /* [unique][in] */ ByRef mkRight As IMoniker,
|
|---|
| 397 | /* [in] */ fOnlyIfNotGeneric As BOOL,
|
|---|
| 398 | /* [out] */ ByRef mkComposite As IMoniker) As HRESULT
|
|---|
| 399 | Function Enum_(
|
|---|
| 400 | /* [in] */ fForward As BOOL,
|
|---|
| 401 | /* [out] */ ByRef enumMoniker As IEnumMoniker) As HRESULT
|
|---|
| 402 | Function IsEqual(
|
|---|
| 403 | /* [unique][in] */ mkOtherMoniker As IMoniker) As HRESULT
|
|---|
| 404 | Function Hash(
|
|---|
| 405 | /* [out] */ ByRef dwHash As DWord) As HRESULT
|
|---|
| 406 | Function IsRunning(
|
|---|
| 407 | /* [unique][in] */ bc As IBindCtx,
|
|---|
| 408 | /* [unique][in] */ mkToLeft As IMoniker,
|
|---|
| 409 | /* [unique][in] */ mkNewlyRunning As IMoniker) As HRESULT
|
|---|
| 410 | Function GetTimeOfLastChange(
|
|---|
| 411 | /* [unique][in] */ bc As IBindCtx,
|
|---|
| 412 | /* [unique][in] */ mkToLeft As IMoniker,
|
|---|
| 413 | /* [out] */ ByRef FileTime As FILETIME) As HRESULT
|
|---|
| 414 | Function Inverse(
|
|---|
| 415 | /* [out] */ ByRef mk As IMoniker) As HRESULT
|
|---|
| 416 | Function CommonPrefixWith(
|
|---|
| 417 | /* [unique][in] */ mkOther As IMoniker,
|
|---|
| 418 | /* [out] */ ByRef mkPrefix As IMoniker) As HRESULT
|
|---|
| 419 | Function RelativePathTo(
|
|---|
| 420 | /* [unique][in] */ mkOther As IMoniker,
|
|---|
| 421 | /* [out] */ ByRef mkRelPath As IMoniker) As HRESULT
|
|---|
| 422 | Function GetDisplayName(
|
|---|
| 423 | /* [unique][in] */ bc As IBindCtx,
|
|---|
| 424 | /* [unique][in] */ mkToLeft As IMoniker,
|
|---|
| 425 | /* [out] */ ByRef pszDisplayName As LPOLESTR) As HRESULT
|
|---|
| 426 | Function ParseDisplayName(
|
|---|
| 427 | /* [unique][in] */ bc As IBindCtx,
|
|---|
| 428 | /* [unique][in] */ mkToLeft As IMoniker,
|
|---|
| 429 | /* [in] */ pszDisplayName As LPOLESTR,
|
|---|
| 430 | /* [out] */ ByRef chEaten As DWord,
|
|---|
| 431 | /* [out] */ ByRef mkOut As IMoniker) As HRESULT
|
|---|
| 432 | Function IsSystemMoniker(
|
|---|
| 433 | /* [out] */ ByRef dwMksys As DWord) As HRESULT
|
|---|
| 434 | End Interface
|
|---|
| 435 |
|
|---|
| 436 | /* interface IEnumString */
|
|---|
| 437 | /* [unique][uuid][object] */
|
|---|
| 438 |
|
|---|
| 439 | Dim IID_IEnumString = [&h00000101, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
|
|---|
| 440 | Interface IEnumString
|
|---|
| 441 | Inherits IUnknown
|
|---|
| 442 |
|
|---|
| 443 | /* [local] */ Function Next_(
|
|---|
| 444 | /* [in] */ celt As DWord,
|
|---|
| 445 | /* [length_is][size_is][out] */ ByRef rgelt As LPOLESTR,
|
|---|
| 446 | /* [out] */ ByRef celtFetched As DWord) As HRESULT
|
|---|
| 447 | Function Skip(
|
|---|
| 448 | /* [in] */ celt As DWord) As HRESULT
|
|---|
| 449 | Function Reset() As HRESULT
|
|---|
| 450 | Function Clone(
|
|---|
| 451 | /* [out] */ ByRef enumstr As IEnumString) As HRESULT
|
|---|
| 452 | End Interface
|
|---|
| 453 |
|
|---|
| 454 | /* interface ISequentialStream */
|
|---|
| 455 | /* [unique][uuid][object] */
|
|---|
| 456 |
|
|---|
| 457 | Dim IID_ISequentialStream = [&h0c733a30, &h2a1c, &h11ce, [&had, &he5, &h00, &haa, &h00, &h44, &h77, &h3d]] As IID
|
|---|
| 458 | Interface ISequentialStream
|
|---|
| 459 | Inherits IUnknown
|
|---|
| 460 |
|
|---|
| 461 | Function Read(
|
|---|
| 462 | /* [length_is][size_is][out] */ pv As VoidPtr,
|
|---|
| 463 | /* [in] */ cb As DWord,
|
|---|
| 464 | /* [out] */ ByRef cbRead As DWord) As HRESULT
|
|---|
| 465 | Function Write(
|
|---|
| 466 | /* [size_is][in] */ pv As VoidPtr,
|
|---|
| 467 | /* [in] */ cb As DWord,
|
|---|
| 468 | /* [out] */ ByRef cbWritten As DWord) As HRESULT
|
|---|
| 469 | End Interface
|
|---|
| 470 |
|
|---|
| 471 | /* interface IStream */
|
|---|
| 472 | /* [unique][uuid][object] */
|
|---|
| 473 |
|
|---|
| 474 | Type STATSTG
|
|---|
| 475 | pwcsName As LPOLESTR
|
|---|
| 476 | type_ As DWord
|
|---|
| 477 | cbSize As ULARGE_INTEGER
|
|---|
| 478 | mtime As FILETIME
|
|---|
| 479 | ctime As FILETIME
|
|---|
| 480 | atime As FILETIME
|
|---|
| 481 | grfMode As DWord
|
|---|
| 482 | grfLocksSupported As DWord
|
|---|
| 483 | clsid As CLSID
|
|---|
| 484 | grfStateBits As DWord
|
|---|
| 485 | reserved As DWord
|
|---|
| 486 | End Type
|
|---|
| 487 |
|
|---|
| 488 | Enum STGTY
|
|---|
| 489 | STGTY_STORAGE = 1
|
|---|
| 490 | STGTY_STREAM = 2
|
|---|
| 491 | STGTY_LOCKBYTES = 3
|
|---|
| 492 | STGTY_PROPERTY = 4
|
|---|
| 493 | End Enum
|
|---|
| 494 |
|
|---|
| 495 | Enum STREAM_SEEK
|
|---|
| 496 | STREAM_SEEK_SET = 0
|
|---|
| 497 | STREAM_SEEK_CUR = 1
|
|---|
| 498 | STREAM_SEEK_END = 2
|
|---|
| 499 | End Enum
|
|---|
| 500 |
|
|---|
| 501 | Enum LOCKTYPE
|
|---|
| 502 | LOCK_WRITE = 1
|
|---|
| 503 | LOCK_EXCLUSIVE = 2
|
|---|
| 504 | LOCK_ONLYONCE = 4
|
|---|
| 505 | End Enum
|
|---|
| 506 |
|
|---|
| 507 | Dim IID_IStream = [&h0000000c, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
|
|---|
| 508 | Interface IStream
|
|---|
| 509 | Inherits ISequentialStream
|
|---|
| 510 |
|
|---|
| 511 | /* [local] */ Function Seek(
|
|---|
| 512 | /* [in] */ dlibMove As LARGE_INTEGER,
|
|---|
| 513 | /* [in] */ dwOrigin As DWord,
|
|---|
| 514 | /* [out] */ plibNewPosition As *ULARGE_INTEGER) As HRESULT
|
|---|
| 515 | Function SetSize(
|
|---|
| 516 | /* [in] */ libNewSize As ULARGE_INTEGER) As HRESULT
|
|---|
| 517 | /* [local] */ Function CopyTo(
|
|---|
| 518 | /* [unique][in] */ stm As IStream,
|
|---|
| 519 | /* [in] */ cb As ULARGE_INTEGER,
|
|---|
| 520 | /* [out] */ pcbRead As *ULARGE_INTEGER,
|
|---|
| 521 | /* [out] */ pcbWritten As *ULARGE_INTEGER) As HRESULT
|
|---|
| 522 | Function Commit(
|
|---|
| 523 | /* [in] */ grfCommitFlags As DWord) As HRESULT
|
|---|
| 524 | Function Revert() As HRESULT
|
|---|
| 525 | Function LockRegion(
|
|---|
| 526 | /* [in] */ libOffset As ULARGE_INTEGER,
|
|---|
| 527 | /* [in] */ cb As ULARGE_INTEGER,
|
|---|
| 528 | /* [in] */ dwLockType As DWord) As HRESULT
|
|---|
| 529 | Function UnlockRegion(
|
|---|
| 530 | /* [in] */ libOffset As ULARGE_INTEGER,
|
|---|
| 531 | /* [in] */ cb As ULARGE_INTEGER,
|
|---|
| 532 | /* [in] */ dwLockType As DWord) As HRESULT
|
|---|
| 533 | Function Stat(
|
|---|
| 534 | /* [out] */ pstatstg As *STATSTG,
|
|---|
| 535 | /* [in] */ grfStatFlag As DWord) As HRESULT
|
|---|
| 536 | Function Clone(
|
|---|
| 537 | /* [out] */ ByRef stm As IStream) As HRESULT
|
|---|
| 538 | End Interface
|
|---|
| 539 |
|
|---|
| 540 | /* interface IEnumSTATSTG */
|
|---|
| 541 | /* [unique][uuid][object] */
|
|---|
| 542 |
|
|---|
| 543 | Dim IID_IEnumSTATSTG = [&h0000000d, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
|
|---|
| 544 | Interface IEnumSTATSTG
|
|---|
| 545 | Inherits IUnknown
|
|---|
| 546 |
|
|---|
| 547 | /* [local] */ Function Next_(
|
|---|
| 548 | /* [in] */ celt As DWord,
|
|---|
| 549 | /* [length_is][size_is][out] */ rgelt As *STATSTG,
|
|---|
| 550 | /* [out] */ ByRef celtFetched As DWord) As HRESULT
|
|---|
| 551 | Function Skip(
|
|---|
| 552 | /* [in] */ celt As DWord) As HRESULT
|
|---|
| 553 | Function Reset() As HRESULT
|
|---|
| 554 | Function Clone(
|
|---|
| 555 | /* [out] */ ByRef enumStat As IEnumSTATSTG) As HRESULT
|
|---|
| 556 | End Interface
|
|---|
| 557 |
|
|---|
| 558 | /* interface IStorage */
|
|---|
| 559 | /* [unique][uuid][object] */
|
|---|
| 560 |
|
|---|
| 561 | Type RemSNB
|
|---|
| 562 | ulCntStr As DWord
|
|---|
| 563 | ulCntChar As DWord
|
|---|
| 564 | rgString[ELM(1)] As OLECHAR
|
|---|
| 565 | End Type
|
|---|
| 566 |
|
|---|
| 567 | TypeDef wireSNB /* [unique] */ = *RemSNB
|
|---|
| 568 |
|
|---|
| 569 | TypeDef SNB = /* [wire_marshal] */ **OLECHAR
|
|---|
| 570 |
|
|---|
| 571 | Dim IID_IStorage = [&h0000000b, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
|
|---|
| 572 | Interface IStorage
|
|---|
| 573 | Inherits IUnknown
|
|---|
| 574 |
|
|---|
| 575 | Function CreateStream(
|
|---|
| 576 | /* [string][in] */ pwcsName As *OLECHAR,
|
|---|
| 577 | /* [in] */ grfMode As DWord,
|
|---|
| 578 | /* [in] */ reserved1 As DWord,
|
|---|
| 579 | /* [in] */ reserved2 As DWord,
|
|---|
| 580 | /* [out] */ ByRef stm As IStream) As HRESULT
|
|---|
| 581 | /* [local] */ Function OpenStream(
|
|---|
| 582 | /* [string][in] */ pwcsName As *OLECHAR,
|
|---|
| 583 | /* [unique][in] */ reserved1 As VoidPtr,
|
|---|
| 584 | /* [in] */ grfMode As DWord,
|
|---|
| 585 | /* [in] */ reserved2 As DWord,
|
|---|
| 586 | /* [out] */ ByRef stm As IStream) As HRESULT
|
|---|
| 587 | Function CreateStorage(
|
|---|
| 588 | /* [string][in] */ pwcsName As *OLECHAR,
|
|---|
| 589 | /* [in] */ grfMode As DWord,
|
|---|
| 590 | /* [in] */ reserved1 As DWord,
|
|---|
| 591 | /* [in] */ reserved2 As DWord,
|
|---|
| 592 | /* [out] */ ByRef stg As IStorage) As HRESULT
|
|---|
| 593 | Function OpenStorage(
|
|---|
| 594 | /* [string][unique][in] */ pwcsName As *OLECHAR,
|
|---|
| 595 | /* [unique][in] */ pstgPriority As IStorage,
|
|---|
| 596 | /* [in] */ grfMode As DWord,
|
|---|
| 597 | /* [unique][in] */ snbExclude As SNB,
|
|---|
| 598 | /* [in] */ reserved As DWord,
|
|---|
| 599 | /* [out] */ ByRef stg As IStorage) As HRESULT
|
|---|
| 600 | /* [local] */ Function CopyTo(
|
|---|
| 601 | /* [in] */ ciidExclude As DWord,
|
|---|
| 602 | /* [size_is][unique][in] */ rgiidExclude As * /*Const*/ IID,
|
|---|
| 603 | /* [unique][in] */ snbExclude As SNB,
|
|---|
| 604 | /* [unique][in] */ stgDest As IStorage) As HRESULT
|
|---|
| 605 | Function MoveElementTo(
|
|---|
| 606 | /* [string][in] */ pwcsName As *OLECHAR,
|
|---|
| 607 | /* [unique][in] */ stgDest As IStorage,
|
|---|
| 608 | /* [string][in] */ pwcsNewName As *OLECHAR,
|
|---|
| 609 | /* [in] */ grfFlags As DWord) As HRESULT
|
|---|
| 610 | Function Commit(
|
|---|
| 611 | /* [in] */ grfCommitFlags As DWord) As HRESULT
|
|---|
| 612 | Function Revert() As HRESULT
|
|---|
| 613 | /* [local] */ Function EnumElements(
|
|---|
| 614 | /* [in] */ reserved1 As DWord,
|
|---|
| 615 | /* [size_is][unique][in] */ reserved2 As VoidPtr,
|
|---|
| 616 | /* [in] */ reserved3 As DWord,
|
|---|
| 617 | /* [out] */ ByRef enum_ As IEnumSTATSTG) As HRESULT
|
|---|
| 618 | Function DestroyElement(
|
|---|
| 619 | /* [string][in] */ pwcsName As *OLECHAR) As HRESULT
|
|---|
| 620 | Function RenameElement(
|
|---|
| 621 | /* [string][in] */ pwcsOldName As *OLECHAR,
|
|---|
| 622 | /* [string][in] */ pwcsNewName As *OLECHAR) As HRESULT
|
|---|
| 623 | Function SetElementTimes(
|
|---|
| 624 | /* [string][unique][in] */ pwcsName As *OLECHAR,
|
|---|
| 625 | /* [unique][in] */ ByRef ctime As /*Const*/ FILETIME,
|
|---|
| 626 | /* [unique][in] */ ByRef atime As /*Const*/ FILETIME,
|
|---|
| 627 | /* [unique][in] */ ByRef mtime As /*Const*/ FILETIME) As HRESULT
|
|---|
| 628 | Function SetClass(
|
|---|
| 629 | /* [in] */ ByRef clsid As CLSID) As HRESULT
|
|---|
| 630 | Function SetStateBits(
|
|---|
| 631 | /* [in] */ grfStateBits As DWord,
|
|---|
| 632 | /* [in] */ grfMask As DWord) As HRESULT
|
|---|
| 633 | Function Stat(
|
|---|
| 634 | /* [out] */ ByRef statstg As STATSTG,
|
|---|
| 635 | /* [in] */ grfStatFlag As DWord) As HRESULT
|
|---|
| 636 | End Interface
|
|---|
| 637 |
|
|---|
| 638 | /* interface IPersistFile */
|
|---|
| 639 | /* [unique][uuid][object] */
|
|---|
| 640 |
|
|---|
| 641 | Dim IID_IPersistFile = [&h0000010b, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
|
|---|
| 642 | Interface IPersistFile
|
|---|
| 643 | Inherits IPersist
|
|---|
| 644 |
|
|---|
| 645 | Function IsDirty() As HRESULT
|
|---|
| 646 | Function Load(
|
|---|
| 647 | /* [in] */ pszFileName As LPCOLESTR,
|
|---|
| 648 | /* [in] */ dwMode As DWord) As HRESULT
|
|---|
| 649 | Function Save(
|
|---|
| 650 | /* [unique][in] */ pszFileName As LPCOLESTR,
|
|---|
| 651 | /* [in] */ fRemember As BOOL) As HRESULT
|
|---|
| 652 | Function SaveCompleted(
|
|---|
| 653 | /* [unique][in] */ pszFileName As LPCOLESTR) As HRESULT
|
|---|
| 654 | Function GetCurFile(
|
|---|
| 655 | /* [out] */ ByRef pszFileName As LPOLESTR) As HRESULT
|
|---|
| 656 | End Interface
|
|---|
| 657 |
|
|---|
| 658 | /* interface IPersistStorage */
|
|---|
| 659 | /* [unique][uuid][object] */
|
|---|
| 660 |
|
|---|
| 661 | Dim IID_IPersistStorage = [&h0000010a, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
|
|---|
| 662 | Interface IPersistStorage
|
|---|
| 663 | Inherits IPersist
|
|---|
| 664 |
|
|---|
| 665 | Function IsDirty() As HRESULT
|
|---|
| 666 | Function InitNew(
|
|---|
| 667 | /* [unique][in] */ Stg As IStorage) As HRESULT
|
|---|
| 668 | Function Load(
|
|---|
| 669 | /* [unique][in] */ Stg As IStorage) As HRESULT
|
|---|
| 670 | Function Save(
|
|---|
| 671 | /* [unique][in] */ StgSave As IStorage,
|
|---|
| 672 | /* [in] */ fSameAsLoad As BOOL) As HRESULT
|
|---|
| 673 | Function SaveCompleted(
|
|---|
| 674 | /* [unique][in] */ StgNew As IStorage) As HRESULT
|
|---|
| 675 | Function HandsOffStorage() As HRESULT
|
|---|
| 676 | End Interface
|
|---|
| 677 |
|
|---|
| 678 | /* interface ILockBytes */
|
|---|
| 679 | /* [unique][uuid][object] */
|
|---|
| 680 |
|
|---|
| 681 | Dim IID_ILockBytes = [&h0000000a, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
|
|---|
| 682 | Interface ILockBytes
|
|---|
| 683 | Inherits IUnknown
|
|---|
| 684 |
|
|---|
| 685 | /* [local] */ Function ReadAt(
|
|---|
| 686 | /* [in] */ ulOffset As ULARGE_INTEGER,
|
|---|
| 687 | /* [length_is][size_is][out] */ pv As VoidPtr,
|
|---|
| 688 | /* [in] */ cb As DWord,
|
|---|
| 689 | /* [out] */ ByRef cbRead As DWord) As HRESULT
|
|---|
| 690 | /* [local] */ Function WriteAt(
|
|---|
| 691 | /* [in] */ ulOffset As ULARGE_INTEGER,
|
|---|
| 692 | /* [size_is][in] */ pv As VoidPtr,
|
|---|
| 693 | /* [in] */ cb As DWord,
|
|---|
| 694 | /* [out] */ ByRef cbWritten As DWord) As HRESULT
|
|---|
| 695 | Function Flush() As HRESULT
|
|---|
| 696 | Function SetSize(
|
|---|
| 697 | /* [in] */ cb As ULARGE_INTEGER) As HRESULT
|
|---|
| 698 | Function LockRegion(
|
|---|
| 699 | /* [in] */ libOffset As ULARGE_INTEGER,
|
|---|
| 700 | /* [in] */ cb As ULARGE_INTEGER,
|
|---|
| 701 | /* [in] */ dwLockType As DWord) As HRESULT
|
|---|
| 702 | Function UnlockRegion(
|
|---|
| 703 | /* [in] */ libOffset As ULARGE_INTEGER,
|
|---|
| 704 | /* [in] */ cb As ULARGE_INTEGER,
|
|---|
| 705 | /* [in] */ dwLockType As DWord) As HRESULT
|
|---|
| 706 | Function Stat(
|
|---|
| 707 | /* [out] */ ByRef statstg As STATSTG,
|
|---|
| 708 | /* [in] */ grfStatFlag As DWord) As HRESULT
|
|---|
| 709 | End Interface
|
|---|
| 710 |
|
|---|
| 711 | Type DVTARGETDEVICE
|
|---|
| 712 | tdSize As DWord
|
|---|
| 713 | tdDriverNameOffset As Word
|
|---|
| 714 | tdDeviceNameOffset As Word
|
|---|
| 715 | tdPortNameOffset As Word
|
|---|
| 716 | tdExtDevmodeOffset As Word
|
|---|
| 717 | tdData[ELM(1)] As Byte
|
|---|
| 718 | End Type
|
|---|
| 719 |
|
|---|
| 720 | TypeDef LPCLIPFORMAT = *CLIPFORMAT
|
|---|
| 721 |
|
|---|
| 722 | Type FORMATETC
|
|---|
| 723 | cfFormat As CLIPFORMAT
|
|---|
| 724 | ptd As *DVTARGETDEVICE
|
|---|
| 725 | dwAspect As DWord
|
|---|
| 726 | lindex As Long
|
|---|
| 727 | tymed As DWord
|
|---|
| 728 | End Type
|
|---|
| 729 |
|
|---|
| 730 | TypeDef LPFORMATETC = *FORMATETC
|
|---|
| 731 |
|
|---|
| 732 | Interface IEnumFORMATETC
|
|---|
| 733 | Inherits IUnknown
|
|---|
| 734 | End Interface
|
|---|
| 735 |
|
|---|
| 736 | Interface IEnumSTATDATA
|
|---|
| 737 | Inherits IUnknown
|
|---|
| 738 | End Interface
|
|---|
| 739 |
|
|---|
| 740 | /* interface IRootStorage */
|
|---|
| 741 | /* [unique][uuid][object] */
|
|---|
| 742 |
|
|---|
| 743 | Dim IID_IRootStorage = [&h00000012, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
|
|---|
| 744 | Interface IRootStorage
|
|---|
| 745 | Inherits IUnknown
|
|---|
| 746 |
|
|---|
| 747 | Function SwitchToFile(
|
|---|
| 748 | /* [in] */ pszFile As LPOLESTR) As HRESULT
|
|---|
| 749 | End Interface
|
|---|
| 750 |
|
|---|
| 751 | /* interface IAdviseSink */
|
|---|
| 752 | /* [unique][async_uuid][uuid][object] */
|
|---|
| 753 |
|
|---|
| 754 | Enum /*[transmit_as(long)]*/ TYMED
|
|---|
| 755 | TYMED_HGLOBAL = 1
|
|---|
| 756 | TYMED_FILE = 2
|
|---|
| 757 | TYMED_ISTREAM = 4
|
|---|
| 758 | TYMED_ISTORAGE = 8
|
|---|
| 759 | TYMED_GDI = 16
|
|---|
| 760 | TYMED_MFPICT = 32
|
|---|
| 761 | TYMED_ENHMF = 64
|
|---|
| 762 | TYMED_NULL = 0
|
|---|
| 763 | End Enum
|
|---|
| 764 |
|
|---|
| 765 | Type RemSTGMEDIUM
|
|---|
| 766 | tymed As DWord
|
|---|
| 767 | dwHandleType As DWord
|
|---|
| 768 | pData As DWord
|
|---|
| 769 | pUnkForRelease As DWord
|
|---|
| 770 | cbData As DWord
|
|---|
| 771 | data[ELM(1)] As Byte
|
|---|
| 772 | End Type
|
|---|
| 773 |
|
|---|
| 774 | /* [wire_marshal] */ Type STGMEDIUM
|
|---|
| 775 | tymed As DWord
|
|---|
| 776 | data As VoidPtr
|
|---|
| 777 | ' /* [switch_type(DWORD), switch_is((DWORD) tymed)] */
|
|---|
| 778 | ' Union
|
|---|
| 779 | ' /*[case(TYMED_GDI)]*/ hBitmap As HBITMAP
|
|---|
| 780 | ' /*[case(TYMED_MFPICT)]*/ hMetaFilePict As HMETAFILEPICT
|
|---|
| 781 | ' /*[case(TYMED_ENHMF)]*/ hEnhMetaFile As HENHMETAFILE
|
|---|
| 782 | ' /*[case(TYMED_HGLOBAL)]*/ hGlobal As HGLOBAL
|
|---|
| 783 | ' /*[case(TYMED_FILE)]*/ lpszFileName As LPWSTR
|
|---|
| 784 | ' /*[case(TYMED_ISTREAM)]*/ pstm As *IStream
|
|---|
| 785 | ' /*[case(TYMED_ISTORAGE)]*/ pstg As *IStorage
|
|---|
| 786 | ' /*[default]*/
|
|---|
| 787 | ' End Union
|
|---|
| 788 | /*[unique]*/ pUnkForRelease As *IUnknown
|
|---|
| 789 | End Type
|
|---|
| 790 |
|
|---|
| 791 | Type GDI_OBJECT
|
|---|
| 792 | ' ObjectType As DWord
|
|---|
| 793 | ' /* [switch_type] */ u As Union
|
|---|
| 794 | ' hBitmap As wireHBITMAP
|
|---|
| 795 | ' hPalette As wireHPALETTE
|
|---|
| 796 | ' hGeneric As wireHGLOBAL
|
|---|
| 797 | ' End Union
|
|---|
| 798 | End Type
|
|---|
| 799 |
|
|---|
| 800 | Type userSTGMEDIUM
|
|---|
| 801 | ' tymed As DWord
|
|---|
| 802 | ' /* [switch_type] */ u As Union
|
|---|
| 803 | ' /* Empty union arm */
|
|---|
| 804 | ' hMetaFilePict As wireHMETAFILEPICT
|
|---|
| 805 | ' hHEnhMetaFile As wireHENHMETAFILE
|
|---|
| 806 | ' hGdiHandle As *GDI_OBJECT
|
|---|
| 807 | ' hGlobal As wireHGLOBAL
|
|---|
| 808 | ' lpszFileName As LPOLESTR
|
|---|
| 809 | ' pstm As *BYTE_BLOB
|
|---|
| 810 | ' pstg As BYTE_BLOB
|
|---|
| 811 | ' End Union
|
|---|
| 812 | ' pUnkForRelease As IUnknown
|
|---|
| 813 | End Type
|
|---|
| 814 |
|
|---|
| 815 | TypeDef wireSTGMEDIUM = /* [unique] */ *userSTGMEDIUM
|
|---|
| 816 | TypeDef ASYNC_STGMEDIUM = /* [unique] */ *userSTGMEDIUM
|
|---|
| 817 | TypeDef wireSTGMEDIUM = /* [wire_marshal] */ STGMEDIUM
|
|---|
| 818 |
|
|---|
| 819 | Type userFLAG_STGMEDIUM
|
|---|
| 820 | ' ContextFlags As Long
|
|---|
| 821 | ' fPassOwnership As Long
|
|---|
| 822 | ' Stgmed As userSTGMEDIUM
|
|---|
| 823 | End Type
|
|---|
| 824 |
|
|---|
| 825 | TypeDef wireFLAG_STGMEDIUM = /* [unique] */ *userFLAG_STGMEDIUM
|
|---|
| 826 |
|
|---|
| 827 | Type /* [wire_marshal] */ FLAG_STGMEDIUM
|
|---|
| 828 | ContextFlags As Long
|
|---|
| 829 | fPassOwnership As Long
|
|---|
| 830 | Stgmed As STGMEDIUM
|
|---|
| 831 | End Type
|
|---|
| 832 |
|
|---|
| 833 | Dim IID_IAdviseSink = [&h0000010f, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
|
|---|
| 834 | Interface IAdviseSink
|
|---|
| 835 | Inherits IUnknown
|
|---|
| 836 |
|
|---|
| 837 | /* [local] */ Sub OnDataChange(
|
|---|
| 838 | /* [unique][in] */ ByRef Formatetc As FORMATETC,
|
|---|
| 839 | /* [unique][in] */ ByRef Stgmed As STGMEDIUM)
|
|---|
| 840 | /* [local] */ Sub OnViewChange(
|
|---|
| 841 | /* [in] */ dwAspect As DWord,
|
|---|
| 842 | /* [in] */ lindex As Long)
|
|---|
| 843 | /* [local] */ Sub OnRename(
|
|---|
| 844 | /* [in] */ mk As IMoniker)
|
|---|
| 845 | /* [local] */ Sub OnSave()
|
|---|
| 846 | /* [local] */ Sub OnClose()
|
|---|
| 847 | End Interface
|
|---|
| 848 |
|
|---|
| 849 | ' AsyncIAdviseSink
|
|---|
| 850 |
|
|---|
| 851 | ' IAdviseSink2
|
|---|
| 852 |
|
|---|
| 853 | ' AsyncIAdviseSink2
|
|---|
| 854 |
|
|---|
| 855 | Dim IID_IDataObject = [&h0000010e, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
|
|---|
| 856 | Interface IDataObject
|
|---|
| 857 | Inherits IUnknown
|
|---|
| 858 |
|
|---|
| 859 | Function /* [local] */ GetData(
|
|---|
| 860 | /* [unique][in] */ ByRef rformatetcIn As FORMATETC,
|
|---|
| 861 | /* [out] */ ByRef rmedium As STGMEDIUM) As HRESULT
|
|---|
| 862 | Function /* [local] */ GetDataHere(
|
|---|
| 863 | /* [unique][in] */ ByRef rformatetcIn As FORMATETC,
|
|---|
| 864 | /* [out] */ ByRef pmedium As STGMEDIUM) As HRESULT
|
|---|
| 865 | Function QueryGetData(
|
|---|
| 866 | /* [unique][in] */ ByRef pformatetc As FORMATETC) As HRESULT
|
|---|
| 867 | Function GetCanonicalFormatEtc(
|
|---|
| 868 | /* [unique][in] */ ByRef pformatetcIn As FORMATETC,
|
|---|
| 869 | /* [out] */ ByRef pmedium As STGMEDIUM) As HRESULT
|
|---|
| 870 | Function /* [local] */ SetData(
|
|---|
| 871 | /* [unique][in] */ pformatetcIn As *FORMATETC,
|
|---|
| 872 | /* [out] */ pmedium As *STGMEDIUM,
|
|---|
| 873 | /* [in] */ fRelease As BOOL) As HRESULT
|
|---|
| 874 | Function EnumFormatEtc(
|
|---|
| 875 | /* [in] */ dwDirection As DWord,
|
|---|
| 876 | /* [out] */ ByRef rpenumFormatEtc As IEnumFORMATETC) As HRESULT
|
|---|
| 877 | Function DAdvise(
|
|---|
| 878 | /* [in] */ ByRef pformatetc As FORMATETC,
|
|---|
| 879 | /* [in] */ advf As DWord,
|
|---|
| 880 | /* [unique][in] */ pAdvSink As IAdviseSink,
|
|---|
| 881 | /* [out] */ pdwConnection As *DWord) As HRESULT
|
|---|
| 882 | Function DUnadvise(
|
|---|
| 883 | /* [in] */ dwConnection As DWord) As HRESULT
|
|---|
| 884 | Function EnumDAdvise(
|
|---|
| 885 | /* [out] */ ByRef rpenumAdvise As IEnumSTATDATA) As HRESULT
|
|---|
| 886 | End Interface
|
|---|
| 887 |
|
|---|
| 888 | Interface IDataAdviseHolder
|
|---|
| 889 | Inherits IUnknown
|
|---|
| 890 | End Interface
|
|---|
| 891 |
|
|---|
| 892 | Enum CALLTYPE
|
|---|
| 893 | CALLTYPE_TOPLEVEL = 1
|
|---|
| 894 | CALLTYPE_NESTED = 2
|
|---|
| 895 | CALLTYPE_ASYNC = 3
|
|---|
| 896 | CALLTYPE_TOPLEVEL_CALLPENDING = 4
|
|---|
| 897 | CALLTYPE_ASYNC_CALLPENDING = 5
|
|---|
| 898 | End Enum
|
|---|
| 899 |
|
|---|
| 900 | Enum ERVERCALL
|
|---|
| 901 | SERVERCALL_ISHANDLED = 0
|
|---|
| 902 | SERVERCALL_REJECTED = 1
|
|---|
| 903 | SERVERCALL_RETRYLATER = 2
|
|---|
| 904 | End Enum
|
|---|
| 905 |
|
|---|
| 906 | Enum PENDINGTYPE
|
|---|
| 907 | PENDINGTYPE_TOPLEVEL = 1
|
|---|
| 908 | PENDINGTYPE_NESTED = 2
|
|---|
| 909 | End Enum
|
|---|
| 910 |
|
|---|
| 911 | Enum PENDINGMSG
|
|---|
| 912 | PENDINGMSG_CANCELCALL = 0
|
|---|
| 913 | PENDINGMSG_WAITNOPROCESS = 1
|
|---|
| 914 | PENDINGMSG_WAITDEFPROCESS = 2
|
|---|
| 915 | End Enum
|
|---|
| 916 |
|
|---|
| 917 | Type INTERFACEINFO
|
|---|
| 918 | pUnk As *IUnknown
|
|---|
| 919 | iid As IID
|
|---|
| 920 | wMethod As Word
|
|---|
| 921 | End Type
|
|---|
| 922 | TypeDef LPINTERFACEINFO = *INTERFACEINFO
|
|---|
| 923 |
|
|---|
| 924 | Dim IID_IMessageFilter = [&h00000016, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
|
|---|
| 925 | Interface IMessageFilter
|
|---|
| 926 | Inherits IUnknown
|
|---|
| 927 |
|
|---|
| 928 | Function HandleInComingCall(
|
|---|
| 929 | /* [in] */ dwCallType As DWord,
|
|---|
| 930 | /* [in] */ htaskCaller As HTASK,
|
|---|
| 931 | /* [in] */ dwTickCount As DWord,
|
|---|
| 932 | /* [in] */ lpInterfaceInfo As LPINTERFACEINFO) As DWord
|
|---|
| 933 | Function RetryRejectedCall(
|
|---|
| 934 | /* [in] */ htaskCallee As HTASK,
|
|---|
| 935 | /* [in] */ dwTickCount As DWord,
|
|---|
| 936 | /* [in] */ dwRejectType As DWord) As DWord
|
|---|
| 937 | Function MessagePending(
|
|---|
| 938 | /* [in] */ htaskCallee As HTASK,
|
|---|
| 939 | /* [in] */ dwTickCount As DWord,
|
|---|
| 940 | /* [in] */ dwPendingType As DWord) As DWord
|
|---|
| 941 | End Interface
|
|---|
| 942 |
|
|---|
| 943 | ' IRpcChannelBuffer
|
|---|
| 944 |
|
|---|
| 945 | ' IRpcChannelBuffer2
|
|---|
| 946 |
|
|---|
| 947 | ' IAsyncRpcChannelBuffer
|
|---|
| 948 |
|
|---|
| 949 | ' IRpcChannelBuffer3
|
|---|
| 950 |
|
|---|
| 951 | ' IRpcSyntaxNegotiate
|
|---|
| 952 |
|
|---|
| 953 | ' IRpcProxyBuffer
|
|---|
| 954 |
|
|---|
| 955 | ' IRpcStubBuffer
|
|---|
| 956 |
|
|---|
| 957 | ' IPSFactoryBuffer
|
|---|
| 958 |
|
|---|
| 959 | ' IChannelHook
|
|---|
| 960 |
|
|---|
| 961 | ' IClientSecurity
|
|---|
| 962 |
|
|---|
| 963 | ' IServerSecurity
|
|---|
| 964 |
|
|---|
| 965 | ' IClassActivator
|
|---|
| 966 |
|
|---|
| 967 | ' IRpcOptions
|
|---|
| 968 |
|
|---|
| 969 | Interface IFillLockBytes
|
|---|
| 970 | Inherits IUnknown
|
|---|
| 971 | End Interface
|
|---|
| 972 |
|
|---|
| 973 | ' IProgressNotify
|
|---|
| 974 |
|
|---|
| 975 | ' ILayoutStorage
|
|---|
| 976 |
|
|---|
| 977 | ' IBlockingLock
|
|---|
| 978 |
|
|---|
| 979 | ' ITimeAndNoticeControl
|
|---|
| 980 |
|
|---|
| 981 | ' IOplockStorage
|
|---|
| 982 |
|
|---|
| 983 | ' ISurrogate
|
|---|
| 984 |
|
|---|
| 985 | Dim IID_IGlobalInterfaceTable = [&h00000146, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
|
|---|
| 986 | Interface IGlobalInterfaceTable
|
|---|
| 987 | Inherits IUnknown
|
|---|
| 988 |
|
|---|
| 989 | Function RegisterInterfaceInGlobal(
|
|---|
| 990 | /* [in] */ unk As IUnknown,
|
|---|
| 991 | /* [in] */ ByRef riid As IID,
|
|---|
| 992 | /* [out] */ ByRef dwCookie As DWord) As HRESULT
|
|---|
| 993 | Function RevokeInterfaceFromGlobal(
|
|---|
| 994 | /* [in] */ dwCookie As DWord) As HRESULT
|
|---|
| 995 | Function GetInterfaceFromGlobal(
|
|---|
| 996 | /* [in] */ dwCookie As DWord,
|
|---|
| 997 | /* [in] */ ByRef riid As IID,
|
|---|
| 998 | /* [iid_is][out] */ ByRef ppv As Any) As HRESULT
|
|---|
| 999 | End Interface
|
|---|
| 1000 |
|
|---|
| 1001 | ' IDirectWriterLock
|
|---|
| 1002 |
|
|---|
| 1003 | ' ISynchronize
|
|---|
| 1004 |
|
|---|
| 1005 | ' ISynchronizeHandle
|
|---|
| 1006 |
|
|---|
| 1007 | ' ISynchronizeEvent
|
|---|
| 1008 |
|
|---|
| 1009 | ' ISynchronizeContainer
|
|---|
| 1010 |
|
|---|
| 1011 | ' ISynchronizeMutex
|
|---|
| 1012 |
|
|---|
| 1013 | ' ICancelMethodCalls
|
|---|
| 1014 |
|
|---|
| 1015 | ' IAsyncManager
|
|---|
| 1016 |
|
|---|
| 1017 | ' ICallFactory
|
|---|
| 1018 |
|
|---|
| 1019 | ' IRpcHelper
|
|---|
| 1020 |
|
|---|
| 1021 | ' IReleaseMarshalBuffers
|
|---|
| 1022 |
|
|---|
| 1023 | ' IWaitMultiple
|
|---|
| 1024 |
|
|---|
| 1025 | ' IUrlMon
|
|---|
| 1026 |
|
|---|
| 1027 | ' IForegroundTransfer
|
|---|
| 1028 |
|
|---|
| 1029 | ' IAddrTrackingControl
|
|---|
| 1030 |
|
|---|
| 1031 | ' IAddrExclusionControl
|
|---|
| 1032 |
|
|---|
| 1033 | ' IPipeByte
|
|---|
| 1034 |
|
|---|
| 1035 | ' AsyncIPipeByte
|
|---|
| 1036 |
|
|---|
| 1037 | ' IPipeLong
|
|---|
| 1038 |
|
|---|
| 1039 | ' AsyncIPipeLong
|
|---|
| 1040 |
|
|---|
| 1041 | ' IPipeDouble
|
|---|
| 1042 |
|
|---|
| 1043 | ' AsyncIPipeDouble
|
|---|
| 1044 |
|
|---|
| 1045 | ' IThumbnailExtractor
|
|---|
| 1046 |
|
|---|
| 1047 | ' IDummyHICONIncluder
|
|---|
| 1048 |
|
|---|
| 1049 | ' IEnumContextProps
|
|---|
| 1050 |
|
|---|
| 1051 | ' IContext
|
|---|
| 1052 |
|
|---|
| 1053 | ' IObjContext
|
|---|
| 1054 |
|
|---|
| 1055 | ' IProcessLock
|
|---|
| 1056 |
|
|---|
| 1057 | ' ISurrogateService
|
|---|
| 1058 |
|
|---|
| 1059 | ' IComThreadingInfo
|
|---|
| 1060 |
|
|---|
| 1061 | ' IProcessInitControl
|
|---|
| 1062 |
|
|---|
| 1063 | ' IInitializeSpy
|
|---|
