Moin Leute!
Ich habe mit GDI ein Rectangle auf eine Picturebox gemalt welches sich bewegen lässt, soweit so gut.
Meine Deklaration sehen wie folgt aus:
Move Rectangle
Nun zu meinem Problem:
Ich übergebe ja in der Rectangle Deklaration mit den werten 50,50 die Größe des Rechtecks.
Aber wie ist es möglich die größe per NumericUpDown zu verändern?
Ich bekomme das ganze nur zum laufen wenn ich die "Move" funktion weglasse.
hier nochmal ein kleines Bild:
Ich habe mit GDI ein Rectangle auf eine Picturebox gemalt welches sich bewegen lässt, soweit so gut.
Meine Deklaration sehen wie folgt aus:
VB.NET-Quellcode
- Private Sub pb_Source_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pb_Source.MouseDown
- If e.Button = Windows.Forms.MouseButtons.Left AndAlso myRectangle.Contains(e.Location) Then
- x = myRectangle.X - e.X
- y = myRectangle.Y - e.Y
- End If
- End Sub
- Private Sub pb_Source_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles pb_Source.MouseMove
- If e.Button = Windows.Forms.MouseButtons.Left AndAlso myRectangle.Contains(e.Location) Then
- myRectangle.X = e.X + x
- myRectangle.Y = e.Y + y
- pb_Source.Refresh()
- End If
- End Sub
Nun zu meinem Problem:
Ich übergebe ja in der Rectangle Deklaration mit den werten 50,50 die Größe des Rechtecks.
Aber wie ist es möglich die größe per NumericUpDown zu verändern?
Ich bekomme das ganze nur zum laufen wenn ich die "Move" funktion weglasse.
hier nochmal ein kleines Bild: