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

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

Простой вопрос [D6, Win95/98]

Igorek ©   (2002-11-15 13:44:00) 

В обработчике
procedure T...Control.CMMouseEnter(var Msg: TWMMouse);
надо узнать нажата ли кнопка мышки.
Msg.Keys почему-то не содержит флага MK_LBUTTON
Такой код тоже не помогает:
var
Keys: TMouseKeys;
begin
Keys.cbSize := sizeof(Keys);
SystemParametersInfo(SPI_GETMOUSEKEYS, sizeof(Keys), @Keys, 0);
if MKF_LEFTBUTTONDOWN and Keys.dwFlags <> 0 then
...

Какие еще варианты?
Простой вопрос, а ответ не могу найти быстро. Помогите, если не трудно. Спасибо.

---

MBo   (2002-11-15 13:55:00) [1]

>она в разделе Keyboard Input Functions
Ну это же ее основное предназначение

Самому не так давно подсказали ;)

---

Igorek   (2002-11-15 13:53:00) [2]

> MBo © (15.11.02 13:47)

Спасибо. Как оперативно. Странно, что она в разделе Keyboard Input Functions. Поэтому и не нашел.

---

MBo   (2002-11-15 13:47:00) [3]

GetKeyState(VK_LBUTTON)

---

Наверх