Как перемещать форму без бордюров - Visual Basic .NET
Формулировка задачи:
создал форму в vb2010, от отключил верхний бар (заголовок) и теперь невозможно передвигать окно после запуска программы. вопрос: как сделать окно передвижным без включения верхнего бара?
Решение задачи: «Как перемещать форму без бордюров»
textual
Листинг программы
Public Class Form1 'декларация функций и констант Win32API Declare Function ReleaseCapture Lib "user32" () As Integer Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Integer, ByVal wMsg As Integer, ByVal wParam As Integer, ByVal lParam As Integer) As Integer Public Const HTCAPTION = 2 Public Const WM_NCLBUTTONDOWN = &HA1 Private Sub Form1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseDown ReleaseCapture() SendMessage(Me.Handle, WM_NCLBUTTONDOWN, HTCAPTION, 0&) End Sub End Class