Hi,
this is a verry limited implementation of the funtion but it is enough for the
program i am trying to run ;-)
Changelog
------------
partial implementaion of VarBstrFromDec
--- dlls/oleaut32/variant.c.1 Fri May 16 16:29:12 2003
+++ dlls/oleaut32/variant.c Fri May 16 20:09:58 2003
@@ -3637,7 +3637,10 @@
* VarBstrFromDec [OLEAUT32.@]
*/
HRESULT WINAPI VarBstrFromDec(DECIMAL* pDecIn, LCID lcid, ULONG dwFlags, BSTR* pbstrOut)
-{ FIXME("%c%08lx%08lx%08lx E%02x stub\n",
+{ if(!pDecIn->u.s.sign && !pDecIn->u.s.scale &&
+ !pDecIn->Hi32 && !pDecIn->u1.s1.Mid32)
+ return VarBstrFromUI4(pDecIn->u1.s1.Lo32, lcid, dwFlags, pbstrOut);
+ FIXME("%c%08lx%08lx%08lx E%02x stub\n",
(pDecIn->u.s.sign == DECIMAL_NEG) ? '-' :
(pDecIn->u.s.sign == 0) ? '+' : '?',
pDecIn->Hi32, pDecIn->u1.s1.Mid32, pDecIn->u1.s1.Lo32,
