source: trunk/ab5.0/ablib/src/exdisp.ab@ 560

Last change on this file since 560 was 303, checked in by イグトランス (egtra), 18 years ago

フルコンパイルでのミスあぶり出し。註：修正は全て@300や@301以前に行われた。
File size: 10.9 KB
Line 
1'exdisp.ab
2
3'#require <ocidl.ab>
4'#require <docobj.ab>
5
6
7Const Enum OLECMDID 'docobj.ab
8End Enum
9
10Const Enum OLECMDEXECOPT 'docobj.ab
11End Enum
12
13Const Enum OLECMDTEXTF 'docobj.ab
14End Enum
15
16Const Enum OLECMDF 'docobj.ab
17End Enum
18
19Const Enum READYSTATE 'ocidl.ab
20End Enum
21
22'SID_SkipHung
23
24/* library SHDocVw */
25/* [version][lcid][helpstring][uuid] */
26
27'各種列挙体
28
29'LIBID_SHDocVw
30
31/* interface IWebBrowser */
32/* [object][oleautomation][dual][hidden][helpcontext][helpstring][uuid] */
33
34/* [helpstring][uuid] 14EE5380-A378-11cf-A731-00A0C9082637*/
35Const Enum BrowserNavConstants
36 navOpenInNewWindow = &h1
37 navNoHistory = &h2
38 navNoReadFromCache = &h4
39 navNoWriteToCache = &h8
40 navAllowAutosearch = &h10
41 navBrowserBar = &h20
42 navHyperlink = &h40
43 navEnforceRestricted = &h80
44 navNewWindowsManaged = &h100
45 navUntrustedForDownload = &h200
46 navTrustedForActiveX = &h400
47 navOpenInNewTab = &h800
48 navOpenInBackgroundTab = &h1000
49 navKeepWordWheelText = &h2000
50End Enum
51
52/* [helpstring][uuid] C317C261-A991-11cf-A731-00A0C9082637*/
53Const Enum RefreshConstants
54 REFRESH_NORMAL = 0
55 REFRESH_IFEXPIRED = 1
56 REFRESH_COMPLETELY = 3
57End Enum
58
59Dim IID_IWebBrowser = [&hEAB22AC1, &h30C1, &h11CF, [&hA7, &hEB, &h00, &h00, &hC0, &h5B, &hAE, &h0B]] As IID
60Interface IWebBrowser
61 Inherits IDispatch
62
63 /* [helpcontext][helpstring][id] */ Function GoBack() As HRESULT
64 /* [helpcontext][helpstring][id] */ Function GoForward() As HRESULT
65 /* [helpcontext][helpstring][id] */ Function GoHome() As HRESULT
66 /* [helpcontext][helpstring][id] */ Function GoSearch() As HRESULT
67 /* [helpcontext][helpstring][id] */ Function Navigate(
68 /* [in] */ URL As BSTR,
69 /* [optional][in] */ Flags As *VARIANT,
70 /* [optional][in] */ TargetFrameName As *VARIANT,
71 /* [optional][in] */ PostData As *VARIANT,
72 /* [optional][in] */ Headers As *VARIANT) As HRESULT
73 /* [helpcontext][helpstring][id] */ Function Refresh() As HRESULT
74 /* [helpcontext][helpstring][id] */ Function Refresh2(
75 /* [optional][in] */ Level As *VARIANT) As HRESULT
76 /* [helpcontext][helpstring][id] */ Function Stop() As HRESULT
77 /* [helpcontext][helpstring][propget][id] */ Function get_Application(
78 /* [retval][out] */ ByRef Disp As IDispatch) As HRESULT
79 /* [helpcontext][helpstring][propget][id] */ Function get_Parent(
80 /* [retval][out] */ ByRef Disp As IDispatch) As HRESULT
81 /* [helpcontext][helpstring][propget][id] */ Function get_Container(
82 /* [retval][out] */ ByRef Disp As IDispatch) As HRESULT
83 /* [helpcontext][helpstring][propget][id] */ Function get_Document(
84 /* [retval][out] */ ByRef Disp As IDispatch) As HRESULT
85 /* [helpcontext][helpstring][propget][id] */ Function get_TopLevelContainer(
86 /* [retval][out] */ ByRef Bool As VARIANT_BOOL) As HRESULT
87 /* [helpcontext][helpstring][propget][id] */ Function get_Type(
88 /* [retval][out] */ ByRef Type_ As BSTR) As HRESULT
89 /* [helpcontext][helpstring][propget][id] */ Function get_Left(
90 /* [retval][out] */ ByRef l As Long) As HRESULT
91 /* [propput][id] */ Function put_Left(
92 /* [in] */ Left As Long) As HRESULT
93 /* [helpcontext][helpstring][propget][id] */ Function get_Top(
94 /* [retval][out] */ ByRef l As Long) As HRESULT
95 /* [propput][id] */ Function put_Top(
96 /* [in] */ Top As Long) As HRESULT
97 /* [helpcontext][helpstring][propget][id] */ Function get_Width(
98 /* [retval][out] */ ByRef l As Long) As HRESULT
99 /* [propput][id] */ Function put_Width(
100 /* [in] */ Width As Long) As HRESULT
101 /* [helpcontext][helpstring][propget][id] */ Function get_Height(
102 /* [retval][out] */ ByRef l As Long) As HRESULT
103 /* [propput][id] */ Function put_Height(
104 /* [in] */ Height As Long) As HRESULT
105 /* [helpcontext][helpstring][propget][id] */ Function get_LocationName(
106 /* [retval][out] */ ByRef LocationName As BSTR) As HRESULT
107 /* [helpcontext][helpstring][propget][id] */ Function get_LocationURL(
108 /* [retval][out] */ ByRef LocationURL As BSTR) As HRESULT
109 /* [helpcontext][helpstring][propget][id] */ Function get_Busy(
110 /* [retval][out] */ ByRef Bool As VARIANT_BOOL) As HRESULT
111End Interface
112
113/* dispinterface DWebBrowserEvents */
114/* [hidden][helpstring][uuid] */
115
116Dim DIID_DWebBrowserEvents = [&hEAB22AC2, &h30C1, &h11CF, [&hA7, &hEB, &h00, &h00, &hC0, &h5B, &hAE, &h0B]] As IID
117Interface DIID_DWebBrowserEvents
118 Inherits IDispatch
119End Interface
120
121/* interface IWebBrowserApp */
122/* [object][dual][oleautomation][hidden][helpcontext][helpstring][uuid] */
123
124Dim IID_IWebBrowserApp = [&h0002DF05, 0, 0, [&hC0, 0, 0, 0, 0, 0, 46]] As IID
125Interface IWebBrowserApp
126 Inherits IWebBrowser
127
128 /* [helpcontext][helpstring][id] */ Function Quit() As HRESULT
129 /* [helpcontext][helpstring][id] */ Function ClientToWindow(
130 /* [out][in] */ ByRef cx As Long,
131 /* [out][in] */ ByRef pcy As Long) As HRESULT
132 /* [helpcontext][helpstring][id] */ Function PutProperty(
133 /* [in] */ Property As BSTR,
134 /* [in] */ vtValue As VARIANT) As HRESULT
135 /* [helpcontext][helpstring][id] */ Function GetProperty(
136 /* [in] */ Property As BSTR,
137 /* [retval][out] */ ByRef vtValue As VARIANT) As HRESULT
138 /* [helpcontext][helpstring][propget][id] */ Function get_Name(
139 /* [retval][out] */ ByRef Name As BSTR) As HRESULT
140 /* [helpcontext][helpstring][propget][id] */ Function get_HWND(
141 /* [retval][out] */ ByRef hwnd As LONG_PTR) As HRESULT
142 /* [helpcontext][helpstring][propget][id] */ Function get_FullName(
143 /* [retval][out] */ ByRef FullName As BSTR) As HRESULT
144 /* [helpcontext][helpstring][propget][id] */ Function get_Path(
145 /* [retval][out] */ ByRef Path As BSTR) As HRESULT
146 /* [helpcontext][helpstring][propget][id] */ Function get_Visible(
147 /* [retval][out] */ ByRef Bool As VARIANT_BOOL) As HRESULT
148 /* [helpcontext][helpstring][propput][id] */ Function put_Visible(
149 /* [in] */ Value As Long) As HRESULT
150 /* [helpcontext][helpstring][propget][id] */ Function get_StatusBar(
151 /* [retval][out] */ ByRef Bool As VARIANT_BOOL) As HRESULT
152 /* [helpcontext][helpstring][propput][id] */ Function put_StatusBar(
153 /* [in] */ Value As Long) As HRESULT
154 /* [helpcontext][helpstring][propget][id] */ Function get_StatusText(
155 /* [retval][out] */ ByRef StatusText As BSTR) As HRESULT
156 /* [helpcontext][helpstring][propput][id] */ Function put_StatusText(
157 /* [in] */ StatusText As BSTR) As HRESULT
158 /* [helpcontext][helpstring][propget][id] */ Function get_ToolBar(
159 /* [retval][out] */ ByRef Value As Long) As HRESULT
160 /* [helpcontext][helpstring][propput][id] */ Function put_ToolBar(
161 /* [in] */ Value As Long) As HRESULT
162 /* [helpcontext][helpstring][propget][id] */ Function get_MenuBar(
163 /* [retval][out] */ ByRef Value As Long) As HRESULT
164 /* [helpcontext][helpstring][propput][id] */ Function put_MenuBar(
165 /* [in] */ Value As Long) As HRESULT
166 /* [helpcontext][helpstring][propget][id] */ Function get_FullScreen(
167 /* [retval][out] */ ByRef bFullScreen As VARIANT_BOOL) As HRESULT
168 /* [helpcontext][helpstring][propput][id] */ Function put_FullScreen(
169 /* [in] */ bFullScreen As VARIANT_BOOL) As HRESULT
170End Interface
171
172/* interface IWebBrowser2 */
173/* [object][dual][oleautomation][hidden][helpcontext][helpstring][uuid] */
174
175Dim IID_IWebBrowser2 = [&hD30C1661, &hCDAF, &h11d0, [&h8A, &h3E, &h00, &hC0, &h4F, &hC9, &hE2, &h6E]] As IID
176Interface IWebBrowser2
177 Inherits IWebBrowserApp
178
179 /* [helpcontext][helpstring][id] */ Function Navigate2(
180 /* [in] */ URL As *VARIANT,
181 /* [optional][in] */ Flags As *VARIANT,
182 /* [optional][in] */ TargetFrameName As *VARIANT,
183 /* [optional][in] */ PostData As *VARIANT,
184 /* [optional][in] */ Headers As *VARIANT) As HRESULT
185 /* [helpcontext][helpstring][id] */ Function QueryStatusWB(
186 /* [in] */ cmdID As OLECMDID,
187 /* [retval][out] */ ByRef cmdf As OLECMDF) As HRESULT
188 /* [helpcontext][helpstring][id] */ Function ExecWB(
189 /* [in] */ cmdID As OLECMDID,
190 /* [in] */ cmdexecopt As OLECMDEXECOPT,
191 /* [optional][in] */ pvaIn As *VARIANT,
192 /* [optional][in][out] */ pvaOut As *VARIANT) As HRESULT
193 /* [helpcontext][helpstring][id] */ Function ShowBrowserBar(
194 /* [in] */ ByRef vaClsid As VARIANT,
195 /* [optional][in] */ pvarShow As *VARIANT,
196 /* [optional][in] */ pvarSize As *VARIANT) As HRESULT
197 /* [bindable][propget][id] */ Function get_ReadyState(
198 /* [out][retval] */ ByRef lReadyState As READYSTATE) As HRESULT
199 /* [helpcontext][helpstring][propget][id] */ Function get_Offline(
200 /* [retval][out] */ ByRef bOffline As VARIANT_BOOL) As HRESULT
201 /* [helpcontext][helpstring][propput][id] */ Function put_Offline(
202 /* [in] */ bOffline As VARIANT_BOOL) As HRESULT
203 /* [helpcontext][helpstring][propget][id] */ Function get_Silent(
204 /* [retval][out] */ ByRef bSilent As VARIANT_BOOL) As HRESULT
205 /* [helpcontext][helpstring][propput][id] */ Function put_Silent(
206 /* [in] */ bSilent As VARIANT_BOOL) As HRESULT
207 /* [helpcontext][helpstring][propget][id] */ Function get_RegisterAsBrowser(
208 /* [retval][out] */ ByRef bRegister As VARIANT_BOOL) As HRESULT
209 /* [helpcontext][helpstring][propput][id] */ Function put_RegisterAsBrowser(
210 /* [in] */ bRegister As VARIANT_BOOL) As HRESULT
211 /* [helpcontext][helpstring][propget][id] */ Function get_RegisterAsDropTarget(
212 /* [retval][out] */ ByRef bRegister As VARIANT_BOOL) As HRESULT
213 /* [helpcontext][helpstring][propput][id] */ Function put_RegisterAsDropTarget(
214 /* [in] */ bRegister As VARIANT_BOOL) As HRESULT
215 /* [helpcontext][helpstring][propget][id] */ Function get_TheaterMode(
216 /* [retval][out] */ ByRef bRegister As VARIANT_BOOL) As HRESULT
217 /* [helpcontext][helpstring][propput][id] */ Function put_TheaterMode(
218 /* [in] */ bRegister As VARIANT_BOOL) As HRESULT
219 /* [helpcontext][helpstring][propget][id] */ Function get_AddressBar(
220 /* [retval][out] */ ByRef Value As Long) As HRESULT
221 /* [helpcontext][helpstring][propput][id] */ Function put_AddressBar(
222 /* [in] */ Value As Long) As HRESULT
223 /* [helpcontext][helpstring][propget][id] */ Function get_Resizable(
224 /* [retval][out] */ ByRef Value As Long) As HRESULT
225 /* [helpcontext][helpstring][propput][id] */ Function put_Resizable(
226 /* [in] */ Value As Long) As HRESULT
227End Interface
228
229/* dispinterface DWebBrowserEvents2 */
230/* [hidden][helpstring][uuid] */
231
232Dim DIID_DWebBrowserEvents2 = [&h34A715A0, &h6587, &h11D0, [&h92, &h4A, &h00, &h20, &hAF, &hC7, &hAC, &h4D]] As IID
233Interface DWebBrowserEvents2
234 Inherits IDispatch
235End Interface
236
237Dim CLSID_WebBrowser_V1 = [&hEAB22AC3, &h30C1, &h11CF, [&hA7, &hEB, &h00, &h00, &hC0, &h5B, &hAE, &h0B]] As CLSID
238Dim CLSID_WebBrowser = [&h8856F961, &h340A, &h11D0, [&hA9, &h6B, &h00, &hC0, &h4F, &hD7, &h05, &hA2]] As CLSID
239Dim CLSID_InternetExplorer = [&h0002DF01, &h0000, &h0000, [&hC0, &h00, &h00, &h00, &h00, &h00, &h00, &h46]] As CLSID
240Dim CLSID_ShellBrowserWindow = [&hc08afd90, &hf2a1, &h11d1, [&h84, &h55, &h00, &ha0, &hc9, &h1f, &h38, &h80]] As CLSID
241
242'DShellWindowsEvents
243'IShellWindows
244'ShellWindows
245'IShellUIHelper
246'IShellUIHelper2
247'ShellUIHelper
248'DShellNameSpaceEvents
249'IShellFavoritesNameSpace
250'IShellNameSpace
251'ShellNameSpace
252'ShellShellNameSpace
253'IScriptErrorList
254'CScriptErrorList
Note: See TracBrowser for help on using the repository browser.