[Bug 5174] macom2.dll does not work with wine dcom

[wine-bugs at winehq.org]

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





--- Comment #24 from Ulf Mehlig <ulf.mehlig at gmx.net>  2008-04-09 12:51:55 ---
#!/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(w=110, h=110, scale=3)

m.DefaultColor(1, m.MakeColor(255,   0,   0, 0))
m.DefaultColor(2, m.MakeColor(  0, 255,   0, 0))
m.DefaultColor(3, m.MakeColor(  0,   0, 255, 0))

m.Show(_MIDL_0011_=4, x1=-10, y1=-10, x2=110, y2=110)

for i in range(0, 10):
    x = random.uniform(61, 90)
    y = random.uniform( 0, 30)
    m.Trees().Add (x=x, y=y, type=1)

    x = random.uniform(31, 60)
    y = random.uniform(31, 60)
    m.Trees().Add (x=x, y=y, type=2)

    x = random.uniform( 0, 30)
    y = random.uniform(61, 90)
    m.Trees().Add (x=x, y=y, type=3)

for ts in range(0, 221):
    m.Title = 'Time step ' + str(ts)

    for tree in m.Trees():
        tree.age = ts
        tree.Grow(koorFakt=1.0)

    m.Update()

m.WaitForClose()


-- 
Configure bugmail: http://bugs.winehq.org/userprefs.cgi?tab=email
Do not reply to this email, post in Bugzilla using the
above URL to reply.
------- You are receiving this mail because: -------
You are watching all bug changes.