SGR Generate PolarGraph : Différence entre versions

Version du 30 octobre 2013 à 13:31

Paramètres

Paramètres	Type		Description
Données du graphe	Pointeur		Pointeur vers un tableau texte des paramètres du graphe - titre du graphe - taille du libellé - couleur du fond - Echelle - Affichage des axes - Affichage des graguations périmétriques - couleur du périmetre du cercle - couleur du fond du cercle - couleur des cercles concentriques d'échelle - graduation radiale de 10 en 10 (oui / Non) - graduation radiale de 10 en 10 en degré, radian, grade ou "rose des vents") - Police du graphe
Données des série	Pointeur		Pointeur vers un tableau texte des paramètres de série Nom Couleur Symbole (rond, carré, triangle, étoile)
DataSerie	Pointeur		Pointeur vers un tableau texte à 2 dimensions des paramètres des séries
Distances	Pointeur		Pointeur vers un tableau réel des distances par rapport au centre
angles	Pointeur		Pointeur vers un tableau réel des angles en degrés
Resultat	Image		Image incluant le code SVG

Description

Vous pouvez changer les symboles, les couleurs pour chaque série

Vous pouvez Afficher des graduation en degrés, radians ou grades ou demander une rose des vents

Exemple de code

 // Nom utilisateur (OS) : Paul Kuhn - BlueCompany
 // ----------------------------------------------------
 // Méthode : Exemple_DiagrammePolaire
 // Description
 // 
 //
 // Paramètres
 // ----------------------------------------------------


 // Définition des paramètre de dessin génériques du graphe
TABLEAU TEXTE($DataGrapheName;0)
TABLEAU TEXTE($DataGraphe;0)
AJOUTER A TABLEAU($DataGrapheName;"Title")
AJOUTER A TABLEAU($DataGraphe;"Répartition des ressources autour de chez vous")  // 1 - titre du graphe

AJOUTER A TABLEAU($DataGrapheName;"TitleAlignement")
AJOUTER A TABLEAU($DataGraphe;Chaine(Centré))  // 4 - Alignement du Titre du graphe

AJOUTER A TABLEAU($DataGrapheName;"FontSize")
AJOUTER A TABLEAU($DataGraphe;"30")  // 2 - taille du libellé

AJOUTER A TABLEAU($DataGrapheName;"GraphBGColor")
AJOUTER A TABLEAU($DataGraphe;"Lightgrey")  // 3 - couleur du fond

AJOUTER A TABLEAU($DataGrapheName;"ShowLegend")
AJOUTER A TABLEAU($DataGraphe;"oui")  // 4 - Echelle

AJOUTER A TABLEAU($DataGrapheName;"ShowAxis")
AJOUTER A TABLEAU($DataGraphe;"oui")  // 5 - Affichage des axes

AJOUTER A TABLEAU($DataGrapheName;"PerimeterGraduation")
AJOUTER A TABLEAU($DataGraphe;"oui")  // 6 - Affichage des graduations périmétriques

AJOUTER A TABLEAU($DataGrapheName;"PerimeterColor")
AJOUTER A TABLEAU($DataGraphe;"Blue")  // 7 - couleur du périmetre du cercle

AJOUTER A TABLEAU($DataGrapheName;"CircleBGColor")
AJOUTER A TABLEAU($DataGraphe;"blue:10")  // 8 - couleur du fond du cercle

AJOUTER A TABLEAU($DataGrapheName;"ConcentricCirclesColor")
AJOUTER A TABLEAU($DataGraphe;"purple:5")  // 9 - couleur des cercles concentriques d'échelle

AJOUTER A TABLEAU($DataGrapheName;"CircleBGColor")
Si (gradRad=1)
AJOUTER A TABLEAU($DataGraphe;"oui")  // 10 - graduation radiale de 10 en 10
Sinon 
AJOUTER A TABLEAU($DataGraphe;"non")  // 10 - graduation radiale de 10 en 10
Fin de si 

AJOUTER A TABLEAU($DataGrapheName;"ScaleUnit")
Au cas ou 
: (naturegrad=1)
AJOUTER A TABLEAU($DataGraphe;"degré")  // 11 - graduation radiale de 10 en 10 en degré
: (naturegrad=2)
AJOUTER A TABLEAU($DataGraphe;"radian")  // 11 - graduation radiale de 10 en 10 en radian
: (naturegrad=3)
AJOUTER A TABLEAU($DataGraphe;"grade")  // 11 - graduation radiale de 10 en 10 en grade
: (naturegrad=4)
AJOUTER A TABLEAU($DataGraphe;"rose des vents")  // 11 - graduation radiale en rose des vents
Sinon 
AJOUTER A TABLEAU($DataGraphe;"degré")  // 11 - graduation radiale de 10 en 10 en degré
Fin de cas 

AJOUTER A TABLEAU($DataGrapheName;"GraphFont")
AJOUTER A TABLEAU($DataGraphe;"times")  // 12 - Police du graphe


TABLEAU TEXTE(DataSerie;3;3)
DataSerie{1}{1}:="Cinema"
DataSerie{1}{2}:="Purple"
DataSerie{1}{3}:="rond"  // marque : carré/rond/triangle

DataSerie{2}{1}:="Station essence"
DataSerie{2}{2}:="blue"
DataSerie{2}{3}:="triangle"  // marque : carré/rond/triangle

DataSerie{3}{1}:="Services de secours"
DataSerie{3}{2}:="red"
DataSerie{3}{3}:="étoile"  // marque : carré/rond/triangle

 // définition du tableau à 2 dimensions des distances
TABLEAU REEL(Distance;0;0)
TABLEAU REEL(Distance;3;5)
Distance{1}{1}:=5
Distance{1}{2}:=30
Distance{1}{3}:=70

Distance{2}{1}:=20
Distance{2}{2}:=47
Distance{2}{3}:=20
Distance{2}{4}:=40
Distance{2}{5}:=60

Distance{3}{1}:=40
Distance{3}{2}:=65

 // définition du tableau à 2 dimensions des angles
TABLEAU REEL(angles;0;0)
TABLEAU REEL(angles;3;5)
angles{1}{1}:=405
angles{1}{2}:=220
angles{1}{3}:=330

angles{2}{1}:=290
angles{2}{2}:=30
angles{2}{3}:=150
angles{2}{4}:=65
angles{2}{5}:=180

angles{3}{1}:=335
angles{3}{2}:=60

TheGraphe:=SGR_Generate_PolarGraph (->$DataGrapheName;->$DataGraphe;->DataSerie;->Distance;->angles)
 

• 

  Image correspondant à l'exemple de code ci-dessus