Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как узнать статус нажатых кнопок мыши и позицию курсора? [D6, WinXP]


zam ©   (2002-08-26 13:55:00) 

Подскажите, как узнать статус нажатых кнопок мыши и позицию курсора?
Задача в том, что у меня сделана форма, перетаскивающаяся за всю клиентскую область с помощью обработчика wm_NCHitTest.
У меня написано:
procedure TForm1.WMNCHitTest(var M: TWMNCHitTest);
begin
inherited;//mous.cbSize:=sizeof(mous);
if M.Result = htClient then{


Song   (2002-08-26 16:10:00) [1]

GetAsyncKeyState()
GetCursorPos()


greenrul   (2002-08-26 14:05:00) [2]

2zam:
могу посоветовать на все control"ы на форме повесить
OnMouseDown:
releasecapture; Form1.perform (WM_syscommand, $F012, 0);

тогда форма будет "правильно" таскаться


Наверх

Титульная страница Поиск, карта сайта Написать письмо