NAME

Tk::FireButton - Button that keeps invoking command when pressed

SYNOPSIS

    use Tk::FireButton;

    $fire = $parent->FireButton( ... );

    # May/should change:
    $w->Whatever(... -bitmap => $Tk::FireButton::INCBITMAP, ...);
    $w->Whatever(... -bitmap => $Tk::FireButton::DECBITMAP, ...);

DESCRIPTION

FireButton is-a Button widget (see Tk::Button) that keeps invoking the callback bound to it as long as the <Button> is pressed.

SUPER-CLASS

The FireButton widget-class is derived from the Button widget-class and inherits all the methods and options its super-class (see Tk::Button).

STANDARD OPTIONS

FireButton supports all the standard options of a Button widget. See options for details on the standard options.

WIDGET-SPECIFIC OPTIONS

Name: repeatDelay

Class: RepeatDelay

Switch: -repeatdelay

Fallback: 300 (milliseconds)

Specifies the amount of time before the callback is first invoked after the Button-1 is pressed over the widget.

Name: repeatInterval

Class: RepeatInterval

Switch: -repeatinterval

Fallback: 100 (milliseconds)

Specifies the amount of time between invokations of the callback bound to the widget with the command option.

CHANDED DEFAULTS

The fallback values of the following options as different from the Button widget:

        -anchor             => 'center',
        -highlightthickness => 0,
        -takefocus          => 0,
        -padx               => 0,
        -pady               => 0,

METHODS

Same as for Tk::Button.

ADVERTISED WIDGETS

None.

HISTORY

The code was extracted Tk::NumEntry and slightly modified by Achim Bohnet <ach@mpe.mpg.de>. Tk::NumEntry's author is Graham Barr <gbarr@pobox.com>.

FUTURE

Convert it to a library so one could use

   use Tk::Lib::Fire;
   ...
   @ISA = qw(... Tk::Lib::Fire ... )
   ...
   $widget->bindFire(startEvent, cancalEvent);

so one could use it with button press/release, entry up/down, ...