Discussion :

[jack_spyrow]

Bonjour
Ces temps-ci, je suis en tarin de faire un programme de gestion (c'est pas trop important). Cependant, je voulais intégrer la souris à mon programme.

J'ai téléchargé l'unité souris proposée par haypo (je programme sous turbo pascal). Cependant, je n'ai pas vu de fonction ou procédure me permettant de gérer un click. Je m'explique.

En fait j'ai un menu composé, par exemple, de : historique, mouvement, quitter.
Alors, au lieu de dire à l'utilisateur "appuyer sur telle touche pour accéder à tel menu, je voulais qu'il clique lui-même sur un menu pour que celui-ci s'ouvre...

Dans mon programme, la souris apparaît, elle bouge mais elle ne fait rien.
Comment puis-je faire pour que, en cliquant sur historique par exemple, il exécute toutes les instructions liées à historique ?

J'espère avoir eté clair dans mon explication et je vous remercie d'avance.

[Tuxico]

tu dois passer par l'assembleur et l'interruption 33h si je ne me trompe Fais un tour dans la faq pascal/assembleur

en gros

pour récupérer les coordonées de la souris la souris :

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
uses 
  dos;
 
var
  Reg: Registers;
  X, Y: Integer;
 
begin
  Reg.ax := 3;
  Intr($33, Regs);
  X := Regs.cx;
  Y := Regs.dx;
  writeln(X);
  writeln(Y);
end.

[jack_spyrow]

et pour faire un click comment je fais ?

[Alcatîz]

Bonjour !

Il faut fournir au pilote de souris l'adresse d'une routine de traitement des événement souris. Il s'agit de la fonction 000Ch ou 0018h de l'interruption 33h.

Par exemple, une routine qui serait appelée en cas de clic : à chaque appel par le pilote de la souris, la routine pourrait mettre à jour un drapeau dans ton programme.

Mais j'ignore tout de l'unité de Haypo donc ce qui précède n'est peut-être pas adapté.

[j.p.mignot]

un très bon livre est "PC Source book"
on trouve quelques fonctions de l'interruption 33h sur

http://membres.lycos.fr/comufiles/in...ga3/souris.htm

Attention : si les fonctions sont standardisées, certaines n'existent que pour des drivers de version >= à une certaine valeur.
Avant d'appeler une fonction, il est prudent de demander la version du driver et s'assurer qu'il gère la fonction que l'on souhaite exécuter