Voici un bout de code permettant la création d'un histogramme.
(Il avait été écrit du temps de Windev 7.5 mais fonctionne toujours sous Windev 9)
J'espère, qu'il pourra te servir de base pour ton camembert ...
grCrée("Graphe2",grHisto)
grLibellé("Graphe2",grAfficheValeur,Vrai)
grQuadrillage("Graphe2",Vrai,grAbscisse)
grEtiquetteCatégorie("Graphe2",1,"1ère année")
grEtiquetteCatégorie("Graphe2",2,"2ème année")
grEtiquetteCatégorie("Graphe2",3,"3ème année")
grEtiquetteCatégorie("Graphe2",4,"4ème année")
grEtiquetteCatégorie("Graphe2",5,"5ème année")
grEtiquetteCatégorie("Graphe2",6,"6ème année")
grEtiquetteSérie("Graphe2",1,"Echecs filles")
grEtiquetteSérie("Graphe2",2,"Echecs garçons")
grEtiquetteSérie("Graphe2",3,"Total des échecs")
grEtiquetteSérie("Graphe2",4,"Population classe")
Titre="Année scolaire: 2004-2005 *** Nombres d'échecs F/G/Totaux... par année"
grTitre("Graphe2",Titre)
grLégende("Graphe2",grAGauche)
grDestinationFen("Graphe2",EchecInterne,"Enseignement de la C.F. - Nombres d'échecs")
// 1ère année
grAjouteDonnée("Graphe2",1,1,EchecsP1F)
grAjouteDonnée("Graphe2",2,1,EchecsP1G)
grAjouteDonnée("Graphe2",3,1,EchecsP1F+EchecsP1G)
grAjouteDonnée("Graphe2",4,1,TotP1F+TotP1G)
// Idem pour les autres années avec leurs données spécifiques ...
// Affichage du graphique
grDessine("Graphe2")
SI OuiNon("Impression du graphique ?")=Oui ALORS grImprime("Graphe2") |