Les unités de Pure Pascal (langage Pascal pour les ordinateurs de la gamme Atari ST), compatible Turbo Pascal.
Unité GEM : Fonction graf_rubbox
Déclaration
function graf_rubbox( gr_rx, gr_ry, gr_rminwidth, gr_rminheight : Integer; var gr_rlastwidth, gr_rlastheight : Integer ) : Integer;Description
Affiche un élastique sous la forme d'un rectangle à l'écran, dans lequel le coin supérieur gauche est fixe et le coin inférieur droit est déplacé à l'aide de la souris tant que le bouton gauche de la souris est enfoncé. Utile lorsque la taille d'un objet doit être déterminée ou qu'une certaine zone doit être sélectionnée. Les dimensions du rectangle lorsque le bouton de la souris est relâché sont renvoyées.Paramètres
- gr_rx Coordonnée X du coin supérieur gauche
- gr_ry Coordonnée Y du coin supérieur gauche
- gr_rminwidth Largeur minimale du rectangle
- gr_rminheight Hauteur minimale du rectangle
- gr_rlastheight Résultat : hauteur finale
Résultat
0 en cas d'erreurRéférences croisées graf_dragbox
Exemple
{ Si le bouton de la souris est enfoncé, sélectionnez la zone } if (event and MU_BUTTON) <> 0 then begin graf_rubbox(x, y, 0, 0, rb, rh); { Ensuite, faites quelque chose avec le rectangle (x, y, rb, rh)}
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!