I strongly suggest that you read this before adding new rows of tabs. One of thing covered is a more pleasant alternative.

Very good! Thanks biochris

From Mastering Perl/Tk by Steve Lidie & Nancy Walsh published by O'Reilly.

"NoteBook Limitations - pg 580 - You can't have the tabs for a NoteBook automatically wrap around and make more than one line of tabs. Consequently, you might make so many tabs that your window will be too big to be displayed properly. In that case, you might consider having a page contain another NoteBook widget, which will essentially give you two rows of tabs."

This would imply that you can use multiple NoteBook widgets on a page. So a quick test.

use strict;
use Tk;
use Tk::NoteBook;

my $MainWindow = MainWindow->new(-title => 'Testing Notebook Widgets')
+;

my $FirstNoteBook = $MainWindow->NoteBook()->pack(-expand => 1, -fill=
+>'both');
my $SecondNoteBook = $MainWindow->NoteBook()->pack(-expand => 1, -fill
+ => 'both');

my $PageOne = $FirstNoteBook->add('page1', -label=> 'NB 1 Page 1');
my $PageTwo = $FirstNoteBook->add('page2', -label=> 'NB 1 Page 2');
my $PageThree = $SecondNoteBook->add('page3', -label=> 'NB 2 Page 1');
my $PageFour = $SecondNoteBook->add('page4', -label=> 'NB 2 Page 2');

MainLoop;
[download]

This fired up fine with four tabs and blank pages. Now there may be some considerations depending on how you want the output of each page displayed.

Thanks for the snipet. biochris

It was there to show that you can have multipe notebook widgets on one main window, you would need to keep track of what you would call front row and back row and dynamically update the title of the pages to have this work like a multi row notebook page. Not too terribly hard but not efficient. I agree with most said about trying to visualise the data differently if you find space issues with this particular widget.

"No matter where you go, there you are." BB

From a UI point of view, too many tabs, like you see in some Windows dialogs, make my eyes cross :) At some point, I think it would be better to go with with ListBox of categories, where clicking on a category brings up the associated dialog.

You might also consider Tk::DynaTabFrame as an alternative. The widget takes care of too many tabs by stacking them and having left/right arrows to scroll through them, similar to the worksheet tab interface in Excel.

Great help. Thanks very much biochris

not exactly your code, but very closely related example is at http://vkonovalov.ru/cgi-bin/perl-tcltk-wiki.cgi/40

Looks very interesting. Thanks biochris

Also FWIW: Tk::DTF has a few other recently added niceties you might find useful:

• tiny close buttons in the tab (optional)
• orientable tabs - i.e., you pick the side, and edge to align on
• a flash operation.

Have fun!

I am not an expert in perl but I will try it! Thanks anyway. biochris