NAME

Tk::Multi::Text - Tk composite widget with a scroll window and more

SYNOPSIS

 use Tk::Multi::Manager;

 use Tk::Multi::Text ; 

 my $manager = yourWindow -> MultiManager 
  (
   menu => $menu_ref , # optionnal
   title => "windows" # optionnal
  ) -> pack ();

 # Don't pack it, the managet will do it
 my $w1 = $manager -> newSlave('type' => 'MultiText', 'title' => 'a_label');

DESCRIPTION

This composite widget features :

• a scrollable read-only text window (based on ROtext)

• A print menu button (The shell print command may be modified by setting $Tk::Multi::Text::printCmd to the appropriate shell command. By default, it is set to 'lp -ol70 -otl66 -o12 -olm10')

• a clear menu button.

This widget will forward all unrecognize commands to the ROtext object.

Note that this widget should be created only by the Multi::Manager.

WIDGET-SPECIFIC OPTIONS

title

Some text which will be displayed above the test window.

menu_button

The log window feature a set of menu items which must be added in a menu. This menu ref must be passed with the menu_button prameter to the object during its creation.

data

A string which will be displayed in the text window.

WIDGET-SPECIFIC METHODS

insertText($some_text)

Insert the passed string at the bottom of the text window

print

Will raise a popup window with an Entry to modify the actual print command, a print button, a default button (to restore the default print command), and a cancel button.

clear

Is just a delete('1.0','end') .

Delegated methods

By default all widget method are delegated to the Text widget. Excepted :

command(-label => 'some text', -command => sub {...} )

Delegated to the menu entry managed by Multi::Manager. Will add a new command to the aforementionned menu.

TO DO

Defines ressources for the config options.

AUTHOR

Dominique Dumont, domi@komarr.grenoble.hp.com

Copyright (c) 1997-1998,2004 Dominique Dumont. All rights reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

SEE ALSO

perl(1), Tk(3), Tk::Multi(3), Tk::Multi::Manager(3)

cpanm Tk::Multi::Any

perl -MCPAN -e shell
install Tk::Multi::Any