develooper Front page | perl.tcltk | Postings from November 2021

help Keyboard and Tk

Thread Next
From:
leglaude
Date:
November 8, 2021 05:04
Subject:
help Keyboard and Tk
Message ID:
5E539DDEB80344B89CAD16BF5F8CEE6E@DESKTOPMQ213KV
Hi all,

I have a litle Script perl Tk.

It's simple,
I press a key in my keyboard, and I can see the name key in the terminal with a print.

All key good, but I have a problem with the key f10.

I can see F10 in the consol, no problem.
But in windows 10, f10 open the menu.

Can you help me to solve the problem?
Thanks!
This is my script.

use Tk; 

$mw = MainWindow->new;

$mw->bind("<Key>", [ sub {
print "Touche : $_[1]\n";
 }, 
                     Ev('K')] ); 
MainLoop;
Thread Next


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About