Moving Forms without...

While moving the forms I don't want to display the contents of the forms. How do I do it? I know that if we move by clicking on the control box the form moves as I want but in my project I want the similar functionality when I move it by clicking anywhere on the form :(


:p Kinjal :p

Code:

---

Dim xx, yy
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
    xx = X: yy = Y
End Sub

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
    If Button Then
        Move Left - xx + X, Top - yy + Y
    End If
End Sub

---

thats for the moving part, about having content not shown, i think it's something in the registry to modify

Thanks Kedaman vut the moving part I already know. The only problem is that when I move the form by pulling it from the control box area the contents are not displayed but as soon as I move by clicking anywhere in the form, the contents of the form are shown and I don't want this. I don't think I have to modify registry for this.


:p Kinjal :p

"control box area" What is this? Title bar? I seem to missunderstand you. I thought you wanted that effect you're dragging a form and a grey rectangle moves instead of the form

You got it right Kedaman! I was talking about the same thing and in "Windows" language it is called "Showing contents of a window" :D

Do you know how to do it?


:p Kinjal :p

I have the form dragging thing, somewhere, i'll search it for you, my hd is a mess right now

Thanks a lot Kedaman!

I'll be waiting for it.