Aller au contenu principal
Version: 20 R6

VP ADD STYLESHEET

VP ADD STYLESHEET ( vpAreaName : Text ; styleName : Text ; styleObj : Object { ; sheet : Integer } )

ParamètresTypeDescription
vpAreaNameText->Nom d'objet formulaire zone 4D View Pro
styleNameText->Nom du style
styleObjObject->Objet définissant les propriétés de l'attribut
sheetInteger->Numéro d'indice de la feuille (feuille courante si omis)

Description

La commande VP ADD STYLESHEET crée ou modifie la feuille de style styleName en fonction de la combinaison des propriétés spécifiées dans styleObj dans le document courant. Si une feuille de style ayant le même nom et le même index existe déjà dans le document, cette commande l'écrasera et le remplacera avec les nouvelles valeurs.

Les feuilles de style créées par cette commande sont sauvegardées avec le document.

Dans vpAreaName, passez le nom de la zone 4D View Pro. Si vous passez un nom inexistant, une erreur est retournée.

Le paramètre styleName vous permet de nommer la feuille de style. Si le nom existe déjà dans le même scope, la nouvelle feuille de style remplace la feuille existante. A noter que vous pouvez utiliser le même nom pour plusieurs scopes (ci-dessous).

Dans styleObj, définissez les propriétés de la feuille de style (ex : police, alignement, bordures, etc.). Pour consulter la liste complète des propriétés de style, voir Propriétés des objets de style.

Vous pouvez indiquer l'endroit où définir la feuille de style dans le paramètre optionnel sheet à l'aide de l'index de la feuille (l'indexation commence à 0) ou à l'aide des constantes suivantes :

  • vk current sheet
  • vk workbook

Si une feuille de style styleName est définie au niveau du workbook ainsi qu'au niveau de la feuille, le niveau de la feuille est prioritaire sur celui du workbook lorsque la feuille de style est définie.

Pour appliquer la feuille de style, utilisez les commandes VP SET DEFAULT STYLE ou VP SET CELL STYLE.

Exemple

Le code suivant :

$styles:=New object
$styles.backColor:="green"

//Objet Bordure de ligne
$borders:=New object("color";"green";"style";vk line style medium dash dot)

$styles.borderBottom:=$borders
$styles.borderLeft:=$borders
$styles.borderRight:=$borders
$styles.borderTop:=$borders

VP ADD STYLESHEET("ViewProArea";"GreenDashDotStyle";$styles)

//Pour appliquer le style
VP SET CELL STYLE(VP Cells("ViewProArea";1;1;2;2);New object("name";"GreenDashDotStyle"))

créera et appliquera l'objet de style suivant nommé GreenDashDotStyle:

{
backColor:green,
borderBottom:{color:green,style:10},
borderLeft:{color:green,style:10},
borderRight:{color:green,style:10},
borderTop:{color:green,style:10}
}

Voir également

4D View Pro Style Objects and Style Sheets
VP Get stylesheet
VP Get stylesheets
VP REMOVE STYLESHEET
VP SET CELL STYLE
VP SET DEFAULT STYLE