/* * 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(); }