Probleme mit der VB Net Graphics-Klasse


HermannBY

Grünschnabel
Hallo,

ichich habe eine Windowsform auf der sich eine Picturebox und ein Commandbutton befindet. Bei Klick auf den Commandbutten soll in der Picturebox ein Funktionsgraph dargestellt werden. Mein Problem besteht darin, dass beim Klicken der Graph gezeichnet und sofort wieder gelöscht wird ( kann man augenscheinlich beobachten. Erst beim zweiten Klick bleibt die Grafik bestehen.


Der Code sieht folgendermaßen aus:

Dim g as grphics = picturebox1.createGraphis
Dim p as Pen = new Pen(color.red,2)
Dim xy as Point
'Zuweisung der Punkte
g.drawCurve(p, xy,0)


Ich würde mich freuen wenn mir jemand sagen könnte, was ich tun muss damit der Graph bereits beim 1. Klick dauerhaft gezeichnet wird.
 

JensG

Erfahrenes Mitglied
Hallo,

wenn das bei dir keine Tipfehler sind dann kann das eigentlich gar nicht funktionieren.
Ich habs mal so wie es in etwa in der Onlinehilfe steht getestet und das Funktioniert
wunderbar.

Code:
        Dim g As Graphics = PictureBox1.CreateGraphics
        Dim p As Pen = New Pen(Color.Red, 2)

        Dim point1 As New PointF(50.0F, 50.0F)
        Dim point2 As New PointF(100.0F, 25.0F)
        Dim point3 As New PointF(200.0F, 5.0F)
        Dim point4 As New PointF(250.0F, 50.0F)
        Dim point5 As New PointF(300.0F, 100.0F)
        Dim point6 As New PointF(350.0F, 200.0F)
        Dim point7 As New PointF(250.0F, 250.0F)

        Dim xy As PointF() = {point1, point2, point3, point4, point5, point6, point7}


        g.DrawCurve(p, xy)
Jens