|
|
|
|
|
- Manipuler un tableau par programmation
<Traitement de texte>.InsèreTableau (Fonction) En anglais : <Word Processing>.InsertTable Insère un tableau dans un champ Traitement de texte.
TT_Tableau.InsèreTableau(1, 3, 3)
TT_Tableau.InsèreTableau(TT_Tableau.Curseur, 3, 2)
Syntaxe
<Résultat> = <Champ Traitement de texte>.InsèreTableau(<Position> [, <Nombre de colonnes> [, <Nombre de lignes>]])
<Résultat> : Variable de type docFragment Variable de type docFragment contenant le fragment inséré. <Champ Traitement de texte> : Nom de champ Nom du champ Traitement de texte à manipuler. <Position> : Entier Position à laquelle le tableau doit être inséré. Cette position est exprimée en nombre de caractères. <Nombre de colonnes> : Entier optionnel Nombre de colonnes du tableau. Par défaut, ce paramètre correspond à 1. <Nombre de lignes> : Entier optionnel Nombre de lignes du tableau. Par défaut, ce paramètre correspond à 1. Remarques Manipuler un tableau par programmation Un tableau présent dans un document de type Traitement de texte peut être manipulé avec les fonctions de gestion des tableaux du WLangage. Quelques exemples :
MonDocument est un Document <- TT_ExempleTT
TT_ExempleTT.InsèreTableau(1, 3, 3)
f est un TT_ExempleTT.Valeur.Fragment(TT_ExempleTT.Curseur, 0)
soit para <- f.Paragraphe[1]
SI para.Tableau = Null ALORS
RETOUR
FIN
doc est un Document <- TT_ExempleTT.Valeur
nIndice est un entier = Ajoute(para.Tableau.Lignes)
para.Tableau.Cellules[2,2].Contenu.Texte = "Je suis dans la cellule 2,2"
Supprime(para.Tableau.Lignes, 3)
Supprime(para.Tableau.Colonnes, 3)
Supprime(doc.Paragraphe, para.IndiceParagraphe)
Exemple de création d'un tableau dans un document avec le contenu d'un champ Table :
MonDoc est un Document
cTable est un Champ <- TABLE_Démo
pCol est un Champ
FragmentDeb est un MonDoc.docFragment(1)
FragmentDeb.MiseEnForme.PoliceTaille = 24
FragmentDeb.MiseEnForme.CouleurTexte = RougeFoncé
FragmentDeb.Texte = "Tableau dans TTX avec " + cTable.Libellé + RC + RC
MonDoc.DocInsèreTableau(20, TableOccurrence(cTable, toColonne), cTable.Occurrence + 1)
POUR TOUT para DE MonDoc.Paragraphe
SI para.Tableau <> Null ALORS
POUR nColonne = 1 _À_ TableOccurrence(cTable, toColonne)
pCol <- TableEnumèreColonne(cTable, nColonne)
para.Tableau.Cellules[1, nColonne].Contenu.Texte = pCol.Libellé
POUR nLigne = 1 _À_ cTable.Occurrence
para.Tableau.Cellules[nLigne+1, nColonne].Contenu.Texte = pCol[nLigne]
FIN
FIN
SORTIR
FIN
FIN
TT_Démo = MonDoc
Composante : wd300mdl.dll
Documentation également disponible pour…
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|