ладно, ближе, как говорится, к телу...
и так, многие (особенно начинающие) задаются вопросом: "Как ограничить минимальный размер окна приложения, сохранив при этом возможность изменения размеров?". ответ на этот вопрос напрашивается сам собой: "Обрабатываем событие Form_Resize() и восстанавливаем размеры окна, если они стали меньше (или больше) допустимых". но при этом появляется неприятный эффект - окно начинает мигать. может быть, кто-то уже и решил эту проблему индивидуально для себя, но я в сети решений не припомню. а сего дня эксперементируя над новым интерфейсом в голову пришла, на первый взгляд, глупая идея: " А что, если при достижении граничных размеров взять и отключить форму, а перед выходом из процедуры Form_Resize() включить..."
вот что у меня получилось
- Код: Выделить всё
Private Sub Form_Resize()
If Me.WindowState <> vbMinimized Then ' страхуемся от ошибок, когда форму сворачивают
If Me.Width < 8000 Then ' проверяем ширину
' точно также можно и на максимальныцй размер проверять
Me.Width = 8000
Me.Enabled = False
End If
If Me.Height < 7000 Then ' ну а тут высота
Me.Height = 7000
Me.Enabled = False
End If
End If
Me.Enabled = True ' включаем форму (в любом случае)
End Sub