CorelDraw 4 almost working
Dimitrie O. Paun
dpaun at rogers.com
Sun Jan 5 11:20:40 CST 2003
On January 5, 2003 12:32 pm, Marcus Meissner wrote:
> These are getting passed pointers to 32bit interfaces, but need 16bit
> ones.
Darn! :) I knew I was missing something... What about this one:
Index: dlls/ole32/ole2.spec
===================================================================
RCS file: /var/cvs/wine/dlls/ole32/ole2.spec,v
retrieving revision 1.5
diff -u -r1.5 ole2.spec
--- dlls/ole32/ole2.spec 5 Jan 2003 01:04:34 -0000 1.5
+++ dlls/ole32/ole2.spec 5 Jan 2003 17:13:16 -0000
@@ -1,7 +1,7 @@
1 pascal OleBuildVersion() OleBuildVersion
2 pascal OleInitialize(ptr) OleInitialize
3 pascal OleUninitialize() OleUninitialize
-4 stub DLLGETCLASSOBJECT
+4 pascal DllGetClassObject(ptr ptr ptr) DllGetClassObject16
#5 WEP
6 stub OLEQUERYLINKFROMDATA
7 stub OLEQUERYCREATEFROMDATA
@@ -46,8 +46,8 @@
46 stub MONIKERRELATIVEPATHTO
47 stub MONIKERCOMMONPREFIXWITH
48 stub ISACCELERATOR
-49 stub OLESETCLIPBOARD
-50 stub OLEGETCLIPBOARD
+49 pascal OleSetClipboard(ptr) OleSetClipboard16
+50 pascal OleGetClipboard(ptr) OleGetClipboard16
51 stub OLEDUPLICATEDATA
52 stub OLEGETICONOFFILE
53 stub OLEGETICONOFCLASS
Index: dlls/ole32/ole2stubs.c
===================================================================
RCS file: /var/cvs/wine/dlls/ole32/ole2stubs.c,v
retrieving revision 1.26
diff -u -r1.26 ole2stubs.c
--- dlls/ole32/ole2stubs.c 2 Dec 2002 18:10:58 -0000 1.26
+++ dlls/ole32/ole2stubs.c 5 Jan 2003 17:18:55 -0000
@@ -262,3 +262,22 @@
FIXME("%s\n", debugstr_guid(clsid));
return FALSE;
}
+
+HRESULT WINAPI DllGetClassObject16(REFCLSID rclsid, REFIID iid, LPVOID *ppv)
+{
+ FIXME("(%s, %s, %p): stub\n", debugstr_guid(rclsid), debugstr_guid(iid), ppv);
+ return E_NOTIMPL;
+}
+
+HRESULT WINAPI OleSetClipboard16(IDataObject* pDataObj)
+{
+ FIXME("(%p): stub\n", pDataObj);
+ return E_NOTIMPL;
+}
+
+HRESULT WINAPI OleGetClipboard16(IDataObject** ppDataObj)
+{
+ FIXME("(%p): stub\n", ppDataObj);
+ return E_NOTIMPL;
+}
+
--
Dimi.
More information about the wine-devel
mailing list