Plusieurs courbes sur le même graph MSChart [Résolu]

merif 9 Messages postés jeudi 29 juillet 2004Date d'inscription 21 septembre 2004 Dernière intervention - 8 sept. 2004 à 14:40 - Dernière réponse : trexor 134 Messages postés mercredi 9 mars 2005Date d'inscription 17 octobre 2010 Dernière intervention
- 18 août 2005 à 17:35
Bonjour à tous !
Je dispose d'un graph MSChart de type 2dXY sur lequel je souhaite tracer des spectres que j'acquiers les un après les autres. A chaque fois que j'obtient un spectre, je fais un petit tableau avec la longueur d'onde dans la première colonne et le coeff d'absorption dans la deuxième colonne. Puis j'affecte ce tableau à la propriété .Chardata de mon graph. Jusqu'ici tout va bien : un spectre s'affiche... Quand j'obtient mon deuxième spectre, je fais pareil et il s'affiche en effaçant le précedent...
Comment je fais pour que tous les spectres que j'obtient restent afficher dans mon graph ? Il faut peut être utiliser SeriesCollection mais je ne vois pas comment faire....
Merci !
Afficher la suite 

2 réponses

Meilleure réponse
merif 9 Messages postés jeudi 29 juillet 2004Date d'inscription 21 septembre 2004 Dernière intervention - 8 sept. 2004 à 17:17
3
Merci
Je me répond tout seul... Après une après midi d'obstination sur le site j'ai finis par trouver l'info.
Quand on utilise le type 2dXY de MSChart, la colonne contenant les abscisses doit être répétée avant chaque nouvelle série de données ; en gros ça donne un tableau du genre (avec X et Yi des vecteurs) :
[X, Y1,X, Y2, ..., X, Yn]

Voilà ! Maintenant je vais cloturer cette discussion...

Merci merif 3

Avec quelques mots c'est encore mieux Ajouter un commentaire

Codes Sources a aidé 95 internautes ce mois-ci

trexor 134 Messages postés mercredi 9 mars 2005Date d'inscription 17 octobre 2010 Dernière intervention - 18 août 2005 à 17:35
0
Merci
Bonjour,
Savez vous si on peut afficher 2 courbes sur un même graph de cette facon:
x,y,x1,y1?
car mon code ne marche pas...j'en ai marre de mschart!


Dim countGraf
As
Integer



Dim countRepere
As
Integer


countGraf = DataGridViewGraf.Rows.Count - 1


countRepere = DataGridRepere.Rows.Count - 1



Dim arrValues(countGraf, 6)



Dim i
As
Integer



For i = 1
To countGraf


arrValues(i, 1) =
"Visu panneau " & i
' Étiquettes


arrValues(i, 2) = DataGridViewGraf.Item(
"ZModif", i).Value
' Valeurs de la série 1.


arrValues(i, 3) = DataGridViewGraf.Item(
"YModif", i).Value
' Valeurs de la série 2.



Next i



For i = 1
To countRepere


arrValues(i, 4) =
"Repere " & i
' Étiquettes


arrValues(i, 5) = DataGridRepere.Item(
"ZModif", i).Value
' Valeurs de la série 1.


arrValues(i, 6) = DataGridRepere.Item(
"YModif", i).Value
' Valeurs de la série 2.



Next i


Graf.Plot.SeriesCollection(1).Pen.VtColor.Set(255, 255, 0)


Graf.Plot.SeriesCollection(2).Pen.VtColor.Set(100, 100, 0)


Graf.ChartData = arrValues

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.