olefont: GetIDsOfNames

[Walt Ogburn]

Changelog:
	Implement IFontDisp::GetIDsOfNames

--

Test is in the patch after next.
-------------- next part --------------
Index: dlls/oleaut32/olefont.c
===================================================================
RCS file: /home/wine/wine/dlls/oleaut32/olefont.c,v
retrieving revision 1.47
diff -u -p -r1.47 olefont.c
--- dlls/oleaut32/olefont.c	13 Sep 2005 10:36:54 -0000	1.47
+++ dlls/oleaut32/olefont.c	14 Sep 2005 01:32:27 -0000
@@ -1268,11 +1268,18 @@ static HRESULT WINAPI OLEFontImpl_GetIDs
   LCID        lcid,
   DISPID*     rgDispId)
 {
+  ITypeInfo * pTInfo;
+  HRESULT hres;
+
   OLEFontImpl *this = impl_from_IDispatch(iface);
-  FIXME("(%p,%s,%p,%d,%04x,%p), stub!\n", this, debugstr_guid(riid), rgszNames,
-	cNames, (int)lcid, rgDispId
-  );
-  return E_NOTIMPL;
+  TRACE("(%p,%s,%p,%d,%04x,%p)\n", this, debugstr_guid(riid), rgszNames,
+       cNames, (int)lcid, rgDispId);
+  if (S_OK != OLEFontImpl_GetTypeInfo (iface, 0, lcid, &pTInfo))
+    ERR("GetTypeInfo failed.\n");
+  hres = DispGetIDsOfNames (pTInfo, rgszNames, cNames, rgDispId);
+
+  ITypeInfo_Release(pTInfo);
+  return hres;
 }
 
 /************************************************************************