Tk::MinMaxScale - Interval mit zwei Slidern auswählen

Mit der Tk::MinMaxScale kann man einen Bereich auswählen. Dazu werden zwei Scales angeboten, wobei auf der einen das Minimum selektiert wird und auf der anderen das Maximum. Die Scales sind miteinander verknüpft. Das Minimum kann nie größer sein als das Maximum (und andersherum).

#!perl

use strict;
use warnings;
use Tk;
use Tk::MinMaxScale;

my $mw = tkinit();

my $mms = $mw->MinMaxScale(
	-labelmin => 'Min:',
	-labelmax => 'Max:',
);

$mms->pack;


$mw->MainLoop;
exit(0);
Top