JavaScript отключён. Чтобы полноценно использовать наш сайт, включите JavaScript в своём браузере.

Ответить в теме

Сообщение: [QUOTE="Сергій, post: 259901, member: 8352"] Form1.Enabled = False [automerge]1524223621[/automerge] Или как другой вариант: в свойствах формы BorderStyle = 0 на форме создать массив из 3-х кнопок Private Sub Command1_Click(Index As Integer) Me.WindowState = Index End Sub так как кнопок 3: нулевая, первая и вторая, то и WindowState в результате нажатия соответственных кнопок будет: нормально, свернуто, развернуто. И создать еще одну Command2.Caption = "x" для завершения работы приложения. Но Dragocas ,как всегда, круче всех! [/QUOTE]