|
|
|
Как можно перехватить событие перемещения формы?
|
|||
|---|---|---|---|
|
#18+
Есть форма. Пользователь хватает ее за заголовок формы и тащит. Как то можно перехватывать это событие? Имеется в виду средствами VB. Если стандартных средств в VB нет, то может как-нибудь по другому? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 07.12.2004, 09:04:17 |
|
||
|
Как можно перехватить событие перемещения формы?
|
|||
|---|---|---|---|
|
#18+
Вот такой корявенький вариант - при помощи таймера проверяем периодически координаты формы и если они изменились, считаем, что форма подвинута Dim xms, yms Private Sub Timer1_Timer() If Not IsEmpty(xms) And (Me.Left <> xms Or Me.Top <> yms) Then .... перехватили .... DoEvents End If xms = Me.Left yms = Me.Top End Sub ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 07.12.2004, 15:28:22 |
|
||
|
|
start [/forum/topic.php?fid=60&gotonew=1&tid=2168485]: |
0ms |
get settings: |
9ms |
get forum list: |
17ms |
check forum access: |
4ms |
check topic access: |
4ms |
track hit: |
68ms |
get topic data: |
11ms |
get first new msg: |
7ms |
get forum data: |
3ms |
get page messages: |
44ms |
get tp. blocked users: |
1ms |
| others: | 245ms |
| total: | 413ms |
| 0 / 0 |
