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

2001-06-01 Thread 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

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

2001-06-01 Thread Webmaster CZ
Hi ! I would like to change the background - color from my main-window : # $bgWindow = $Window->AddLabel( -name => "bgWindow", -left => 0, -top => 0, -width => $screensize_width, -height => $screensize_height, -background => "#".$BackgroundRed.$BackgroundGre

Re: [perl-win32-gui-users] Taskbar & perl2exe -gui crash

2001-05-26 Thread Webmaster CZ
Hi ! > $_ = Win32::GUI::FindWindow ("Shell_TrayWnd", ""); > @_ = Win32::GUI::GetWindowRect ($_); > > $width = $_[2] - $_[0]; > $height = $_[3] - $_[1]; ok - thx ... works fine cu Thorsten S.

[perl-win32-gui-users] Taskbar & perl2exe -gui crash

2001-05-23 Thread Webmaster CZ
Hi ! I have two problems: a) My program start in maximal width & height with this code: -Code $screensize= Win32::GUI::GetDesktopWindow(); $screensize_width = Win32::GUI::Width($screensize); $screensize_height = Win32::GUI::Height($screensize); -Code-

[perl-win32-gui-users] Bug with -readonly

2001-04-10 Thread Webmaster CZ
Hi ! (Sorry for the bad english...) If i write for example $LogText = $LogWindow->AddTextfield( -name => "LogText", -left => 1, -top => 1, -width => 280, -height=> 80, -font => $LogFont, -background => "#FF", -for