WR INSERT STYLED TEXT

4D Write v16


WR INSERT STYLED TEXT ( zone ; blob )

Paramètre	Type	Description
zone	Entier long	Zone 4D Write
blob	BLOB	Variable ou champ

Description

La commande WR INSERER TEXTE STYLE insère dans la zone à l'emplacement du curseur ou en remplacement de la sélection courante le contenu du BLOB passé en paramètre. Le BLOB peut être une variable ou un champ de type BLOB mais il est indispensable qu'il ait été créé grâce à la commande WR Lire texte style.

Le BLOB peut être porté d'un document à l'autre. Son format est indépendant de la plate-forme, il peut aussi bien avoir été créé à partir d'un document Macintosh et être inséré dans un document Windows ou inversement.

Il contient une sélection de texte 4D Write incluant tous les attributs de texte (couleur, style...) hormis les feuilles de style, ainsi que les attributs de paragraphe (marges, tabulations, formatage...).

Exemple

Vous voulez stocker dans la table [FormulesCourriers] les formules types pour vos courriers, le tout utilisant le minimum de place.
Pour cela, créez dans la table un champ de type BLOB intitulé 'TexteFormule'. Dans son formulaire Entrée, insérez une zone 4D Write nommée 'LaZone'. Enfin, associez au formulaire la méthode suivante :

 Case of

    :(Form event=On Load)

       If(Record number([FormulesCourriers])#-3)

          WR INSERT STYLED TEXT(LaZone;[FormulesCourriers]TexteFormule)

       End if

    :(Form event=On Data Change)

       WR EXECUTE COMMAND(LaZone;wr cmd select all)

       [FormulesCourriers]TexteFormule:=WR Get styled text(LaZone)

 End case

Voir aussi

WR Get styled text