Opened by Gast at 2006-12-03 11:11
User since
2003-11-28
3645 Artikel
ModeratorIn
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2003-11-28
3645 Artikel
ModeratorIn
Wenn man es tatsächlich häufiger brauchen würde, könnte man ein Megawidget schreiben. Und mit verschachtelten Frames kann man auch einen 3D-Effekt erzeugen:
\n\n
<!--EDIT|ptk|1165159967-->
Code: (dl
)
1
2
3
4
5
6
use Tk;
$top = new MainWindow;
$top->packPropagate(0);
$f_outer = $top->Frame(-borderwidth => 10, -relief => "raised", -bg => "blue")->pack(qw(-fill both -expand 1));
$f_outer->Frame->pack(qw(-fill both -expand 1));
MainLoop;
<!--EDIT|ptk|1165159967-->