| /* |
| * Copyright 2011 Jacek Caban for CodeWeavers |
| * |
| * This library is free software; you can redistribute it and/or |
| * modify it under the terms of the GNU Lesser General Public |
| * License as published by the Free Software Foundation; either |
| * version 2.1 of the License, or (at your option) any later version. |
| * |
| * This library is distributed in the hope that it will be useful, |
| * but WITHOUT ANY WARRANTY; without even the implied warranty of |
| * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU |
| * Lesser General Public License for more details. |
| * |
| * You should have received a copy of the GNU Lesser General Public |
| * License along with this library; if not, write to the Free Software |
| * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA |
| */ |
| |
| #define COBJMACROS |
| |
| #include <wine/test.h> |
| #include <stdarg.h> |
| #include <stdio.h> |
| |
| #include "windef.h" |
| #include "winbase.h" |
| #include "ole2.h" |
| #include "exdisp.h" |
| #include "mshtml.h" |
| |
| static void test_visible(IWebBrowser2 *wb) |
| { |
| VARIANT_BOOL b; |
| HRESULT hres; |
| |
| b = 0x100; |
| hres = IWebBrowser2_get_Visible(wb, &b); |
| ok(hres == S_OK, "get_Visible failed: %08x\n", hres); |
| ok(b == VARIANT_FALSE, "Visible = %x\n", hres); |
| |
| hres = IWebBrowser2_put_Visible(wb, VARIANT_TRUE); |
| ok(hres == S_OK, "put_Visible failed: %08x\n", hres); |
| |
| b = 0x100; |
| hres = IWebBrowser2_get_Visible(wb, &b); |
| ok(hres == S_OK, "get_Visible failed: %08x\n", hres); |
| ok(b == VARIANT_TRUE, "Visible = %x\n", hres); |
| |
| hres = IWebBrowser2_put_Visible(wb, VARIANT_FALSE); |
| ok(hres == S_OK, "put_Visible failed: %08x\n", hres); |
| } |
| |
| static void test_html_window(IWebBrowser2 *wb) |
| { |
| IHTMLWindow2 *html_window; |
| IServiceProvider *sp; |
| HRESULT hres; |
| |
| hres = IWebBrowser2_QueryInterface(wb, &IID_IServiceProvider, (void**)&sp); |
| ok(hres == S_OK, "Could not get IServiceProvider iface: %08x\n", hres); |
| |
| hres = IServiceProvider_QueryService(sp, &SID_SHTMLWindow, &IID_IHTMLWindow2, (void**)&html_window); |
| IServiceProvider_Release(sp); |
| ok(hres == S_OK, "Could not get SHTMLWindow service: %08x\n", hres); |
| |
| IHTMLWindow2_Release(html_window); |
| } |
| |
| static void test_InternetExplorer(void) |
| { |
| IWebBrowser2 *wb; |
| IUnknown *unk; |
| ULONG ref; |
| HRESULT hres; |
| |
| hres = CoCreateInstance(&CLSID_InternetExplorer, NULL, CLSCTX_SERVER, |
| &IID_IUnknown, (void**)&unk); |
| ok(hres == S_OK, "Could not create InternetExplorer instance: %08x\n", hres); |
| |
| if(hres != S_OK) |
| return; |
| |
| hres = IUnknown_QueryInterface(unk, &IID_IWebBrowser2, (void**)&wb); |
| ok(hres == S_OK, "Could not get IWebBrowser2 interface: %08x\n", hres); |
| |
| test_visible(wb); |
| test_html_window(wb); |
| |
| IWebBrowser2_Release(wb); |
| ref = IUnknown_Release(unk); |
| ok(!ref, "object not destroyed, ref=%u\n", ref); |
| } |
| |
| START_TEST(ie) |
| { |
| CoInitialize(NULL); |
| |
| test_InternetExplorer(); |
| |
| CoUninitialize(); |
| } |