Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Изменение размеров формы / 8 сообщений из 8, страница 1 из 1
25.07.2006, 06:09
    #33875356
Настенька
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Изменение размеров формы
поставило свойство формы borderstyle=none, как теперь мне изменять ее размеры? стрелочка при наведении на границу формы не появляется.
событие resize никак не работает. помогите!!!
...
Рейтинг: 0 / 0
25.07.2006, 08:22
    #33875425
shady
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Изменение размеров формы
событие resize происходит как раз когда размеры фомы меняются, а меняются они если borderStyle <> fixedSingle, fixedDialog, none
изменить размеры можно через
Me.Height
Me.Width
...
Рейтинг: 0 / 0
25.07.2006, 08:25
    #33875433
Настенька
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Изменение размеров формы
ну а как это отловить, вот загрузилась форма, я подвожу мышь к границе, стрелки, меняющей размер окна, нет.

что дальше то делать?
...
Рейтинг: 0 / 0
25.07.2006, 08:46
    #33875464
shady
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Изменение размеров формы
установить borderStyle неравное fixedSingle, fixedDialog, none, т.е. например sizable
...
Рейтинг: 0 / 0
25.07.2006, 10:09
    #33875658
Настенька
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Изменение размеров формы
нет, мне именно надо none. я потом рисую форму в иде закругленного прямоугольника, таскать его по экрану я нашла как, а вот изменять размеры никак не получается.
...
Рейтинг: 0 / 0
25.07.2006, 10:37
    #33875777
marvan
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Изменение размеров формы
Изменение размеров по нижней границе
По аналогии делаются остальные
Код: plaintext
1.
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)    Static fHeight As Boolean    On Error Resume Next    If Button = 0 Then        If Y > Me.Height - 100 And Y < Me.Height + 100 Then            If Not fHeight Then                Screen.MousePointer = 7                fHeight = True            End If        Else            If fHeight Then                Screen.MousePointer = 0                fHeight = False            End If        End If    ElseIf Button = 1 And fHeight Then        Me.Height = Y    End IfEnd Sub
Как отформатирован этот код?
...
Рейтинг: 0 / 0
25.07.2006, 11:01
    #33875851
Настенька
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Изменение размеров формы
да, появляется стрелочка на границе, но когда я нажимаю и сдвигаю границу, то дальше ничего не происходит. она осталась на прежнем месте.
...
Рейтинг: 0 / 0
25.07.2006, 11:08
    #33875881
Настенька
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Изменение размеров формы
Ой, извините. обшиблась. всё прекрасно работает. всем огромное спасибо. вопрос можно считать закрытым.
...
Рейтинг: 0 / 0
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Изменение размеров формы / 8 сообщений из 8, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]