Context Navigation

objidl.sbp@ 560

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

Note: See TracBrowser for help on using the repository browser.

Download in other formats:

Original Format