Tracer une courbe en temps réel avec ZedGraph

Salut tout le monde,

Je suis en train de travailler sur un projet où je dois faire un oscilloscope. Avec des soucis de comptabilité de version Net, je ne peux pas utiliser (Plutôt je ne sais pas comment on fait pour avoir le contrôle "Chart" dans la version Net 2).

Du coup, je me suis dirigé vers ZedGraph. J'ai pris l'exemple sur le site qui trace une courbe sinusoïdale dans une procédure. Je l'ai inséré dans mon code, Quand je lance l'application, la procédure se lance. tout se passe bien jusqu'à ici.

Le soucis arrive, vu que je vais tracer cette courbe avec les données venantes de Bus CAN, il faut que je déclare cette ZedGraph comme une variable globale. En suite, dans le programme où on reçoit les données, j'ajoute la nouvelle donnée dans la graphique. Mais quand je compile, ça bug..

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

'Déclaration des variables globales 'This part is used for creating a graphic Dim Graphic As ZedGraphControl Dim myPane As GraphPane = Graphic.GraphPane Dim DataList As New PointPairList() Dim X, Y As Single 'Pour la graphic oscilloscope   'Dans le programme où on reçoit la nouvelle donnée "Value" If NumeroMenu = 5 Then Y = Value X = X + 1 DataList.Add(X, Y) ZedGraphControl1.AxisChange() End If

---

Vous avez une idée ?

Je suis désolée, c'est un peu long et merci d'avance pour votre temps :ccool:

Salut

Citation:

---

Mais quand je compile, ça bug..

---

:massacre:

à quelle ligne as tu une erreur

Citation:

---

Envoyé par shayw

Salut

:massacre:

à quelle ligne as tu une erreur

---

Salut,

Merci de ta réponse. En fait, dans le programme, je ne peux pas appuyer sur "Démarrer le débogage F5", je dois faire "Générer". La génération est réussite, mais quand j'ouvre le module, il y a des erreurs ......

En fait, je programme un module d'un Can Analyser. Quand j'appuie sur "Démarrer le débogage F5", le message est suivant:

Citation:

---

Un projet avec un type de sortie de bibliothèque de classes ne peut pas être démarré directement.
Pour déboguer ce projet, ajoutez à cette solution un projet exécutable qui fait référence au projet bibliothèque, définissez le projet exécutbale comme projet de démarrage

---

Merci beaucoup !

Edit
Salut Shayw,

Quand j'ouvre le module, le message d'erreur suivant est affiché :

Citation:

---

Exception terminated modules user interface thread

---

Vu que je suis toute débutante sur VB, je n'ai pas du tout la notion sur ce genre de problème. Si tu as une idée ?

Edit
J'explique ce que j'ai fait :
J'ai mis un contrôle ZedGraph dans le forme, après je déclare les variables globales

Code:

---

1 2 3 4

Dim myPane As GraphPane = ZedGraphic.GraphPane Dim DataList As New PointPairList() Dim X, Y As Double 'Pour la graphic oscilloscope

---

Dans la partie où on reçoit la nouvelle valeur, j'ai mis

Code:

---

1 2 3 4 5 6 7

If NumeroMenu = 5 Then Y = Value X = X + 1 DataList.Add(X, Y) ZedGraphic.AxisChange() Setsize() End If

---

Tous ces codes, j'ai prise dans l'exemple de "ZedGraph". je ne fais que les séparer. Si quelqu'un a une idée ?

ici

ton projet est de type class library
pour le tester ta class clique sur le icon solution explorer et ensuite clique avec le bouton droit sur le nom du projet dans la fenetre qui s'ouvre clique add
et choisi winform et nomme la formtest
dans la class formtest utilises ta class library en créant une instance
de cette class

ce n'est pas finit :pc:

dans les proriétés du projet -> application -> dans le combobox application type change et choisi windows form application
et ensuite dans le start up object choisi formtest
tu peux tester avec le debugger

Salut Shayw,

Merci de tes informations. Je suis en train de lire dessus, et merci bien :ccool:

Salut Shayw,

J'ai une question, stp.

Dans l'exemple de ZedGraph, tous les données sont stockées dans une liste

Code:

---

Dim List = New PointPairList()

---

Ensuite, il a rempli la liste avant de la tracer. Ma question est que, vu que je faire un oscilloscope, je ne peux pas remplir la liste avant de tracer. Ce que je voudrais, c'est que ajouter point par point au lieu de tracer tous les points.

Tu as une idée ?

bon
pour voir un peu le zedgraph
j'ai téléchargé le code ici

dans le code tous les points sont crées avant

Code:

---

1 2 3 4 5

Dim x As Double, y As Double For x = 0 To 360 y = Math.Sin(x * Math.PI / 180.0) list.Add(x, y) Next x

---

et ensuite le graph est tracé

Code:

---

zg1.AxisChange()

---

j'ai essayé de créer le graph dans un timer mais cela donne rien
parce je pense que la méthode est la suivante
ex graph sin
le points sont crées

Code:

---

1 2 3 4 5

For x = 0 To 360 y = Math.Sin(x * Math.PI / 180.0) list.Add(x, y) Next x Private myCurve As LineItem

---

générer mycurve

Code:

---

myCurve = myPane.AddCurve("My Curve", list, Color.Blue, SymbolType.None)

---

doit etre généré une seule fois
et tracer le graph

Code:

---

zg1.AxisChange()

---

pourquoi tu ne peux pas créer les coordonnées du graph avant ?