Win32::GUI::GridLayout - Grid layout support for Win32::GUI |
Win32::GUI::GridLayout - Grid layout support for Win32::GUI
use Win32::GUI:: use Win32::GUI::GridLayout;
# 1. make a "static" grid $grid = new Win32::GUI::GridLayout(400, 300, 3, 3, 0, 0); $win = new Win32::GUI::Window( $win->AddLabel( -name => "label1", -text => "Label 1", -width => $grid->width(35), -height => $grid->height(11), -left => $grid->col(1, "left"), -top => $grid->row(1, "top"), ); # 2. make a "dynamic" grid $grid = apply Win32::GUI::GridLayout($win, 3, 3, 0, 0); or $grid = apply Win32::GUI::GridLayout($win, [qw(10 * * 10)], [qw(10 * 40)], 0, 0); $win->AddLabel( -name => "label1", -text => "Label 1", ); $grid->add($win->label1, 1, 1, "left top"); or $grid->add($win->label1, [2..3], 1, "justify justify");
$grid->recalc();
ROWS - quantity of rows or arrayref of height rows (number - absolute height, * - relative height)
col()
and row()
methods),
separated by at least one blank and/or a comma.
Example:
$grid->add($win->label1, 1, 1, "left top"); or $grid->add($win->label1, [2..3], 1, "justify top");
COL and ROW may be arrayref for adds CONTROL into more than one cell. If ALIGN is justify (j) than CONTROL expands up to cell.
-left
option when creating a control.
ALIGN can be left
, center
or right
(can be
shortened to l
, c
, r
); default is left
.
Note that for alignment to work properly, the width()
and height()
methods must have been previously
called.
Example:
$win->AddLabel( -name => "label1", -text => "Label 1", -width => $grid->width(35), -height => $grid->height(11), -left => $grid->col(1, "left"), -top => $grid->row(1, "top"), );
draw()
apply()
constructor.
height(N)
-height
option
when creating a control.
Example: see col().
recalc()
apply()
constructor.
Example:
sub Window_Resize { $grid->recalc(); }
-top
option when creating a control.
ALIGN can be top
, center
or bottom
(can be
shortened to t, c, b); default is top.
Note that for alignment to work properly, the width()
and height()
methods must have been previously
called.
Example: see col().
width(N)
-width
option
when creating a control.
Example: see col().
Original Author Mike Kangas ( kangas@anlon.com
);
additional coding by
Aldo Calpini ( dada@perl.it
),
Alexander Romanenko ( alex@parom.biz
),
Robert May ( robertemay@users.sourceforge.net
).
Copyright (C) 1999..2005 by Mike Kangas Copyright (C) 2006 by Robert May
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
Win32::GUI::GridLayout - Grid layout support for Win32::GUI |