Tk::FlatRadiobutton - Flacher Radiobutton mit Farbindikator

Tk::FlatRadiobutton ist eine Alternative zu Tk::Radiobutton (das Widget, das so aussieht, wie ein HTML-Radio-Button). Der Umstand, welcher Radiobutton einer Radio-Gruppe aktiviert ist wird nicht durch einen kleinen schwarzen Kreis dargestellt, sondern durch ein kleines fabriges Rechteck in der unteren rechten Ecke des Radiobuttons (s. Screenshot).


Code-Beispiel für Tk::FlatRadiobutton

#!perl

use strict;
use warnings;
use utf8;
use Tk;
use Tk::FlatRadiobutton;

my $mw = tkinit();

my $variable = 'Über';

$mw->FlatRadiobutton(
	-text => 'Über',
	-value => 'Über',
	-variable => \$variable,
	-raiseonenter => 1,
)->pack();

$mw->FlatRadiobutton(
	-text => 'Unter',
	-value => 'Unter',
	-variable => \$variable,
	-raiseonenter => 1,
)->pack();

$mw->MainLoop();
Top