Les unités de Pure Pascal (langage Pascal pour les ordinateurs de la gamme Atari ST), compatible Turbo Pascal.
Unité GEM : Fonction evnt_button
Déclaration
function evnt_button( ev_bclicks, ev_bmask, ev_bstate : Integer; var ev_bmx, ev_bmy, ev_bbutton, ev_bkstate : Integer ) : Integer;Description
Cette fonction attend qu'un bouton de la souris soit enfoncé et renvoie diverses informations sur le clic de la souris.Paramètres
- ev_bclicks Nombre maximum de clics
- ev_bmask Masque pour le bouton de souris souhaité (Bit 0 : bouton gauche, Bit 1 : bouton droit)
- ev_bstate Masque pour l'état de la souris souhaité (Bit 0 : bouton gauche, Bit 1 : bouton droit enfoncé)
- ev_bmx Résultat : coordonnée X de la souris
- ev_bmy Résultat : coordonnée Y de la souris
- ev_bbutton Résultat : état du bouton de la souris (comme ev_bstate)
- ev_bkstate Résultat : état du clavier
Masque de bits avec :
Résultat
Nombre de clics de souris (toujours <= ev_bclicks)Références croisées evnt_multi
Exemple
{ Détecter le double clic } clicks := evnt_button( 2, 1, 1, x, y, button, state ); if clicks = 2 then { Aha, nous savons qu'un double clic s'est produit }
Vous trouverez dans cette zone la liste de toutes les Unités (équivalent des "Librairies" en C) de Pure Pascal. Les Unités indiqués comme standards existent dans la majorité des compilateurs Pascal existant sur ordinateurs 16 bits et au dela (dont Turbo Pascal 3 mini). Les unités indiqués comme Atari sont spécifiques aux systèmes d'exploitation des Atari ST (TOS n.n).
Accès aux unités
Les menus déroulants de chaque unité sont des accès directs aux procédures et fonctions, classés alphabétiquement (sans tenir compte de la casse, puisque le langage Pascal ne tient pas compte de la casse!)Cette page Unités est issu du fichier UNIT.HLP de la documentation de Pure Pascal (d'Application Systems Heidelberg), qui a été convertie en format TXT puis traduite de l'Allemand grâce à Google Translator : des milliers de copier/coller de et vers Google translator ont été nécessaires, ne connaissant pas un mot d'Allemand!