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