|
 |
|
|
|
|
|
|
|
|
Mit den Zeilen
|
|
|
my $f1 = $mw->Frame(-relief => 'sunken',
|
|
|
-width => '50',
|
|
|
-height => '50',
|
|
|
-borderwidth =>
'1',
|
|
|
)
|
|
|
->pack();
|
|
|
wird
ein Rahmenelement (Frame) $f1 mit den Maßen 50x50 Pixeln und der
|
|
Randbreite
1 Pixel erzeugt und in das
Hauptfenster $wm gepackt.
|
|
|
Es
hat die Reliefart „sunken“. Außerdem gibt es noch die
Reliefarten raised, flat,
|
ridge, solid und groove (vergleiche perldoc Tk::options). Diese
|
|
Reliefarten
kann man auch bei anderen Widgets setzen, die Defaultwerte der
|
|
Reliefart
sind von Widget zu Widget unterschiedlich.
|
|
|
|