IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Modules Perl Discussion :

Definir position de la souris


Sujet :

Modules Perl

  1. #1
    Futur Membre du Club
    Inscrit en
    Mars 2007
    Messages
    4
    Détails du profil
    Informations forums :
    Inscription : Mars 2007
    Messages : 4
    Par défaut Definir position de la souris
    Bonjour,
    J'ai un petit probleme, j'ai cherché un peu partout le moyen de definir la position de la souris a un point X, Y de l'ecran, mais sans succes .
    Dans les modules CPAN, il y a bien des classes qui permettre de definir la position du curseur mais c'est tout le temps limité a la console ou a un widget precis .
    Dans mon cas je voudrai deplacer le curseur a n'importe quel endroit de l'ecran.
    Je sais que cette fonctionalité existe en java ou en delphi par exemple et ca m'etonne de ne pas la retrouver en perl.
    Si vous avez la moindre idée pour faire ce deplacement, je suis preneur.
    Merci d'avance.

  2. #2
    Expert confirmé
    Avatar de Jedai
    Homme Profil pro
    Enseignant
    Inscrit en
    Avril 2003
    Messages
    6 245
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Côte d'Or (Bourgogne)

    Informations professionnelles :
    Activité : Enseignant

    Informations forums :
    Inscription : Avril 2003
    Messages : 6 245
    Par défaut
    En fait Tk contient tout ce qu'il faut pour faire ceci, mais ce module simplifie la tache : Tk::CursorControl.
    (voir la méthode warpTo)

    --
    Jedaï

  3. #3
    Futur Membre du Club
    Inscrit en
    Mars 2007
    Messages
    4
    Détails du profil
    Informations forums :
    Inscription : Mars 2007
    Messages : 4
    Par défaut
    Merci Jedai pour la piste, mais Tk::CursorControl crée des windows temporaires le temps du deplacement de la souris (ca n'etait pas si grave mais ca aurait peut etre pu fausser mes tests).
    Par contre j'ai reussi a trouver un module qui satisfait a toutes mes demandes:
    http://search.cpan.org/~erngui/Win32...1.3/GuiTest.pm

  4. #4
    Membre confirmé
    Inscrit en
    Février 2007
    Messages
    34
    Détails du profil
    Informations personnelles :
    Âge : 62

    Informations forums :
    Inscription : Février 2007
    Messages : 34
    Par défaut Win32::API
    Bonjour,

    Pour ma part j'utilise le module Win32::API qui permet d'importer n'importe quel point d'entrée d'une dll dans un programme Perl.

    Dans le cas qui nous interesse, SetCursorPos (trouvé dans user32.dll, une dll standard de Windows) fait l'affaire.

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
     
    use strict;
     
    use Win32::API;
     
    my $g_fnAPISetCursorPos = new Win32::API("user32", "SetCursorPos","NN", "N");
    if ($g_fnAPISetCursorPos == undef) { die 'Erreur import SetCursorPos' };
     
     
    sub fnSetCursorPos
    {
    	my $iX = shift;
    	my $iY = shift;
     
    	$g_fnAPISetCursorPos->Call($iX,$iY);
    }
     
     
    &fnSetCursorPos(20,50);
    Voilà :-)

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. nom d'un controle et position de la souris
    Par manu80000 dans le forum Langage
    Réponses: 1
    Dernier message: 12/01/2006, 16h12
  2. [C#]Drag & Drop, problème de position de la souris
    Par debug dans le forum Windows Forms
    Réponses: 2
    Dernier message: 07/10/2005, 13h06
  3. Position de la souris
    Par abcd dans le forum Langage
    Réponses: 10
    Dernier message: 31/03/2005, 18h09
  4. Déterminer la position de la souris
    Par genteur slayer dans le forum Composants VCL
    Réponses: 6
    Dernier message: 16/06/2003, 11h01
  5. FOnction api specifiant la position de la souris
    Par florent dans le forum C++Builder
    Réponses: 4
    Dernier message: 15/05/2002, 20h07

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo