Как запретить пользователю изменять размеры диалогов в VB6? Диалоги маленькие и простые, и изменение их размера не имеет смысла, поэтому я предпочел бы предотвратить это, чем писать код для обработки.
Вы можете установить BorderStyle формы на «Фиксированный одиночный» (vbFixedSingle) или «Фиксированный диалог» (vbFixedDouble) во время разработки , Любое из этих действий не позволит пользователю изменить размер формы.
BorderStyle
vbFixedSingle
vbFixedDouble
Фиксированный одиночный обеспечивает окно меню Control, строку заголовка, Развернуть кнопка и кнопка сворачивания. Форма будет по-прежнему можно изменить размер с помощью Кнопки «Развернуть» и «Свернуть», но не перетаскивая края окна. Фиксированный диалог предоставляет окно меню Control и строку заголовка, но устраняет максимизировать и минимизировать кнопок. Поэтому не может быть изменен размер совсем. (Также обратите внимание, что форма, которая содержит меню не может быть отображено как фиксированный диалог и автоматически изменено на фиксированную одиночную границу стиль.)
Фиксированный одиночный обеспечивает окно меню Control, строку заголовка, Развернуть кнопка и кнопка сворачивания. Форма будет по-прежнему можно изменить размер с помощью Кнопки «Развернуть» и «Свернуть», но не перетаскивая края окна.
Фиксированный диалог предоставляет окно меню Control и строку заголовка, но устраняет максимизировать и минимизировать кнопок. Поэтому не может быть изменен размер совсем. (Также обратите внимание, что форма, которая содержит меню не может быть отображено как фиксированный диалог и автоматически изменено на фиксированную одиночную границу стиль.)
См. Также соответствующую запись MSDN: http://msdn.microsoft.com/en-us/library/aa245047(VS.60).aspx
Выберите как BorderStyle "Fixed Single"
Изменить BorderStyle. Я думаю, панель инструментов, фиксированный диалог или окно свойств должны делать это.
Вы можете установить BorderStyle формы на «Фиксированный одиночный», а если вы хотите иметь минимизируемую форму, установите для свойства MinButton значение «True».
опции границы формы, доступные в vb6:
me.BorderStyle = 0 ' – None me.Appearance = 0 '– Flat me.BorderStyle = 1 '– Fixed Single me. Appearance = 1 '– 3D me.BorderStyle = 1 '– Fixed Single