Главная страница
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.019 c
1-82732
Jeka.
2002-11-15 06:23
2002.11.25
Scroll


1-82767
chak
2002-11-15 11:03
2002.11.25
Delphi+MapObjects


3-82660
OlegE
2002-11-06 14:45
2002.11.25
Yaffil ?


1-82830
Misha
2002-11-11 12:30
2002.11.25
Проблема с указателями на указатели


1-82771
Cranium
2002-11-15 01:27
2002.11.25
Адаптация к разрешениям монитора