From: Chris W. <ch...@vi...> - 2004-01-19 06:25:02
|
Hi All Having trouble with the new Statusbar additions: tried different combinations of PARTS to start dividing, but no matter what I've tried nothing seems to work. What order do the methods need to be called? I've had a look at MSDN Status Bars and read the notes that Steve posted on announcing the enhancements. Confused in that MSDN says that Parts is (nParts[array of widths]) I've tried $Window_Status->Parts([200,100,-1]); and Parts(3,[200,100,-1]) Can someone add a few of the methods to the example below. Chris # ============================ use Win32::GUI; my $Window = new GUI::Window( -title => "Statusbar example", -left => 100, -top => 100, -width => 400, -height => 200, -name => "Window", -events =>{ Terminate => sub { return -1 }, } ); # Add a Status Bar my $Window_Status = $Window->AddStatusBar( -name => "Window_Status", -text => "Panel 1" ); $Window->Show; Win32::GUI::Dialog; |
From: Jez W. <je...@je...> - 2004-01-19 09:53:15
|
Hi, The code below creates a status bar with 3 parts. If run in the samples directory, will place an icon in one of the parts. Cheers, jez. ================ use Win32::GUI; use strict; my $Icon = new Win32::GUI::Icon("camel.ico"); my $W = new GUI::Window( -title => "Win32::GUI::status test", -left => 100, -top => 100, -width => 300, -height => 200, -name => "Window", ); my $status=$W->AddStatusBar( -name => "Status", ); $status->Parts(70,200,-1); #three parts $status->PartText(0,'Part 1'); #set the text $status->PartText(1,'Part 2'); $status->Icon(2,$Icon); #set the icon $W->Show; Win32::GUI::Dialog; ----- Original Message ----- From: "Chris Wearn" <ch...@vi...> To: <per...@li...> Sent: Monday, January 19, 2004 6:29 AM Subject: [perl-win32-gui-users] Statusbar example > Hi All > > Having trouble with the new Statusbar additions: > > tried different combinations of PARTS to start dividing, but no matter what > I've tried nothing seems to work. What order do the methods need to be > called? > > I've had a look at MSDN Status Bars and read the notes that Steve posted on > announcing the enhancements. Confused in that MSDN says that Parts is > (nParts[array of widths]) > > I've tried $Window_Status->Parts([200,100,-1]); and > Parts(3,[200,100,-1]) > > Can someone add a few of the methods to the example below. > > Chris > > > # ============================ > > use Win32::GUI; > > my $Window = new GUI::Window( > -title => "Statusbar example", > -left => 100, > -top => 100, > -width => 400, > -height => 200, > -name => "Window", > -events =>{ > Terminate => sub { return -1 }, > } > ); > > # Add a Status Bar > my $Window_Status = $Window->AddStatusBar( > -name => "Window_Status", > -text => "Panel 1" > ); > > $Window->Show; > Win32::GUI::Dialog; > > > > ------------------------------------------------------- > The SF.Net email is sponsored by EclipseCon 2004 > Premiere Conference on Open Tools Development and Integration > See the breadth of Eclipse activity. February 3-5 in Anaheim, CA. > http://www.eclipsecon.org/osdn > _______________________________________________ > Perl-Win32-GUI-Users mailing list > Per...@li... > https://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users |