From: Piske, H. <Har...@bo...> - 2001-05-08 15:48:19
|
I can confirm the behavior, but the real problem is a bug in the script, not in GUI: *EVERY* GUI object needs a unique name. Add -name => options to both the statusbar and the progressbar below it and the script starts up. | -----Original Message----- | From: Bullock, Howard A. [mailto:HBu...@ty...] [...] | The line shown below causes a fatal error and Perl closes. | | $Status = new GUI::StatusBar($W, | -text => " ", | -width => $W->ScaleWidth, | ); |
From: Bullock, H. A. <HBu...@ty...> - 2001-05-08 16:01:44
|
Thanks for the help in understanding the issue. Now on to testing and learning how use this module... -----Original Message----- From: Piske, Harald [mailto:Har...@bo...] Sent: Tuesday, May 08, 2001 11:48 AM To: 'per...@li...' Subject: RE: [perl-win32-gui-users] DrWatson build 623 mod:558 W2k Pro I can confirm the behavior, but the real problem is a bug in the script, not in GUI: *EVERY* GUI object needs a unique name. Add -name => options to both the statusbar and the progressbar below it and the script starts up. | -----Original Message----- | From: Bullock, Howard A. [mailto:HBu...@ty...] [...] | The line shown below causes a fatal error and Perl closes. | | $Status = new GUI::StatusBar($W, | -text => " ", | -width => $W->ScaleWidth, | ); _______________________________________________ Perl-Win32-GUI-Users mailing list Per...@li... http://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users |
From: Marjolein K. <win...@ja...> - 2001-05-09 05:44:46
|
Talking about status bars - while I have no problem creating a status bar and mn aking it resize with the main window, I wondered if it's possible to create one with different regions. I could really use that since I have different pieces of information I need to show (filename, state, ...) Anyone? Cheers, Marjolein Katsma HomeSite Help - http://hshelp.com/ - Extensions, Tips and Tools |
From: Marjolein K. <win...@ja...> - 2001-05-09 10:44:53
|
Here's what I'm using: # -- define window layout ------------- my $W = new GUI::Window( -name => "MainDialog", -title => "Marjolein's XML DTD Parser v0.0.1", -left => $xposinit, -top => $yposinit, -width => $winwidth, -height => $winheight, -minsize => $minsize, ); my $w = $W->ScaleWidth; my $h = $W->ScaleHeight; # -- set window icon ------------------ my $I = new Win32::GUI::Icon("hsh.ico"); $W->SetIcon($I); # Main window ------------------------- my $SB = $W->AddStatusBar( -name => "Status", -text => "Ready" ); my $statheight = $SB->Height; [... and later on ...] # NOTE: this is always called on init of a resizable window! sub MainDialog_Resize { $w = $W->ScaleWidth; $h = $W->ScaleHeight; $SB->Move(0, $h - $statheight); $SB->Resize($w, $statheight); [...] } At 12:00 2001-05-08 -0400, you wrote: >Thanks for the help in understanding the issue. Now on to testing and >learning how use this module... > >[snip] >| -----Original Message----- >| From: Bullock, Howard A. [mailto:HBu...@ty...] >[...] >| The line shown below causes a fatal error and Perl closes. >| >| $Status = new GUI::StatusBar($W, >| -text => " ", >| -width => $W->ScaleWidth, >| ); Cheers, Marjolein Katsma HomeSite Help - http://hshelp.com/ - Extensions, Tips and Tools |