Hi,
I am trying to write a TK notebook script:
use strict;
use Tk;
use Tk::NoteBook;
my $mw = MainWindow->new();
my $nb = $mw->NoteBook()->pack(-expand => 1, -fill=>'both');
my $p1 = $nb->add('page1', -label=> 'Page 1');
my $p2 = $nb->add('page2', -label=> 'Page 2');
my $p3 = $nb->add('page3', -label=> 'Page 3');
my $p4 = $nb->add('page4', -label=> 'Page 4');
MainLoop;
But what I want is to display the tabs/pages on the left side.
How?
thanks
Dan
_______________________________________________
Perl-Win32-Users mailing list
Perl-Win32-Users@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
