http://bugs.winehq.org/show_bug.cgi?id=9039
------- Additional Comments From dank@kegel.com 2007-22-07 07:16 ------- Oddly, the very next app I tried was also a Delphi app, and had what seems to be the same problem. The user report was at http://groups.google.com/group/comp.emulators.ms-windows.wine/msg/14c5930a29... and I ran the demo, downloadable from http://www.parishdata.com/churchoffice The app installs and starts ok, but the "Web News" popup won't go away! Clicking its 'Close' button showed the log messages
fixme:shdocvw:WebBrowser_QueryInterface (0x1b1e28)->({376bd3aa-3845-101b-84ed-08002b2ec713} 0x7678f0c) interface not supported fixme:shdocvw:OleControl_OnAmbientPropertyChange Unknown dispID -1 ... fixme:shdocvw:navigate_url Unsupported arguments fixme:iphlpapi:NotifyAddrChange (Handle 0x7d6479e8, overlapped 0x7d6479cc): stub err:ole:CoGetClassObject class {4955dd33-b159-11d0-8fcf-00aa006bcc59} not registered err:ole:CoGetClassObject no class object {4955dd33-b159-11d0-8fcf-00aa006bcc59} could be created for context 0x1
and the app complained An error has been detected. This error should never happen under normal conditions.... The error is OLE error 80004001 Extra information: Comobj.DispCallError Comobj.DispatchInvokeError Olectrls.TOleControl.GetWordBoolProp (OleCtrls.pas, line 1175) Pdswebnewsunit.TfrmWebNews.Button1Click(PDSWebNewsUnit.pas, line 92) Controls.TControl.Click(Controls.pas, line 4296)
Clicking "OK" on the error dialog brought me right back to where I started, with the "Web News" window inviting me to click "Close". (Fortunately, clicking the go-away box in the upper right corner of the Web News decoration lets the app continue.) Native dcom doesn't help. So that's a bit more evidence that it's really a shdocvw error.