[ZEDGRAPH] Creation de courbe en temps réel

Version imprimable

21/08/2007, 17h47
DarkWark

[ZEDGRAPH] Creation de courbe en temps réel

Bonjour,

J'ai créé une courbe qui affiche des points en temps réél via la librairie ZEDGRAPH. Lorsqu'un point supplémentaire s'affiche, mon graphique se compresse.

A l'instant T + 1 seconde, un point supplémentaire est ajouté, le grahique est un peu plus compressé (moin haut et moin large)

Est il possible de changer se comportement en laissant le graphique à une taille fixe et en rajoutant une scrollbar horizontale plutot que de compresser le graphique ?
21/08/2007, 20h38
CSharpMan

Slt je ne connait pas bien la dll zedgraph que je n'ai jamais utiliser mais tu dois avoir un epropriete pour la taille de ton graph essaye tu bloquer cette taille avec sizeminimum ou une autre propriete du genre
22/08/2007, 00h41
knowl

Salut DarkWark,

Peut-être que ça pourrait t'aider:IsShowHScrollBar
http://www.codeproject.com/csharp/zedgraph.asp
22/08/2007, 12h59
DarkWark

Bonjour et merci pour vos réponses.

knowl j'ai bien essayé avec cette propriété.
Voici le comportement : si je zoom avec la molette sur mon graph pas de problème, j'arrive bien a naviguer comme je le souhaite avec les scrollbar dans mon graph. Par contre lors du première affichage ( sans avoir zoomé ), J'ai toujours le graphique qui se compresse !

Je cherche donc toujours une solution (ou une propriété) pour empécher la compression de mon graph. Une solution pourrais être en déterminant une echelle fixe pour les axes X et Y de mon graph... Mais je n'ai pas encore trouvé comment faire cela...

Merci pour votre aide ! j'ai encore besoin d'un tt petit coup de pouce et c bon.
22/08/2007, 13h21
knowl

Tu ne pourrais pas le mettre dans un panel autoscrollable qui grandirait avec ton graph en fixant la value du panel.horizontalscroll à max à chaque tic? J'entends par là augmenter la taille du graph à chaque nouveau point plutôt que d'ajouter des points dans une taille fixe? Mais je t'avoue ne pas être expert sur le sujet :(
Sinon http://sourceforge.net/project/showf...kage_id=125872 si tu n'as pas déjà.
08/07/2010, 08h52
megamario

Bonjour,

Je suis sur un projet utilisant zedgraph, et cette fonctionnalité m'intéresserait fortement.

le post date un peut mais vous avez peut être trouvé la solution et toujours sa sous le coude.

D'autre part je cherche s'il est possible de modifier à la voler l'échelle de l'axe des Y.

Car actuellement j'enregistre les données à partir d'une maquette de test et du coup les valeurs sont presque fixe. Vu que j'ai laissé en automatique la gestion des échelles de l'axe des Y je me retrouve avec un gribouillis autours de ma valeur principal qui est 60V.
La tension oscillant de 60.2 à 59.8v environ. Mon axe Y mini maxi allant du coup de 60.5 à 59.5 env (pour donner une idée).

Bonjour,

pour fixer de façon manuelle l'échelle des X ou Y sur Zedgraph
Code:

1 2 3 4 5 6 GraphPane g = this.zedGraphControl1.GraphPane; g.YAxis.Scale.MaxAuto = false; g.YAxis.Scale.MinAuto = false; g.YAxis.Scale.Max = 1000; g.YAxis.Scale.Min =0;

08/07/2010, 13h37
megamario
Citation:
Envoyé par nostradamus

Bonjour,

pour fixer de façon manuelle l'échelle des X ou Y sur Zedgraph

Code:

