Movable Dynamic Controls

Quote:

---

Originally Posted by SirPereira

I hope you understand something of the code lol.

http://rapidshare.com/files/36432551...tudio.zip.html

---

the problem was the wmp fills the form. i modified it for you

http://www.scproject.biz/Zepphire%20TV%20Studio.zip

Quote:

---

Originally Posted by tearsculprit

Add a Panel and all the control move inside the panel.
http://www.vbforums.com/


When running the application, the border does not fit to the control inside the panel.
http://www.vbforums.com/


I did make some changes to the value of Location = New Point() to make it fit well to the control...
But do not know if i did the right things...

---

ok i'll check it over tomorrow. i've gotta get some sleep

tearsculprit, are the controls in the panel or on the form?

if they're on the form, you bind them with:

vb Code:

worker.boundControls.Add(New MoveResizeControl.controlHandler.boundControl(Me, Button1))

and if they're in the panel:

vb Code:

worker.boundControls.Add(New MoveResizeControl.controlHandler.boundControl(Panel1, Button1))

then you also need to use the panel's MouseDown + Paint events instead of the form's events

Quote:

---

and if they're in the panel:

vb Code:

worker.boundControls.Add(New MoveResizeControl.controlHandler.boundControl(Panel1, Button1))

then you also need to use the panel's MouseDown + Paint events instead of the form's events

---

It works great, but when I drag the control over the initial size of the panel, the auto scroll function is on and is extending the size of panel, when I click on any place of the panel, a running error occurs (NullReferenceException - Object reference not set to an instance of an object.)... So what should I do to handle this type of error???

vb Code:

Private Sub mControl_Move(ByVal sender As Object, ByVal e As System.EventArgs)
        activeControl.Invalidate() '<-- This line having error
        Application.DoEvents()
        drawBoundingRectangle()
        paintresize()
End Sub