Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.11.25;
Скачать: CL | DM;

Вниз

Простой вопрос   Найти похожие ветки 

 
Igorek ©   (2002-11-15 13:44) [0]

В обработчике
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:47) [1]

GetKeyState(VK_LBUTTON)


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


> MBo © (15.11.02 13:47)

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


 
MBo ©   (2002-11-15 13:55) [3]

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

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



Страницы: 1 вся ветка

Текущий архив: 2002.11.25;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.02 c
14-82982
Пират
2002-11-06 17:13
2002.11.25
Пиратские программы???


1-82701
DN
2002-11-14 09:53
2002.11.25
Работа с Paradox


3-82665
kern
2002-11-06 12:21
2002.11.25
SQL


1-82849
Tadeush
2002-11-13 15:35
2002.11.25
Вывод данных о номере версии.


14-82950
LamErP
2002-11-05 15:33
2002.11.25
Создание COM - dll