Tk::Frame - Kontainer zur Strukturierung des Programms

Das Frame-Widget ist ein Containerwidget. Es ist prinzipiell unsichtbar, erlaubt aber die Gruppierung diverser anderer, sichtbarer Widgets. Die gruppierten Widgets müssen das Frame als Parent haben.

#!perl

use strict;
use warnings;
use Tk;

my $mw = MainWindow->new(
	-title  => 'Frames',
	-width  => 800,
	-height => 600,
);

my $frame1 = $mw->Frame(
	-bg     => 'black',
	-height => 60,
	-width  => 80,
)->pack( -side => 'left', );

my $frame2 = $mw->Frame(
	-bg     => 'red',
	-height => 60,
	-width  => 80,
)->pack( -side => 'left', );

my $frame3 = $mw->Frame(
	-bg     => 'gold',
	-height => 60,
	-width  => 80,
)->pack( -side => 'left', );

$mw->MainLoop();
Top