Bonjour,
je débute en VB .net et je voudrais afficher un graphique dans un PictureBox à partir de niveau de tensions, temps, courant d'un appareil que je mesure par un port USB.
Une fois les valeurs acquises je crée l'objet suivant pour tracer le graphique :
Code :
- Dim AcqGraph As Graphics
- Private Sub graph_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Load
- AcqGraph = GraphPanel.CreateGraphics
- End Sub
|
GraphPanel étant mon picturebox
et je trace mon graphque avec ceci :
Code :
- Dim i, x, y, x1, y1, decalX, decalY As Single
- Dim trace As New Pen(Color.BlueViolet, 1) 'Le 1 signifie 1 pixel de large
- 'Début
- decalX = 0
- decalY = 110
- x1 = 0 + decalX
- y1 = 0 + decalY
- 'Trace le graphe
- For i = 0 To ValMax
- x = AcqValueX(i)
- y = AcqValueY(i)
- trace.Color = ChannelColor(ChanNum)
- AcqGraph.DrawLine(trace, x1, y1, (x + decalX), (y + decalY))
- 'Anciennes valeurs sauvées dans x1 et y1
- x1 = x + decalX
- y1 = y + decalY
- Next
|
Mon graphe s'affiche très bien, mais dès lors que je bouge la fenêtre, alors le graphe s'efface
Est-ce que vous pourriez m'expliquer comment "figer" le graphe, afin qu'il ne disparaisse pas dès qu'on l'on bouge la fenêtre..
Merci d'avance.
Gilbert.
Message édité par abaddon2002 le 11-01-2006 à 22:38:25