source: trunk/ab5.0/ablib/src/objidl.sbp

Last change on this file was 670, checked in by イグトランス (egtra), 14 years ago

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