UpsGng.ContexteGraphique.EcrireTexte

Procedure EcrireTexte(X : Reel, Y : Reel, C : Nul Ou Caractere, S : Nul Ou StyleTexte=Nul, P : Nul Ou Pinceau=Nul, M : Nul Ou Motif=Nul, IgnorerEncadrement : Booleen=Faux, CrenagePremierCaractere : Reel=0.0);

Procedure EcrireTexte(P : Nul Ou Point, C : Nul Ou Caractere, S : Nul Ou StyleTexte=Nul, P : Nul Ou Pinceau=Nul, M : Nul Ou Motif=Nul, IgnorerEncadrement : Booleen=Faux, CrenagePremierCaractere : Reel=0.0);

Description

La méthode EcrireTexte permet d'écrire le texte C sur le support courant rattaché au contexte graphique courant.

Le point de départ est exprimé soit par :

Le point de départ correspond :

Si le paramètre S est renseigné, alors ce style de texte est utilisé. Sinon, le style de texte courant du contexte graphique est utilisé.

Si le paramètre P est renseigné, alors ce pinceau est utilisé. Sinon, le pinceau du style de texte courant est utilisé. Sinon, le pinceau du contexte courant est utilisé.

Si le paramètre M est renseigné, alors ce motif est utilisé. Sinon, le motif du style de texte courant est utilisé. Sinon, le motif courant du contexte graphique est utilisé.

Si le paramètre IgnorerEncadrement a pour valeur Vrai, alors l'encombrement du cadre est ignoré.

Le paramètre CrenagePremierCaractere permet de spécifier le crénage a ajouter au premier caractère du fait de l'enchaînement des mots dans un paragraphe. Ce crénage est donc égal à la taille de l'indentation pour le premier mot et au moins égal à la taille d'un caractere espace pour les autres.

Les coordonnées et les dimensions sont exprimées dans l'unité de mesure du contexte graphique au moment de la mesure de la taille du texte.

En cas d'erreur, l'exception GraphismeImpossible est envoyée.

Si C est Nul, alors l'appel est sans effet.

Exemple

Principal
/*******/
Variable
/******/
Debut
C.Unite=SousMetriquePoint;
/* L'unite est le point typographique. */
...
C.StyleTexteCourant=F.Normal;
/* Selectionne le style Normal comme style de texte courant. */
...
P.X=100;
P.Y=100;
C.EcrireTexte(P, "Ceci est un essai");
/* Ecrit le texte dans le style de texte courant. */
...
P.X=100;
P.Y=200;
C.EcrireTexte(P, "Ceci est un essai", S);
/* Ecrit le texte dans le style de texte S. */
...
Fin Principal

Voir aussi

MesurerTexte pour mesurer un texte.

Traduction

---------