Les unités de Pure Pascal (langage Pascal pour les ordinateurs de la gamme Atari ST), compatible Turbo Pascal.
Unité Graph : Procédure Ellipse
Déclaration
procedure Ellipse( x, y : Integer; startAngle, endAngle, xRadius, yRadius : Word )Description
La procédure Ellipse dessine un arc de cercle elliptique autour du point central défini par la paire de coordonnées x et y.xRadius est le rayon de l'axe horizontal et yRadius est le rayon de l'axe vertical.
startAngle est l'angle à partir duquel l'arc est tracé et endAngle est l'angle jusqu'auquel il est tracé. L'angle est spécifié en degrés et dans le sens inverse des aiguilles d'une montre. Un angle de départ de 0 et un angle de fin de 360 dessinent une ellipse complète.
La couleur spécifiée par SetColor est utilisée
pour le dessin.
Les informations sur le dernier appel à Ellipse peuvent être
obtenues à l'aide de la procédure GetArcCoords.
Avant d'appeler Ellipse, il faut passer en mode graphique avec
InitGraph ou SetGraphMode.
Références croisées Arc Circle FillEllipse GetArcCoords GetAspectRatio PieSlice Sector SetAspectRatio
Exemple
uses Graph; var driver, mode : Integer; xRadius, yRadius : Word; begin driver := Detect; InitGraph( driver, mode, '' ); for xRadius := 1 to 5 do for yRadius := 5 downto 1 do Ellipse( 100, 100, 0, 360, xRadius * 10, yRadius * 10 ); Readln; CloseGraph; end.
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!