Procedure DessinerPolyPolyLigne(T1 : Nul Ou TableauDe Nul Ou TableauDe Nul Ou Point, T2 : Nul Ou TableauDe Nul Ou StyleCadre=Nul);
Les coordonnées des points sont exprimées dans l'unité de mesure du contexte graphique au moment du dessin de la poly ligne.
Si le paramètre T2 est renseigné, alors ces styles de cadre sont utilisés. Sinon, le style de cadre courant du contexte graphique est utilisé. Les tableaux T1 et T2 doivent être de même taille.
En cas d'erreur, l'exception GraphismeImpossible est envoyée.
Si T1 est Nul, alors l'appel est sans effet.
Une poly poly ligne est utilisée pour une figure complexe en trois dimensions telle un pavé.
Principal
/*******/
Variable
/******/
F : Nul Ou FeuilleDeStyles;
C : Nul Ou ContexteGraphique;
T1 : Tableau[3] De Nul Ou Tableau[4] De Nul Ou Point;
T2 : Tableau[3] De Nul Ou Tableau[4] De Nul Ou Point;
TS : Tableau[3] De Nul Ou StyleCadre;
Debut
C.Unite=SousMetriquePoint;
/* L'unite est le point typographique. */
...
C.StyleCadreCourant=F.CadreSimple;
/* Selectionne le cadre simple comme style de cadre courant. */
...
T1[0][0]=Point(0, 100);
T1[0][1]=Point(200, 100);
T1[0][2]=Point(200, 200);
T1[0][3]=Point(0, 200);
T1[1][0]=Point(50, 50);
T1[1][1]=Point(250, 50);
T1[1][2]=Point(200, 100);
T1[1][3]=Point(0, 100);
T1[2][0]=Point(200, 100);
T1[2][1]=Point(250, 50);
T1[2][2]=Point(250, 150);
T1[2][3]=Point(200, 200);
C.DessinerPolyPolyLigne(T1);
/* Dessine la poly poly ligne en utilisant le style de cadre courant. */
...
T2[0][0]=Point(0, 300);
T2[0][1]=Point(200, 300);
T2[0][2]=Point(200, 400);
T2[0][3]=Point(0, 400);
T2[1][0]=Point(50, 250);
T2[1][1]=Point(250, 250);
T2[1][2]=Point(200, 300);
T2[1][3]=Point(0, 300);
T2[2][0]=Point(200, 300);
T2[2][1]=Point(250, 250);
T2[2][2]=Point(250, 350);
T2[2][3]=Point(200, 400);
TS[0]=C.CadreDouble;
TS[1]=C.CadreDouble;
TS[2]=C.CadreDouble;
C.DessinerPolyPolyLigne(T2, TS);
/* Dessine la poly poly ligne en utilisant les styles de cadre TS. */
...
Fin Principal
- | - | - | - | - | - | - | - | - |