Tk::demos::widget_lib::slide3pm

Usage

 use Tk::SlideSwitch;
 my $sl = $frame1->SlideSwitch(
     -bg          => 'gray',
     -orient      => 'horizontal',
     -command     => [$self => 'on'],
     -llabel      => [-text => 'OFF', -foreground => 'blue'],
     -rlabel      => [-text => 'ON',  -foreground => 'blue'],
     -troughcolor => 'tan',
 )->pack(qw/-side left -expand 1/);

Overview

Tk::SlideSwitch is a Frame based composite mega-widget featuring a binary Scale widget surrounded by two Label widgets. The Scale's value can be either 0 or 1. The Labels are positioned to the left and right of the Scale if its orientation is horizontal, else on the top and bottom of the Scale.

Options

In addition to all Scale options, the following option/value pairs are also supported:

-llabel

A reference to an array of left (or top) Label configuration options.

-rlabel

A reference to an array of right (or bottom) Label configuration options.

Methods

There are no special methods.

Advertised widgets

Component subwidgets can be accessed via the Subwidget method. This mega widget has no advertised subwidgets.

Examples

See Synopsis.

Keywords

SlideSwitch, Scale