OpenEuphoria

2 buttons

• Posted by "M. Schut" <m.schut at TWI.TUDELFT.NL> Jun 12, 1999
• 352 views

I've noticed that when I create two overlapping buttons with David Cuny's
'win32lib.ew' and I make the 'front'-button invisible, Euphoria will
continue extremely slow (or not at all).

I was wondering whether this is a bug in win32lib, or is it standard
Windows-behaviour? I suppose there is something going wrong with the
windows-messaging. The 'front'-button is sending an update-message to the
'back'-button and the 'back'-button on his turn is sending an update-message
to the 'front'-button.

Is there a way to come around this problem (other then using 1 button, which
will change it's label, when needed)?

Bye,

Martin Schut


----------
Example-code:

include win32lib.ew
global constant
    winMain  = create(Window, "Example Main", 0, 275, 212, 555, 350, 0)

constant
    btnTest1      = create(PushButton, "&Test1", winMain, 459, 8, 81, 33,
0),
    btnTest2      = create(PushButton, "&Test2", winMain, 459, 8, 81, 33, 0)

procedure onOpen_winMain()
    setWindowBackColor(winMain, c_func(xGetSysColor, {COLOR_BTNFACE}))

    setVisible(btnTest1, 0)
end procedure

onOpen[winMain] = routine_id("onOpen_winMain")
WinMain(winMain)