Bonjour à tous.
Je suis non-voyant, et débutant en langage perl.
J'utilise un logiciel de revu d'écran appelé JAWS.
J'ai un petit Script perl Tk, qui renvoi dans un print dans la consol la touche qui a été pressée.
J'ai un soucis avec la touche f10.
Mon script renvoi bien la touche, mais la bar de menu de windows s'ouvre sur ma fenêtre Tk.
J'aurai besoin d'une âme charitable pour régler ce problème!!
merci par avance!
Voici mon script.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8 use Tk; $mw = MainWindow->new; $mw->bind("<Key>", [ sub { print "Touche : $_[1]\n"; }, Ev('K')] ); MainLoop;
Partager