Context Navigation

objidl.sbp@ 681

Last change on this file since 681 was 670, checked in by イグトランス (egtra), 16 years ago
mlang.abの完成。objidl.sbp、oleidl.abの追加。 (#227)
File size: 30.3 KB

Line
1	'Include/objidl.sbp
2
3	TypeDef SNB = **OLECHAR
4
5	Type COSERVERINFO
6	dwReserved1 As DWord
7	pwszName As LPWSTR
8	pAuthInfo As *COAUTHINFO
9	dwReserved2 As DWord
10	End Type
11
12	/* interface IMarshal */
13	/* [uuid][object][local] */
14
15	Dim IID_IMarshal = [&h00000003, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
16	Interface IMarshal
17	Inherits IUnknown
18
19	Function GetUnmarshalClass(
20	/* [in] */ ByRef iid As IID,
21	/* [unique][in] */ pv As VoidPtr,
22	/* [in] */ dwDestContext As DWord,
23	/* [unique][in] */ pvDestContext As VoidPtr,
24	/* [in] */ mshlflags As DWord,
25	/* [out] */ ByRef Cid As CLSID) As HRESULT
26	Function GetMarshalSizeMax(
27	/* [in] */ ByRef iid As IID,
28	/* [unique][in] */ pv As VoidPtr,
29	/* [in] */ dwDestContext As DWord,
30	/* [unique][in] */ pvDestContext As VoidPtr,
31	/* [in] */ mshlflags As DWord,
32	/* [out] */ ByRef Size As DWord) As HRESULT
33	Function MarshalInterface(
34	/* [unique][in] */ pStm As IStream,
35	/* [in] */ ByRef iid As IID,
36	/* [unique][in] */ pv As VoidPtr,
37	/* [in] */ dwDestContext As DWord,
38	/* [unique][in] */ pvDestContext As VoidPtr,
39	/* [in] */ mshlflags As DWord) As HRESULT
40	Function UnmarshalInterface(
41	/* [unique][in] */ pStm As IStream,
42	/* [in] */ ByRef iid As IID,
43	/* [out] */ ByRef ppv As VoidPtr) As HRESULT
44	Function ReleaseMarshalData(
45	/* [unique][in] / pStm As IStream) As HRESULT
46	Function DisconnectObject(
47	/* [in] */ dwReserved As DWord) As HRESULT
48	End Interface
49
50	/* interface IMarshal2 */
51	/* [uuid][object][local] */
52
53	Dim IID_IMarshal2 = [&h000001Cf, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
54	Interface IMarshal2
55	Inherits IMarshal
56	End Interface
57
58	/* interface IMalloc */
59	/* [uuid][object][local] */
60
61	Dim IID_IMalloc = [&h00000002, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
62	Interface IMalloc
63	Inherits IUnknown
64
65	Function Alloc(
66	/* [in] */ cb As SIZE_T) As VoidPtr
67	Function Realloc(
68	/* [in] */ pv As VoidPtr,
69	/* [in] */ cb As SIZE_T) As VoidPtr
70	Sub Free(
71	/* [in] */ pv As VoidPtr)
72	Function GetSize(pv As VoidPtr) As SIZE_T
73	Function DidAlloc(pv As VoidPtr) As Long
74	Sub HeapMinimize()
75	End Interface
76
77	/* interface IMallocSpy */
78	/* [uuid][object][local] */
79
80	Dim IID_IMallocSpy = [&h0000001d, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
81	Interface IMallocSpy
82	Inherits IUnknown
83
84	Function PreAlloc(
85	/* [in] */ cbRequest As SIZE_T) As HRESULT
86	Function PostAlloc(
87	/* [in] */ pActual As VoidPtr) As VoidPtr
88	Function PreFree(
89	/* [in] */ pRequest As VoidPtr,
90	/* [in] */ fSpyed As BOOL) As VoidPtr
91	Sub PostFree(
92	/* [in] */ fSpyed As BOOL)
93	Function PreRealloc(
94	/* [in] */ pRequest As VoidPtr,
95	/* [in] */ cbRequestt As SIZE_T,
96	/* [out] */ ByRef ppNewRequest As VoidPtr,
97	/* [in] */ fSpyed As BOOL) As HRESULT
98	Function PostRealloc(
99	/* [in] */ pActual As VoidPtr,
100	/* [in] */ fSpyed As BOOL) As VoidPtr
101	Function PreGetSize(
102	/* [in] */ pRequest As VoidPtr,
103	/* [in] */ fSpyed As BOOL) As VoidPtr
104	Function PostGetSize(
105	/* [in] */ cbActual As SIZE_T,
106	/* [in] */ fSpyed As BOOL) As HRESULT
107	Function PreDidAlloc(
108	/* [in] */ pRequest As VoidPtr,
109	/* [in] */ fSpyed As BOOL) As VoidPtr
110	Function PostDidAlloc(
111	/* [in] */ pRequest As VoidPtr,
112	/* [in] */ fSpyed As BOOL,
113	/* [in] */ fActual As Long) As Long
114	Sub PreHeapMinimize()
115	Sub PostHeapMinimize()
116	End Interface
117
118	/* interface IStdMarshalInfo */
119	/* [uuid][object][local] */
120
121	Dim IID_IStdMarshalInfo = [&h00000018, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
122
123	Interface IStdMarshalInfo
124	Inherits IUnknown
125
126	Function GetClassForHandler(
127	/* [in] */ dwDestContext As DWord,
128	/* [unique][in] */ pvDestContext As VoidPtr,
129	/* [out] */ ByRef clsid As CLSID) As HRESULT
130	End Interface
131
132	/* interface IExternalConnection */
133	/* [uuid][local][object] */
134
135	Const Enum EXTCONN
136	EXTCONN_STRONG = 1
137	EXTCONN_WEAK = 2
138	EXTCONN_CALLABLE = 4
139	End Enum
140
141	Dim IID_IExternalConnection = [&h00000019, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
142
143	Interface IExternalConnection
144	Inherits IUnknown
145
146	Function AddConnection(
147	/* [in] */ extconn As DWord,
148	/* [in] */ reserved As DWord) As DWord
149	Function ReleaseConnection(
150	/* [in] */ extconn As DWord,
151	/* [in] */ reserved As DWord,
152	/* [in] */ fLastReleaseCloses As BOOL) As DWord
153	End Interface
154
155	Type MULTI_QI
156	pIID As * /Const/ IID
157	pItf As IUnknown
158	hr As HRESULT
159	End Type
160
161	Dim IID_IMultiQI = [&h00000020, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
162	Interface IMultiQI
163	Inherits IUnknown
164
165	Function QueryMultipleInterfaces(
166	/* [in] */ cMQIs As DWord,
167	/* [out][in] / pMQIs As MULTI_QI) As HRESULT
168	End Interface
169
170	/* interface AsyncIMultiQI */
171	/* [uuid][local][object] */
172
173	Dim IID_AsyncIMultiQI = [&h000e0020, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
174	Interface 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
182	End Interface
183
184	/* interface IInternalUnknown */
185	/* [uuid][local][object] */
186	Dim IID_IInternalUnknown = [&h00000021, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
187	Interface IInternalUnknown
188	Inherits IUnknown
189
190	Function QueryInternalInterface(
191	/* [in] */ ByRef riid As IID,
192	/* [out] */ ByRef ppv As Any) As HRESULT
193	End Interface
194
195	/* interface IEnumUnknown */
196	/* [unique][uuid][object] */
197
198	Dim IID_IEnumUnknown = [&h00000100, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
199	Interface 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
211	End Interface
212
213	/* interface IBindCtx */
214	/* [unique][uuid][object] */
215
216	Type BIND_OPTS
217	cbStruct As DWord
218	grfFlags As DWord
219	grfMode As DWord
220	dwTickCountDeadline As DWord
221	End Type
222
223	Type 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
234	End Type
235
236	Type 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
249	End Type
250
251	Const Enum BIND_FLAGS
252	BIND_MAYBOTHERUSER
253	BIND_JUSTTESTEXISTENCE
254	End Enum
255
256	Dim IID_IBindCtx = [&h0000000E, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
257	Interface 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
281	End Interface
282
283	/* interface IEnumMoniker */
284	/* [unique][uuid][object] */
285
286	Dim IID_IEnumMoniker = [&h00000102, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
287	Interface 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
298	End Interface
299
300	/* interface IRunningObjectTable */
301	/* [uuid][object] */
302
303	Dim IID_IRunningObjectTable = [&h00000010, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
304	Interface 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
327	End Interface
328
329	Dim IID_IPersist = [&h0000010c, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
330	Interface IPersist
331	Inherits IUnknown
332
333	Function GetClassID(
334	/* [out] */ ByRef ClassID As CLSID) As HRESULT
335	End Interface
336
337	Dim IID_IPersistStream = [&h00000109, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
338	Interface 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
350	End Interface
351
352	/* interface IMoniker */
353	/* [unique][uuid][object] */
354
355	Const 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
366	End 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
373	End Enum
374
375	Dim IID_IMoniker = [&h0000000f, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
376	Interface 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
433	End Interface
434
435	/* interface IEnumString */
436	/* [unique][uuid][object] */
437
438	Dim IID_IEnumString = [&h00000101, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
439	Interface 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
451	End Interface
452
453	/* interface ISequentialStream */
454	/* [unique][uuid][object] */
455
456	Dim IID_ISequentialStream = [&h0c733a30, &h2a1c, &h11ce, [&had, &he5, &h00, &haa, &h00, &h44, &h77, &h3d]] As IID
457	Interface 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
468	End Interface
469
470	/* interface IStream */
471	/* [unique][uuid][object] */
472
473	Type 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
485	End Type
486
487	Enum STGTY
488	STGTY_STORAGE = 1
489	STGTY_STREAM = 2
490	STGTY_LOCKBYTES = 3
491	STGTY_PROPERTY = 4
492	End Enum
493
494	Enum STREAM_SEEK
495	STREAM_SEEK_SET = 0
496	STREAM_SEEK_CUR = 1
497	STREAM_SEEK_END = 2
498	End Enum
499
500	Enum LOCKTYPE
501	LOCK_WRITE = 1
502	LOCK_EXCLUSIVE = 2
503	LOCK_ONLYONCE = 4
504	End Enum
505
506	Dim IID_IStream = [&h0000000c, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
507	Interface 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
537	End Interface
538
539	/* interface IEnumSTATSTG */
540	/* [unique][uuid][object] */
541
542	Dim IID_IEnumSTATSTG = [&h0000000d, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
543	Interface 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
555	End Interface
556
557	/* interface IStorage */
558	/* [unique][uuid][object] */
559
560	Type RemSNB
561	ulCntStr As DWord
562	ulCntChar As DWord
563	rgString[ELM(1)] As OLECHAR
564	End Type
565
566	TypeDef wireSNB /* [unique] / = RemSNB
567
568	TypeDef SNB = /* [wire_marshal] / *OLECHAR
569
570	Dim IID_IStorage = [&h0000000b, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
571	Interface 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
635	End Interface
636
637	/* interface IPersistFile */
638	/* [unique][uuid][object] */
639
640	Dim IID_IPersistFile = [&h0000010b, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
641	Interface 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
655	End Interface
656
657	/* interface IPersistStorage */
658	/* [unique][uuid][object] */
659
660	Dim IID_IPersistStorage = [&h0000010a, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
661	Interface 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
675	End Interface
676
677	/* interface ILockBytes */
678	/* [unique][uuid][object] */
679
680	Dim IID_ILockBytes = [&h0000000a, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
681	Interface 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
708	End Interface
709
710	/* interface IEnumFORMATETC */
711	/* [unique][uuid][object] */
712
713	Type 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
720	End Type
721
722	TypeDef LPCLIPFORMAT = *CLIPFORMAT
723
724	Type FORMATETC
725	cfFormat As CLIPFORMAT
726	ptd As *DVTARGETDEVICE
727	dwAspect As DWord
728	lindex As Long
729	tymed As DWord
730	End Type
731
732	TypeDef LPFORMATETC = *FORMATETC
733
734	Dim IID_IEnumFORMATETC = [&h00000103, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
735
736	Interface 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
748	End Interface
749
750	/* interface IEnumSTATDATA */
751	/* [unique][uuid][object] */
752
753	Const 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
761	End Enum
762
763	Type STATDATA
764	formatetc As FORMATETC
765	DWORD advf As DWord
766	pAdvSink As IAdviseSink
767	dwConnection As DWord
768	End Type
769
770	Dim IID_IEnumSTATDATA = [&h00000105, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
771
772	Interface 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
784	End Interface
785
786	/* interface IRootStorage */
787	/* [unique][uuid][object] */
788
789	Dim IID_IRootStorage = [&h00000012, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
790	Interface IRootStorage
791	Inherits IUnknown
792
793	Function SwitchToFile(
794	/* [in] */ pszFile As LPOLESTR) As HRESULT
795	End Interface
796
797	/* interface IAdviseSink */
798	/* [unique][async_uuid][uuid][object] */
799
800	Enum /[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
809	End Enum
810
811	Type 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
818	End 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
835	End Type
836
837	Type 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
844	End Type
845
846	Type 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
859	End Type
860
861	TypeDef wireSTGMEDIUM = /* [unique] / userSTGMEDIUM
862	TypeDef ASYNC_STGMEDIUM = /* [unique] / userSTGMEDIUM
863	TypeDef wireSTGMEDIUM = /* [wire_marshal] */ STGMEDIUM
864
865	Type userFLAG_STGMEDIUM
866	' ContextFlags As Long
867	' fPassOwnership As Long
868	' Stgmed As userSTGMEDIUM
869	End Type
870
871	TypeDef wireFLAG_STGMEDIUM = /* [unique] / userFLAG_STGMEDIUM
872
873	Type /* [wire_marshal] */ FLAG_STGMEDIUM
874	ContextFlags As Long
875	fPassOwnership As Long
876	Stgmed As STGMEDIUM
877	End Type
878
879	Dim IID_IAdviseSink = [&h0000010f, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
880	Interface 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()
893	End Interface
894
895	/* interface AsyncIAdviseSink */
896	/* [uuid][unique][object] */
897
898	Dim IID_AsyncIAdviseSink = [&h00000150, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
899
900	Interface 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()
918	End Interface
919
920	' IAdviseSink2
921
922	' AsyncIAdviseSink2
923
924	Dim IID_IDataObject = [&h0000010e, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
925	Interface 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
955	End Interface
956
957	Interface IDataAdviseHolder
958	Inherits IUnknown
959	End Interface
960
961	Enum CALLTYPE
962	CALLTYPE_TOPLEVEL = 1
963	CALLTYPE_NESTED = 2
964	CALLTYPE_ASYNC = 3
965	CALLTYPE_TOPLEVEL_CALLPENDING = 4
966	CALLTYPE_ASYNC_CALLPENDING = 5
967	End Enum
968
969	Enum ERVERCALL
970	SERVERCALL_ISHANDLED = 0
971	SERVERCALL_REJECTED = 1
972	SERVERCALL_RETRYLATER = 2
973	End Enum
974
975	Enum PENDINGTYPE
976	PENDINGTYPE_TOPLEVEL = 1
977	PENDINGTYPE_NESTED = 2
978	End Enum
979
980	Enum PENDINGMSG
981	PENDINGMSG_CANCELCALL = 0
982	PENDINGMSG_WAITNOPROCESS = 1
983	PENDINGMSG_WAITDEFPROCESS = 2
984	End Enum
985
986	Type INTERFACEINFO
987	pUnk As *IUnknown
988	iid As IID
989	wMethod As Word
990	End Type
991	TypeDef LPINTERFACEINFO = *INTERFACEINFO
992
993	Dim IID_IMessageFilter = [&h00000016, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
994	Interface 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
1010	End 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
1038	Interface IFillLockBytes
1039	Inherits IUnknown
1040	End Interface
1041
1042	' IProgressNotify
1043
1044	' ILayoutStorage
1045
1046	' IBlockingLock
1047
1048	' ITimeAndNoticeControl
1049
1050	' IOplockStorage
1051
1052	' ISurrogate
1053
1054	Dim IID_IGlobalInterfaceTable = [&h00000146, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
1055	Interface 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
1068	End 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.

Download in other formats:

Original Format