Stephen O. Lidie > Tk-SlideSwitch-1.1 > Tk::SlideSwitch

Download:
Tk-SlideSwitch-1.1.tar.gz

Dependencies

Annotate this POD

View/Report Bugs
Module Version: 1.1   Source  

NAME ^

Tk::SlideSwitch - a 2 position horizontal or vertical switch.

SYNOPSIS ^

 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/);

DESCRIPTION ^

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.

EXAMPLE ^

See Synopsis.

BUGS ^

This widget uses only the pack geometry manager.

AUTHOR ^

sol0@Lehigh.EDU

Copyright (C) 2002 - 2003, Steve Lidie. All rights reserved.

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

KEYWORDS ^

SlideSwitch, Scale

syntax highlighting: