shdocvw: Added test of GetControlInfo.

This commit is contained in:
Jacek Caban 2006-07-27 23:30:36 +02:00 committed by Alexandre Julliard
parent 2783e72a65
commit 89b443d559
2 changed files with 24 additions and 1 deletions

View file

@ -607,7 +607,10 @@ static ULONG WINAPI OleControl_Release(IOleControl *iface)
static HRESULT WINAPI OleControl_GetControlInfo(IOleControl *iface, LPCONTROLINFO pCI)
{
WebBrowser *This = CONTROL_THIS(iface);
FIXME("(%p)->(%p)\n", This, pCI);
TRACE("(%p)->(%p)\n", This, pCI);
/* Tests show that this function should be not implemented */
return E_NOTIMPL;
}

View file

@ -809,6 +809,25 @@ static void test_ie_funcs(IUnknown *unk)
IWebBrowser2_Release(wb);
}
static void test_GetControlInfo(IUnknown *unk)
{
IOleControl *control;
CONTROLINFO info;
HRESULT hres;
hres = IUnknown_QueryInterface(unk, &IID_IOleControl, (void**)&control);
ok(hres == S_OK, "Could not get IOleControl: %08lx\n", hres);
if(FAILED(hres))
return;
hres = IOleControl_GetControlInfo(control, &info);
ok(hres == E_NOTIMPL, "GetControlInfo failed: %08lx, exxpected E_NOTIMPL\n", hres);
hres = IOleControl_GetControlInfo(control, NULL);
ok(hres == E_NOTIMPL, "GetControlInfo failed: %08lx, exxpected E_NOTIMPL\n", hres);
IOleControl_Release(control);
}
static void test_WebBrowser(void)
{
IUnknown *unk = NULL;
@ -826,6 +845,7 @@ static void test_WebBrowser(void)
test_DoVerb(unk);
test_ClientSite(unk, NULL);
test_ie_funcs(unk);
test_GetControlInfo(unk);
ref = IUnknown_Release(unk);
ok(ref == 0, "ref=%ld, expected 0\n", ref);