| Tickit::Widget::Border(3pm) | User Contributed Perl Documentation | Tickit::Widget::Border(3pm) |
"Tickit::Widget::Border" - draw a fixed-size border around a widget
use Tickit;
use Tickit::Widget::Border;
use Tickit::Widget::Static;
my $border = Tickit::Widget::Border->new
->set_child(
Tickit::Widget::Static->new(
text => "Hello, world",
align => "centre",
valign => "middle",
)
);
Tickit->new( root => $border )->run;
This container widget holds a single child widget and implements a border by using Tickit::WidgetRole::Borderable.
The default style pen is used as the widget pen.
$border = Tickit::Widget::Border->new( %args );
Constructs a new "Tickit::Widget::Border" object.
Takes arguments having the names of any of the "set_*" methods listed below, without the "set_" prefix.
$lines = $border->top_border; $border->set_top_border( $lines );
Return or set the number of lines of border at the top of the widget
$lines = $border->bottom_border; $border->set_bottom_border( $lines );
Return or set the number of lines of border at the bottom of the widget
$cols = $border->left_border; $border->set_left_border( $cols );
Return or set the number of cols of border at the left of the widget
$cols = $border->right_border; $border->set_right_border( $cols );
Return or set the number of cols of border at the right of the widget
$border->set_h_border( $cols );
Set the number of cols of both horizontal (left and right) borders simultaneously
$border->set_v_border( $cols );
Set the number of lines of both vertical (top and bottom) borders simultaneously
$border->set_border( $count );
Set the number of cols or lines in all four borders simultaneously
Paul Evans <leonerd@leonerd.org.uk>
| 2024-01-02 | perl v5.36.0 |