Beefy Boxes and Bandwidth Generously Provided by pair Networks
Problems? Is your data what you think it is?
 
PerlMonks  

Re^3: Tk::Button: How do I trigger a callback when button is pressed (as opposed to released)?

by Anonymous Monk
on Dec 26, 2012 at 04:08 UTC ( #1010310=note: print w/replies, xml ) Need Help??


in reply to Re^2: Tk::Button: How do I trigger a callback when button is pressed (as opposed to released)?
in thread Tk::Button: How do I trigger a callback when button is pressed (as opposed to released)?

See Perl documentation documentation, Searching Perl Documentation, How to Read Perldocs

 [ddg://site:perlmonks.org Tk Button bind], [tk bind button] site:perlmonks.org Tk Button bind, tk bind button -> How can I un-bind a button in Perl Tk

$ perldoc -l -m Tk C:\citrusperl\vendor\lib\Tk.pm $ ack -hi ">bind.*button" C:\citrusperl\vendor\lib\Tk |tail $mw->bind($class,'<Control-ButtonRelease-1>','Control_ButtonRelease_1 +'); $mw->bind($class,'<ButtonRelease-1>','ButtonRelease_1'); $mw->bind($class,'<B1-Motion>',[ 'Button1Motion' ] ); $mw->bind($class,'<Double-ButtonPress-1>',['Double1']); $mw->bind($class,'<Control-ButtonPress-1>',['CtrlButton1']); $mw->bind($class,'<Control-Double-ButtonPress-1>',['CtrlButton1']); $e->bind('<ButtonRelease-1>' => sub { $e->bind('<ButtonRelease-1>' => undef); $mw->bind($class,'<Button-6>', ['xview','scroll',-1,'units']); $mw->bind($class,'<Button-7>', ['xview','scroll',1,'units']);

$ which -a widget C:/citrusperl/vendor/bin/widget C:/citrusperl/vendor/bin/widget.BAT $ head C:/citrusperl/vendor/bin/widget #!/usr/bin/perl use 5.008; use Config; use Tk 804.000; use lib Tk->findINC( 'demos/widget_lib' ); use Tk::widgets qw/ DialogBox ErrorDialog LabEntry ROText /; use Tk::Config (); use WidgetDemo; use subs qw/

perl Tk help, RFC: Learning Perl/Tk, Perl/Tk: For Beginners, Re^3: Tkx Search for dialog box for text input , Re: TclTk interface with Perl code, is it possible? , Re^2: GUI toolkit+designer for the perl newbie , Re: Easier GUI, Re: Should I use Perl/TK?, Re^2: need a popup gui stdin, Tk Tree Tutorial ( http://www.rtapo.com/tutorials/tk_tree.html ), some Tkx tutorial links, Tutorial http://theoryx5.uwinnipeg.ca/perltk/ and http://www.perl.com/pub/1999/10/perltk/, http://perltk.org/, http://web.archive.org/web/20100310202528/http://theoryx5.uwinnipeg.ca/perltk/

Leverage all available resources :)

  • Comment on Re^3: Tk::Button: How do I trigger a callback when button is pressed (as opposed to released)?
  • Select or Download Code

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1010310]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others scrutinizing the Monastery: (8)
As of 2020-02-28 16:11 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    What numbers are you going to focus on primarily in 2020?










    Results (124 votes). Check out past polls.

    Notices?