1 2 3 4 5 6 GraphPane g = this.zedGraphControl1.GraphPane; g.YAxis.Scale.MaxAuto = false; g.YAxis.Scale.MinAuto = false; g.YAxis.Scale.Max = 1000; g.YAxis.Scale.Min =0;
Merci, j'ai utilisé le même principe sauf que je contrôle à chaque mesures si je doit aller plus haut ou plus bas car je ne connais jamais ma pleine échelle, de plus on a des mesures de type tension courant puissance etc.. avec des grandeurs complètement différentes, mais le principe est le même.

Bonjour,

Je suis en train de travailler avec la librairie ZedGraph. Je suis toute

débutante, et je voudrais te demander, comment tu as fait pour ajouter point

par point sur le graphic ?

En fait, je voudrais déclarer "PointPairList()" comme une variable globale, et

ensuite ajouter des points dans un timer. Tu pourrais m'aider ? je suis bloquée

dessus

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
 
Imports ZedGraph
 
Public Class FormZedGraph
    ' Dim X, Y As Double
    Public myPane As New GraphPane
    Public list = New PointPairList()
    Dim x As Double = 0
    Dim y As Double = 0
 
    Private Sub Setsize()
        zg1.Location = New Point(10, 10)
        zg1.Size = New Size(ClientRectangle.Width - 20, ClientRectangle.Height - 20)
    End Sub
 
    Private Sub ZedGraph_Resize(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Resize
        Setsize()
    End Sub
 
    Private Sub CreateGraph(ByVal x As Double, ByVal y As Double)
        myPane.XAxis.Title.Text = "X Value"
        myPane.YAxis.Title.Text = "My Y Axis"
        For x = 0 To 36
            Math.Sin(x * Math.PI / 15)
            list.Add(x, y)
        Next x
        Dim myCuvre As LineItem = myPane.AddCurve("My cuvre", list, Color.Blue, SymbolType.Circle)
 
        myCuvre.Line.Fill = New Fill(Color.White, Color.Red, 45.0F)
        zg1.AxisChange()
 
    End Sub
 
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Timer1.Enabled = True
    End Sub
 
    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Timer1.Enabled = False
    End Sub
 
    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        x = x + 1
        y = y + 1
        myPane = zg1.GraphPane
 
        list.add(x, y)
 
        Dim myCuvre As LineItem = myPane.AddCurve("My cuvre", list, Color.Blue, SymbolType.Circle)
        zg1.AxisChange()
    End Sub
End Class

Citation:

Envoyé par xingjing910

Bonjour,

Je suis en train de travailler avec la librairie ZedGraph. Je suis toute débutante, et je voudrais te demander, comment tu as fait pour ajouter point par point sur le graphic ?
En fait, je voudrais déclarer "PointPairList()" comme une variable globale, et ensuite ajouter des points dans un timer. Tu pourrais m'aider ? Je suis bloquée dessus

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
 
Imports ZedGraph
 
Public Class FormZedGraph
    ' Dim X, Y As Double
    Public myPane As New GraphPane
    Public list = New PointPairList()
    Dim x As Double = 0
    Dim y As Double = 0
 
    Private Sub Setsize()
        zg1.Location = New Point(10, 10)
        zg1.Size = New Size(ClientRectangle.Width - 20, ClientRectangle.Height - 20)
    End Sub
 
    Private Sub ZedGraph_Resize(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Resize
        Setsize()
    End Sub
 
    Private Sub CreateGraph(ByVal x As Double, ByVal y As Double)
        myPane.XAxis.Title.Text = "X Value"
        myPane.YAxis.Title.Text = "My Y Axis"
        For x = 0 To 36
            Math.Sin(x * Math.PI / 15)
            list.Add(x, y)
        Next x
        Dim myCuvre As LineItem = myPane.AddCurve("My cuvre", list, Color.Blue, SymbolType.Circle)
 
        myCuvre.Line.Fill = New Fill(Color.White, Color.Red, 45.0F)
        zg1.AxisChange()
 
    End Sub
 
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Timer1.Enabled = True
    End Sub
 
    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Timer1.Enabled = False
    End Sub
 
    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        x = x + 1
        y = y + 1
        myPane = zg1.GraphPane
 
        list.add(x, y)
 
        Dim myCuvre As LineItem = myPane.AddCurve("My cuvre", list, Color.Blue, SymbolType.Circle)
        zg1.AxisChange()
    End Sub
End Class

Bonjour, je n'est pas trop le temps de te répondre à fond car nous avons un souci au taf, mais se sera volontiers pendant le pont

Mais voici ma méthode qui me permet d'ajouter des points en temps réel.

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
 Public Sub Trace(ByVal Tab() As Double, ByVal myunit() As String)
        Try
 
            Dim Dt As Date = Now
            Dim axeX As XDate = Now  ' valeur du début de l'axe du temps
            Dim Nb As Integer = 0
 
 
            'Enregistrement de la 1ere date.
            If Not dateLu Then
                minX = axeX
                dateLu = True
            End If
 
            'Remplissage de la courbe
            If Fin = False Then
 
                list1.Add(axeX, Tab(0))
                If NbCourbe > 1 Then list2.Add(axeX, Tab(1))
                If NbCourbe > 2 Then list3.Add(axeX, Tab(2))
                If NbCourbe > 3 Then List4.Add(axeX, Tab(3))
            End If
 
            maxX = axeX
            zg1.GraphPane.XAxis.Scale.Min = minX
            zg1.GraphPane.XAxis.Scale.Max = maxX
            zg1.GraphPane.AxisChange()
 
            Me.Refresh()
        Catch ex As Exception
            MessageBox.Show("FormAcquisition / Erreur dans Trace")
        End Try
    End Sub

Moi j'utilise des dates pour l'axe des X mais peut importe, et j'ai 4 courbe maximum.
Comme tu peut le constater:
-Je ne fait qu'ajouter des valeurs à list1 list2 list3 list4 qui sont des pointpairlist
-Je modifie la valeur mini et max de l'axe des X.
-Je rafraîchi la form

T'a déclaration Dim myCuvre As LineItem = myPane.AddCurve("My cuvre", list, Color.Blue, SymbolType.Circle) doit être faite avant le Tick et tu n'a plus à le faire ensuite, sauf si tu réinitialise ton graph.

J’espère que tu va pouvoir te dépatouillé avec sa, tien moi au courant, si non je regarderais mon code plus en détail pour t'aider.

[Edit] Je t'ajoute mes déclarations:

Code:

1
2
3
4
5
6
7
8
    Private minX, maxX As XDate
    Private myPane As GraphPane
    Private list1, list2, list3, List4 As New PointPairList
    Private Courbe1, Courbe2, Courbe3, Courbe4 As LineItem
 
    'l'utilisation:
    myPane = zg1.GraphPane
    Courbe1 = myPane.AddCurve(Nom(0), list1, Color.Black, SymbolType.None)

16/05/2012, 11h43
xingjing910

Salut Megamario,

Merci bien pour ta réponse. Oui, tu réponds quand tu as le temps et quand ça

te dérange pas. :ccool: Merci !!!

Je vais travailler sur ton code, super !

Bonne journée.

PS: je suis stagiaire et je ne peux pas faire le pont T_T
16/05/2012, 12h56
megamario

Citation:

Envoyé par xingjing910

Salut Megamario,

Merci bien pour ta réponse. Oui, tu réponds quand tu as le temps et quand ça

te dérange pas. :ccool: Merci !!!

Je vais travailler sur ton code, super !

Bonne journée.

PS: je suis stagiaire et je ne peux pas faire le pont T_T

Tu devrais y arriver avec ce que je t'ai donné, toutefois je ne vois pas ce que tu chercher à faire avec la méthode CreateGraph. Tu veux crée une sinusoïde ? ou c'etait juste pour des tests?
16/05/2012, 14h45
xingjing910

Citation:

Envoyé par megamario

Tu devrais y arriver avec ce que je t'ai donné, toutefois je ne vois pas ce que tu chercher à faire avec la méthode CreateGraph. Tu veux crée une sinusoïde ? ou c'etait juste pour des tests?

C'est pour le test justement. :P

Salut megamarion,

:cry: Je suis vraiment pas douée pour le prog...

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
 
Imports ZedGraph
 
'Déclaration des variables globales 
Public Class FormZedGraph
    Dim myPane As GraphPane
    Dim list As New PointPairList
    Dim Courbe As LineItem
    Dim Nom() As Double
    Dim x As Double = 0
    Dim y As Double = 0
 
'Le boutton qui va lancer le Timer qui va ajouter des points
  Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        myPane = zg1.GraphPane
        Courbe = myPane.AddCurve(Nom(0), list, Color.Black, SymbolType.None)
        Timer1.Enabled = True
    End Sub
 
'Arrêter le timer
 Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Timer1.Enabled = False
    End Sub
 
 
 Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        x = x + 1
        y = y + 1
        list.Add(x, y)
        zg1.GraphPane.AxisChange()
        Me.Refresh()
 
    End Sub
 
End Class

tu pourrais voir quand tu auras un moment ? Je suis vraiment désolée ....

16/05/2012, 15h30
xingjing910

Ok, c'est bon, j'arrive à ajouter les points :lol:

Je continue pour avoir plus de fonctionnalités.

Merci beaucoup Megamarion pour ton code, c'est gentil de passer un peu du

:ccool: temps pour m'expliquer ... Merci
16/05/2012, 15h37
megamario

Pas de souci, je regarde sa demain.

Si j'oublie relance moi, il n'y a pas de souci.

T’inquiète pas, je pense que cela doit être juste quelques déclarations qui doivent manquer car le code semble pas si mal.

Je me considère aussi débutant, parfois c'est pas simple, surtout quand tu doit modifier un code pour l'adapter à de nouvelle demande alors qu'il n'y a pas de commentaires dans le code.
Mais sur ce site on trouve souvent les réponses à nos souci. Il y a des gens vraiment doués et sympathique.
21/05/2012, 08h31
megamario

Je voie que tu a trouvé donc je n'est pas poussé plus loin ma recherche, bonne chance pour la suite
21/05/2012, 09h38
xingjing910

Salut Megamario,

Merci encore pour ton aide. Oui, j'ai réussi à avoir le fonctionnement basique. Après, il faut que je cherche des fonctions qui adaptent à mon cahier des charges.

Je suis en train de regarder le cours proposé sur le site " The code projet".

Je voudrais demander si tu connais un site qui explique aussi plus en détails les différents fonctionnements de ZedGraph ?
21/05/2012, 10h03
megamario

Citation:

Envoyé par xingjing910

Salut Megamario,

Merci encore pour ton aide. Oui, j'ai réussi à avoir le fonctionnement basique. Après, il faut que je cherche des fonctions qui adaptent à mon cahier des charges.

Je suis en train de regarder le cours proposé sur le site " The code projet".

Je voudrais demander si tu connais un site qui explique aussi plus en détails les différents fonctionnements de ZedGraph ?

Malheureusement non, si tu en trouve un fait moi signe. De plus Zedgraph est arrêté donc plus de suivi.

J'ai tenté rapidement d'essayé Chart mais je le trouve plus complexe. Mais bon je me suis pas attardé non plus.
21/05/2012, 10h17
xingjing910

Citation:

Envoyé par megamario

Malheureusement non, si tu en trouve un fait moi signe. De plus Zedgraph est arrêté donc plus de suivi.

J'ai tenté rapidement d'essayé Chart mais je le trouve plus complexe. Mais bon je me suis pas attardé non plus.

Ok, ça marche. Pas de soucis :ccool:
21/05/2012, 10h23
xingjing910

http://zedgraph.sourceforge.net/docu...N_ZedGraph.htm

j'ai tapé sur google, pour avoir une explication sur une propriété, et j'ai trouvé ça.