4D Write v16
WR SUPPRIMER FEUILLESTYLE
- 4D Write - Langage
-
- WR Feuille de style
-
- Feuille de style, Introduction
- WR AJOUTER TAB FEUILLESTYLE
- WR APPLIQUER FEUILLESTYLE
- WR Creer feuillestyle
- WR FIXER INFO FEUILLESTYLE
- WR FIXER POLICE FEUILLESTYLE
- WR FIXER PROP FEUILLESTYLE
- WR FIXER TAB FEUILLESTYLE
- WR LIRE INFO FEUILLESTYLE
- WR Lire police feuillestyle
- WR Lire prop feuillestyle
- WR LIRE TAB FEUILLESTYLE
- WR MISE A JOUR FEUILLESTYLE
- WR SUPPRIMER FEUILLESTYLE
- WR SUPPRIMER TAB FEUILLESTYLE
4D Write v16
WR SUPPRIMER FEUILLESTYLE
WR SUPPRIMER FEUILLESTYLE
| WR SUPPRIMER FEUILLESTYLE ( zone ; numFeuille ) | ||||||||
| Paramètre | Type | Description | ||||||
| zone | Entier long |
|
Zone 4D Write | |||||
| numFeuille | Entier long |
|
Numéro de la feuille de style | |||||
La commande WR SUPPRIMER FEUILLESTYLE permet de supprimer la feuille de style spécifiée par numFeuille de la zone 4D Write.
Attention : Les feuilles de style système ne peuvent pas être supprimées. La commande WR LIRE INFO FEUILLESTYLE vous permet de savoir si la feuille de style numéro numFeuille est une feuille de style protégée.
Vous souhaitez supprimer toutes les feuilles de style non protégées contenues dans votre document :
C_ENTIER LONG(LaZone)
C_ENTIER LONG(NbFeuilleStyle;$NumFeuille)
//Comptons le nombre de feuille de style
NbFeuilleStyle:=WR Compter(LaZone;wr nb feuilles de style)
$NumFeuille:=1
Boucle($i;1;NbFeuilleStyle)
WR LIRE INFO FEUILLESTYLE(LaZone;$NumFeuille;$LeNom;$AppliqueSur;$Protégée;$Raccourci)
Si($Protégée=0) //Si la feuille de style n'est pas protégée, on la supprime
WR SUPPRIMER FEUILLESTYLE(LaZone;$NumFeuille)
Sinon
$NumFeuille:=$NumFeuille+1
Fin de si
Fin de boucle
PROPRIÉTÉS
Produit : 4D Write
Thème : WR Feuille de style
Numéro :
89451
Nom intl. : WR DELETE STYLESHEET
HISTORIQUE
Créé : 4D Write 6.5
UTILISATION DE L'ARTICLE
4D Write - Langage ( 4D Write v16)
© 1985-2018 4D SAS / 4D, Inc. Tous droits réservés.