Re: [perl-win32-gui-users] color change (lable)...

[Webmaster CZ]

I have it found:

I write the *init code* into a ...:

#######

&init_background();

sub init_background {
    $bgWindow = $Window->AddLabel(
         -name      => "bgWindow",
         -left      => 0,
         -top       => 0,
         -width  => $screensize_width,
         -height => $screensize_height,
         -background => "#".$BackgroundRed.$BackgroundGreen.$BackgroundBlue,
    );
}
#########

and now i say anywhere

######
$BackgroundRed = "59";
$BackgroundGreen = "12";
$BackgroundBlue = "00";

&init_background();
######

and it's work fine until now ;-)

cu

Thorsten Sommer