Пишу UserControl...
Функции его переррисовки находяться в модуле. Перед перерисовкой контрол нужно очищать. UserControl.cls естественно не поможет. Как быть?
Вопросы по UserConrol
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Сообщений: 12
• Страница 1 из 1
- lister
- Постоялец
-
- Сообщения: 389
- Зарегистрирован: 15.01.2005 (Сб) 7:34
- Откуда: Страна оления
Вопросы по UserConrol
lister » 11.03.2006 (Сб) 12:03
- GSerg
- Шаман
- Сообщения: 14286
- Зарегистрирован: 14.12.2002 (Сб) 5:25
- Откуда: Магадан
GSerg » 11.03.2006 (Сб) 12:08
Во-первых, почему они там находятся, и во-вторых, а как же они в этом случае узнают, где рисовать?
Как только вы переберёте все варианты решения и не найдёте нужного, тут же обнаружится решение, простое и очевидное для всех, кроме вас
- lister
- Постоялец
-
- Сообщения: 389
- Зарегистрирован: 15.01.2005 (Сб) 7:34
- Откуда: Страна оления
lister » 11.03.2006 (Сб) 12:17
GSerg писал(а):Во-первых, почему они там находятся, и во-вторых, а как же они в этом случае узнают, где рисовать?
Потому что в модуле обрабатываются сообщения WM_MOUSEHOVER WM_MOUSELEAVE.
Если убрать перерисовку в сам контрол, то как обрабатывать WM_MOUSELEAVE ?
- GSerg
- Шаман
- Сообщения: 14286
- Зарегистрирован: 14.12.2002 (Сб) 5:25
- Откуда: Магадан
GSerg » 11.03.2006 (Сб) 12:26
Если ты не хочешь использовать сабклассер из кирпичей, то у тебя в обработчике есть hwnd, и для перерисовки тебе хватит...
Как только вы переберёте все варианты решения и не найдёте нужного, тут же обнаружится решение, простое и очевидное для всех, кроме вас
- tyomitch
- Пользователь #1352
-
- Сообщения: 12822
- Зарегистрирован: 20.10.2002 (Вс) 17:02
- Откуда: חיפה
tyomitch » 11.03.2006 (Сб) 12:49
lister писал(а):tyomitch писал(а):Передавать в функции перерисовки ссылку на экземпляр контрола.
А можно пример в двух строках?
- Код: Выделить всё
Public Sub RedrawMyCoolControl(ByVal ctl As UserControl)
...
ctl.Cls
...
End Sub
...
Private Sub UserControl_Paint()
RedrawMyCoolControl Me
End Sub
- VVitafresh
- Продвинутый гуру
-
- Сообщения: 1641
- Зарегистрирован: 12.05.2005 (Чт) 14:44
- Откуда: Херсон, UA
VVitafresh » 11.03.2006 (Сб) 14:50
lister писал(а):GSerg
Кирпичи???
Имеется в виду раздел форума: http://bbs.vbstreets.ru/viewforum.php?f=28
Никакую проблему невозможно решить на том же уровне, на каком она возникла. Нужно стать выше этой проблемы, поднявшись на следующий уровень.
Сообщений: 12
• Страница 1 из 1
Кто сейчас на конференции
Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 59