Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Développement Développement Langage Perl Comment connaitre l'entrée courante dans un fenetre?

Comment connaitre l'entrée courante dans un fenetre?

2 réponses
Avatar
leila_freind
Salut,
j'ai un petit problème mais je n'arrive pas à le résoudre, suite à la
manque de documentation que j'ai concerant perl/tk. Mon problème est
le suivant:
j'ai un fenêtre F1 qui contient plusieurs entrées (browseEntry). J'ai
fourni un bouton aide dans F1 qui permet d'ouvrir une autre fenetre F2
pour saisir une expression qui sera formulé par programme et inseré
dans l'entrée courante (ou se trouve le curseur) mais je n'ai pas su
comment trouver l'entrée courante :-( j'ai essayé avec focue mais je
suppose que ce n'est pas la bonne méthode. quelqu'un peut m'aider?.
merci
Leila
Signaler un problème avec ce contenu

2 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
jeanpierre.vidal
(Leila) wrote in message news:...
Salut,
j'ai un petit problème mais je n'arrive pas à le résoudre, suite à la
manque de documentation que j'ai concerant perl/tk. Mon problème est
le suivant:
j'ai un fenêtre F1 qui contient plusieurs entrées (browseEntry). J'ai
fourni un bouton aide dans F1 qui permet d'ouvrir une autre fenetre F2
pour saisir une expression qui sera formulé par programme et inseré
dans l'entrée courante (ou se trouve le curseur) mais je n'ai pas su
comment trouver l'entrée courante :-( j'ai essayé avec focue mais je
suppose que ce n'est pas la bonne méthode. quelqu'un peut m'aider?.
merci
Leila


Dans "Introduction à Perl/Tk" j'ai trouvé la fonction focusCurrent()
exemple (2 Entry, un Button) :

#!perl -w
use strict;
use Tk;
my $mw = new MainWindow;
my $e1 = $mw->Entry->pack;
my $e2 = $mw->Entry->pack;
my $b = $mw->Button(-command => &qui_a_le_focus)->pack;

MainLoop;

sub qui_a_le_focus {
my $focused = $mw->focusCurrent();
print "$focusedn";
$focused->insert(0, "c'est ici !");
}

Avatar
jeanpierre.vidal
(Jean-Pierre Vidal) wrote in message news:...

Ma réponse m'a échappé un peu vite. Le bouquin, c'est celui de Nancy
Walsh aux éditions O'Reilly. La fonction est documentée dans
man Tk::focus
ainsi que d'autres.

Jean-Pierre

(Leila) wrote in message news:...
Salut,
j'ai un petit problème mais je n'arrive pas à le résoudre, suite à la
manque de documentation que j'ai concerant perl/tk. Mon problème est
le suivant:
j'ai un fenêtre F1 qui contient plusieurs entrées (browseEntry). J'ai
fourni un bouton aide dans F1 qui permet d'ouvrir une autre fenetre F2
pour saisir une expression qui sera formulé par programme et inseré
dans l'entrée courante (ou se trouve le curseur) mais je n'ai pas su
comment trouver l'entrée courante :-( j'ai essayé avec focue mais je
suppose que ce n'est pas la bonne méthode. quelqu'un peut m'aider?.
merci
Leila


Dans "Introduction à Perl/Tk" j'ai trouvé la fonction focusCurrent()
exemple (2 Entry, un Button) :

#!perl -w
use strict;
use Tk;
my $mw = new MainWindow;
my $e1 = $mw->Entry->pack;
my $e2 = $mw->Entry->pack;
my $b = $mw->Button(-command => &qui_a_le_focus)->pack;

MainLoop;

sub qui_a_le_focus {
my $focused = $mw->focusCurrent();
print "$focusedn";
$focused->insert(0, "c'est ici !");
}