Procedure DessinerCorde(X : Reel, Y : Reel, L : Reel, H : Reel, X1 : Reel, Y1 : Reel, X2 : Reel, Y2 : Reel, S : Nul Ou StyleCadre=Nul, M : Nul Ou Motif=Nul);
Procedure DessinerCorde(P1 : Nul Ou Point, P2 : Nul Ou Point, PDebut : Nul Ou Point, PFin : Nul Ou Point, S : Nul Ou StyleCadre=Nul, M : Nul Ou Motif=Nul);
Procedure DessinerCorde(R : Nul Ou Rectangle, PDebut : Nul Ou Point, PFin : Nul Ou Point, S : Nul Ou StyleCadre=Nul, M : Nul Ou Motif=Nul);
La corde est exprimée soit par :
L'ouverture de la corde est exprimée soit par :
Ces deux points ne sont pas forcément sur l'ellipse.
Les coordonnées et les dimensions sont exprimées dans l'unité de mesure du contexte graphique au moment du dessin de la ligne.
Si le paramètre S est renseigné, alors ce style de cadre est utilisé. Sinon, le style de cadre courant du contexte graphique est utilisé.
Si le paramètre M est renseigné, alors ce motif est utilisé. Sinon, le motif courant du contexte graphique est utilisé.
En cas d'erreur, l'exception GraphismeImpossible est envoyée.
Si P1, P2, PDepart, PArrivee ou R est Nul, alors l'appel est sans effet.
Principal
/*******/
Variable
/******/
F : Nul Ou FeuilleDeStyles;
C : Nul Ou ContexteGraphique;
P1 : Nul Ou Point;
P2 : Nul Ou Point;
P3 : Nul Ou Point;
P4 : Nul Ou Point;
S : Nul Ou StyleCadre;
M : Nul Ou Motif;
Debut
C.Unite=SousMetriquePoint;
/* L'unite est le point typographique. */
...
C.StyleCadreCourant=F.CadreSimple;
/* Selectionne le cadre simple comme style de cadre courant. */
C.MotifCourant=C.MotifGrisClair;
/* Selectionne le motif gris clair comme motif courant. */
...
P1.X=100;
P1.Y=100;
P2.X=300;
P2.Y=200;
P3.X=200;
P3.Y=100;
P4.X=300;
P4.Y=150;
C.DessinerCorde(P1, P2, P3, P4);
/* Dessine la corde en utilisant le style de cadre et le motif courant. */
...
P1.X=100;
P1.Y=300;
P2.X=300;
P2.Y=400;
P3.X=200;
P3.Y=300;
P4.X=300;
P4.Y=350;
C.DessinerCorde(P1, P2, P3, P4, S, M);
/* Dessine la corde en utilisant le style de cadre S et le motif M. */
...
Fin Principal
- | - | - | - | - | - | - | - | - |