Как я препятствую тому, чтобы форма была изменена пользователем?

Это не действительно более кратко, но могло бы быть более гибким путем ( кредит ):

FOR /F "TOKENS=1* DELIMS= " %%A IN ('DATE/T') DO SET CDATE=%%B
FOR /F "TOKENS=1,2 eol=/ DELIMS=/ " %%A IN ('DATE/T') DO SET mm=%%B
FOR /F "TOKENS=1,2 DELIMS=/ eol=/" %%A IN ('echo %CDATE%') DO SET dd=%%B
FOR /F "TOKENS=2,3 DELIMS=/ " %%A IN ('echo %CDATE%') DO SET yyyy=%%B
SET date=%mm%%dd%%yyyy%

53
задан Anonymous Penguin 18 July 2013 в 04:26
поделиться

5 ответов

//Set fixed border
yourForm.FormBorderStyle = System.Windows.Forms.FormBorderStyle.Fixed3D

//Set the state of your form to maximized       
yourForm.WindowState = FormWindowState.Maximized

//Disable the minimize box and the maximize box
yourForm.MinimizeBox = False
yourForm.MaximizeBox = False
4
ответ дан 7 November 2019 в 08:31
поделиться

Установить стиль начала окна как развернутый. Затем скройте кнопки свертывания и разворачивания.

2
ответ дан 7 November 2019 в 08:31
поделиться

Чтобы пользователи не могли изменять размер, установите для FormBoderStyle значение Fixed3D или FixedDialog из окна свойств или из кода

frmYour.BorderStyle = System.WinForms.FormBorderStyle.Fixed3D

. Установите для свойства WindowState значение Maximized, установите для свойств MaximizeBox и MinimizeBox значение false.

Чтобы пользователь не мог перемещаться, переопределите WndProc

Protected Overrides Sub WndProc(ByRef m As Message)
        Const WM_NCLBUTTONDOWN As Integer = 161
        Const WM_SYSCOMMAND As Integer = 274
        Const HTCAPTION As Integer = 2
        Const SC_MOVE As Integer = 61456

        If (m.Msg = WM_SYSCOMMAND) And (m.WParam.ToInt32() = SC_MOVE) Then
            Return
        End If

        If (m.Msg = WM_NCLBUTTONDOWN) And (m.WParam.ToInt32() = HTCAPTION) Then
            Return
        End If

        MyBase.WndProc(m)
    End Sub
3
ответ дан 7 November 2019 в 08:31
поделиться

Вы можете удалить пользовательский интерфейс, чтобы управлять этим, с помощью:

frmYour.MinimizeBox = False
frmYour.MaximizeBox = False
1
ответ дан 7 November 2019 в 08:31
поделиться

Задайте для минимального и максимального размера формы одинаковые числа. Не отображать кнопки минимума и максимума.

-1
ответ дан 7 November 2019 в 08:31
поделиться
Другие вопросы по тегам:

Похожие вопросы: