타이틀바가 없는 윈도우폼 드레그
가. 언어유형/Visual Basic
2009. 4. 28. 14:30
Private Sub Form_MouseDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles MyBase.MouseDown Dim xOffset As Integer Dim yOffset As Integer If e.Button = MouseButtons.Left Then xOffset = -e.X - SystemInformation.FixedFrameBorderSize.Width yOffset = -e.Y - SystemInformation.FixedFrameBorderSize.Height mouseOffset = New Point(xOffset, yOffset) isMouseDown = Tru..