Платные хостинги     Раскрутка сайта     Книги по программированию

- Как задать минимальный размер формы?

- Пожалуйста помогите!!!!КАК сделать так чтобы форма уменьшалась только до определенного размера?

- Обработать Resize формы

- Можно пожалуйста по подробнее плиз!! Это сообщение отредактировал Olone - 23.10.2004, 06:42

- самый простой вариант:Код Private Sub Form_Resize()   If Me.Width < 3000 Then Me.Width = 3000   If Me.Height < 3000 Then Me.Height = 3000End SubhighlightSyntax('vbGQ2ZmR','vb');

- Хороший способ, я тоже о нем думал, но получится, что уменьшение формы как будто возможно и юзверь будет пытаться уменьшить раз 100 пока не догонит что нельзя.Есть какой другой способ?

- Код Private Sub Form_Resize() Dim Flag as Boolean Flag=False If Me.Width < 3000 Then   Me.Width = 3000   Flag=True End If If Me.Height < 3000 Then   Me.Height = 3000   Flag=True End If If Flag Then   MsgBox "Делать форму меньшего размеру - низзя!!!" End IfEnd SubhighlightSyntax('vbOGE2MD','vb');

- sash, опередил меня только хотел скинуть такой же пример...

Интернет казино     Онлайн игры     Увеличение члена     Купить DVD