[Bug 7579] New: graphics output of MaCom2.dll does not work

[Wine Bugs]

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

Summary: graphics output of MaCom2.dll does not work
           Product: Wine
           Version: 0.9.31.
          Platform: PC
        OS/Version: Linux
            Status: UNCONFIRMED
          Severity: normal
          Priority: P2
         Component: wine-opengl
        AssignedTo: [e-mail]
        ReportedBy: [e-mail]

MaCom2.dll is a library providing functions for building ecological forest
models developed by H. Hildenbrandt and U. Berger at the Centre for Tropical
Marine Ecology in Bremen, Germany. MaCom2 is not open source at the moment but
is freely available on request from the authors.

Library functions are called from a user-supplied script (using, e.g., Python)
via DCOM.The library provides functions for generating 3D/OpenGL representations
of the modeled forest while the script is running.

Here is what I do to install MaCom2:

- install python2.5 and pywin32 (www.python.org)
- register the dll (gdiplus.dll has to be available when doing this)

regsvr32 MaCom2.dll

- call the script, e.g.

wine test_OpenGL.py

A window opens, however, the contents is not displayed. This used to work some
wine versions ago. The content of the script is appended below.

Another funny thing is that the program does not stop when the window is closed
(it does on MS Windows). Possibly this is a separate bug.

I'll attach a log file with WINDEDEBUG=+all. I am grateful for any hint how to
produce more helpful error logs.

Thanks for your help! Ulf

#!/usr/local/bin/wine /home/ulf/.wine/drive_c/Program Files/Python25/pythonw.exe
# -*- coding: utf-8 -*-
import win32com.client
import random
m = win32com.client.Dispatch('MaCom2.Mangroven')
m.Init(110, 110, 3)
m.Show(4, -10, -10, 110, 110)
for i in range(0, 10):
    x = random.uniform(0, 100)
    y = random.uniform(0, 100)
    m.Trees().Add (x, y, 1)
for ts in range(0, 3):
    m.Title = 'Time step ' + str(ts)
    for tree in m.Trees():
        tree.age = ts
        tree.Grow(1.0)
    m.Update()
m.WaitForClose()