mshtml: Added IHTMLScreen::get_availHeight implementation.

dlls/mshtml/htmlscreen.c

@@ -186,8 +186,15 @@ static HRESULT WINAPI HTMLScreen_get_updateInterval(IHTMLScreen *iface, LONG *p)
 static HRESULT WINAPI HTMLScreen_get_availHeight(IHTMLScreen *iface, LONG *p)
 {
     HTMLScreen *This = impl_from_IHTMLScreen(iface);
-    FIXME("(%p)->(%p)\n", This, p);
-    return E_NOTIMPL;
+    RECT work_area;
+
+    TRACE("(%p)->(%p)\n", This, p);
+
+    if(!SystemParametersInfoW(SPI_GETWORKAREA, 0, &work_area, 0))
+        return E_FAIL;
+
+    *p = work_area.bottom-work_area.top;
+    return S_OK;
 }
 
 static HRESULT WINAPI HTMLScreen_get_availWidth(IHTMLScreen *iface, LONG *p)

dlls/mshtml/tests/dom.c

@@ -3920,6 +3920,7 @@ static void test_screen(IHTMLWindow2 *window)
 {
     IHTMLScreen *screen, *screen2;
     IDispatchEx *dispex;
+    RECT work_area;
     LONG l, exl;
     HDC hdc;
     HRESULT hres;
@@ -3965,6 +3966,13 @@ static void test_screen(IHTMLWindow2 *window)
 
     DeleteObject(hdc);
 
+    SystemParametersInfoW(SPI_GETWORKAREA, 0, &work_area, 0);
+
+    l = 0xdeadbeef;
+    hres = IHTMLScreen_get_availHeight(screen, &l);
+    ok(hres == S_OK, "get_availHeight failed: %08x\n", hres);
+    ok(l == work_area.bottom-work_area.top, "availHeight = %d, expected %d\n", l, work_area.bottom-work_area.top);
+
     IHTMLScreen_Release(screen);
 }