BAR |
Barre |
---|---|
Turbo Pascal 4+ | Graph |
Syntaxe
Procedure Bar(x1,y1,x2,y2:Integer); |
Paramètres
Nom | Description |
---|---|
x1 | Ce paramètre permet d'indiquer la coordonnée horizontale de gauche |
y1 | Ce paramètre permet d'indiquer la coordonnée verticale supérieur |
x2 | Ce paramètre permet d'indiquer la coordonnée horizontale de droite |
y2 | Ce paramètre permet d'indiquer la coordonnée verticale inférieur |
Description
Cette procédure permet de tracer une rectangle dans un écran graphique.
Remarques
- Dessine un rectangle rempli (utilisé dans les graphiques à barres, par exemple). Utilise le motif et la couleur définis par SetFillStyle ou SetFillPattern. Pour dessiner une barre délimitée, appelez Bar3D avec une profondeur de zéro.
- La procédure Bar doit être utilisé en mode graphique.
Exemple
Voici un exemple typique de l'utilisation de cette procédure :
- Program BarSamples;
-
- Uses Graph;
-
- Var Gd,Gm:Integer;
-
- BEGIN
- Gd := Detect;
- InitGraph(Gd, Gm,'');
- If(GraphResult <> grOk)Then Halt(1);
- SetFillStyle(XHatchFill, LightGray);
- Bar(10,10,400,300);
- SetFillStyle(SolidFill,Blue);
- Bar(12,12,398,20);
- SetColor(Yellow);
- OutTextXY(180,14,'Titre');
- SetFillStyle(SolidFill,White);
- Bar(12,25,398,100);
- ReadLn;
- CloseGraph;
- END.
on obtiendra le résultat semblable au suivant :
Voir également
Langage de programmation - Turbo Pascal - Référence de procédures et fonctions - BAR3D
Langage de programmation - Turbo Pascal - Référence de procédures et fonctions - FILLPOLY
Langage de programmation - Turbo Pascal - Référence de procédures et fonctions - GETFILLSETTINGS
Langage de programmation - Turbo Pascal - Référence de procédures et fonctions - PIESLICE
Langage de programmation - Turbo Pascal - Référence de procédures et fonctions - SETFILLPATTERN
Langage de programmation - Turbo Pascal - Référence de procédures et fonctions - SETFILLSTYLE
Référence
Aide-mémoire de Turbo Pascal versions de 3 à 6, Edition Marabout, De Groote, Virga, 1992, ISBN: 2-501-01833-8, page 105.