ClearViewPort |
Efface le port de vue |
---|---|
HighSpeed Pascal | 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.
Remarque
- La procédure ClearViewPort permet d'effacer la fenêtre courante.
- La procédure ClearViewPort efface la fenêtre et déplace le pointeur actuel sur le point (0,0). La fenêtre est remplie dans la couleur d'arrière-plan actuelle, avec le motif de remplissage défini sur EmptyFill.
Exemple
L'exemple suivant permet de faire des remplissage aléatoires :
- Program ClearViewPortSamples;
- Uses Graph,Crt;
- Var
- Driver,Mode,RanX,RanY:Integer;
- C:Char;
- BEGIN
- Driver:=DETECT;
- InitGraph(Driver,Mode,'');
- FloodFill(1,1,1);
- Repeat
- RanX:=Random(GetMaxX);
- RanY:=Random(GetMaxY) ;
- SetViewPort(RanX,RanY,RanX+10,RanY+10,ClipOn);
- ClearViewport;
- Until KeyPressed;
- C:=ReadKey;
- CloseGraph;
- END.
Dernière mise à jour : Lundi, le 20 avril 2020