CLEARVIEWPORT |
Efface la vue du port |
|---|---|
| Turbo Pascal 4+ | Graph |
Syntaxe
| Procedure ClearViewPort; |
Description
Cette procédure permet d'effacer le contenu de la fenêtre courante de l'écran graphique et réaffecte les paramètres par défaut de celle-ci.
Remarques
- La procédure ClearViewPort définit la couleur de remplissage sur la couleur d'arrière-plan (Palette[0]), appelle Bar et déplace le pointeur actuel sur la coordonnées (0,0).
- La procédure ClearViewPort doit être utilisé en mode graphique.
Exemple
Voici un exemple permettant d'afficher un cercle, d'attendre que l'utilisateur presse sur ENTER et dessin un cercle dans un écran avec seulement une partie de l'écran d'effacé :
- Program ClearViewPortSamples;
-
- Uses Graph;
-
- Var Gd,Gm:Integer;
-
- BEGIN
- Gd := Detect;
- InitGraph(Gd, Gm,'');
- If(GraphResult <> grOk)Then Halt(1);
- SetColor(Yellow);
- Circle(150,50,50);
- ReadLn;
- SetViewPort(50,50,300,300,True);
- ClearViewPort;
- SetColor(Blue);
- Bar(10,10,40,300);
- ReadLn;
- CloseGraph;
- END.
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 124.
Dernière mise à jour : Dimanche, le 25 janvier 2015