| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
экран + мышка
Алексий © (2006-06-06 09:22:00)всем привет,появился такой вопрос,заказчику понадобилось чтобы программа пряталсь справа за экраном,и если курсор поднести к правой части экрана - программа должна "выезжать",подскажите с чем работать,как это должно выглядеть. Спасибо
Loginov Dmitry (2006-06-06 10:31:00) [21]Имхо, тады лучше просто ловить сообщения CM_MOUSEENTER и CM_MOUSELEAVE, а дальше запускать таймер, и по таймеру двигать форму.
Алексий (2006-06-06 09:55:00) [22]
> Loginov Dmitry
ага,так!
ту tButton,
делаю в onmove формы
var
P:TPoint;
begin
getcursorpos(P);
дальше как я понимаю надо делать условие что если p.X > там чего то,то включить таймер,в таймере form.left := form.left - 20;
так?
Loginov Dmitry (2006-06-06 09:46:00) [23]Алексий (06.06.06 9:22)
как это должно выглядеть
Ну наверное так же, как с панелью задач при установке галочки "скрывать автоматически"
tButton (2006-06-06 09:24:00) [24]GetCursorPos
Screen.Width
можно просто полностью её не прятать
тогда
onMouseMove + флаги состояния
| |
Страницы: 