I cannot manage to get a main windows background to properly change
color when using the following code:
my $winBackBrush = new Win32::GUI::Brush(-color => [0,255,0]) or
die("Could not create Brush\n");
my $clsWepEd = new Win32::GUI::Class(
-name => "classWindowBack",
-brush => $winBackBrush,
#-color => 2,
) or die("Could not create Class\n");
my $win = new Win32::GUI::Window(
-name => "WinMain",
-pos => [100, 100],
-size => [100, 100],
-pushexstyle => WS_EX_CLIENTEDGE,
-class => $clsWepEd,
);
This is essentially a rework of the following "working" code from
http://sourceforge.net/mailarchive/message.php?msg_id=10081682
Which, btw, doesn't work for me anyways.
Any ideas?
WinXP SP2
ActiveState 5.8.4
Win32::GUI 1.0