[Bug 9039] GS-Auftrag Professional SQL aborts on startup

[Wine Bugs]

http://bugs.winehq.org/show_bug.cgi?id=9039





------- Additional Comments From dank at 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/14c5930a293ba5ee
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.

-- 
Configure bugmail: http://bugs.winehq.org/userprefs.cgi?tab=email
------- You are receiving this mail because: -------
You are the assignee for the bug, or are watching the assignee.