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