SGR Generate Kiviat
De BlueWiki
Version du 30 octobre 2013 à 11:50 par Paul Kuhn (discuter | contributions)
Paramètres
Description
Exemple de code
// Nom utilisateur (OS) : Paul Kuhn - BlueCompany // ---------------------------------------------------- // Méthode : Exemple_Kiviat // Définition des paramètre de dessin génériques du graphe TABLEAU TEXTE($DataGraphe;0) TABLEAU TEXTE($DataGrapheName;0) AJOUTER A TABLEAU($DataGrapheName;"Title") AJOUTER A TABLEAU($DataGraphe;"Exemple de graphe en étoile") AJOUTER A TABLEAU($DataGrapheName;"TitleAlignement") AJOUTER A TABLEAU($DataGraphe;Chaine(Centré)) AJOUTER A TABLEAU($DataGrapheName;"GraphBGColor") AJOUTER A TABLEAU($DataGraphe;"White") AJOUTER A TABLEAU($DataGrapheName;"ShowScale") AJOUTER A TABLEAU($DataGraphe;"oui") // 4 - Echelle AJOUTER A TABLEAU($DataGrapheName;"GraphFont") AJOUTER A TABLEAU($DataGraphe;"times") // 5 - Police du graphe // Définition des axes d'analyse TABLEAU TEXTE(axes;0) AJOUTER A TABLEAU(axes;"Performance") AJOUTER A TABLEAU(axes;"Rapidité") AJOUTER A TABLEAU(axes;"Communauté") AJOUTER A TABLEAU(axes;"Simplicité") AJOUTER A TABLEAU(axes;"Portabilité") AJOUTER A TABLEAU(axes;"Coûts") AJOUTER A TABLEAU(axes;"Opé Diverses") // Définition du tableau a 2 dimensions des paramètre de dessin des séries TABLEAU TEXTE(DataSerie;2;5) DataSerie{1}{1}:="Juliette Kuhn" DataSerie{1}{2}:="Pink" DataSerie{1}{3}:="red:10" // remplissage DataSerie{1}{4}:="3" DataSerie{1}{5}:="losange" DataSerie{2}{1}:="Estelle Kuhn" DataSerie{2}{2}:="blue" DataSerie{2}{3}:="blue:20" DataSerie{2}{4}:="10" DataSerie{2}{5}:="triangle" // définition du tableau à 2 dimensions des valeurs à tracer TABLEAU REEL(Value;2;7) // Donnée de la série 1 : Juliette Kuhn Value{1}{1}:=50 Value{1}{2}:=40 Value{1}{3}:=30 Value{1}{4}:=50 Value{1}{5}:=50 Value{1}{6}:=50 Value{1}{7}:=90
// Donnée de la série 2 : Estelle Kuhn Value{2}{1}:=75 Value{2}{2}:=30 Value{2}{3}:=75 Value{2}{4}:=80 Value{2}{5}:=91 Value{2}{6}:=75 Value{2}{7}:=25 // appel de la commande générant le graphe TheGraphe:=SGR_Generate_Kiviat (->$DataGrapheName;->$DataGraphe;->axes;->DataSerie;->Value)