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

Вниз

Контроль за перемещениями мышки.   Найти похожие ветки 

 
Dim ©   (2001-12-24 14:23) [0]

Приветствую всех. Вопрос в том как узнать, что мыша покинула пределы Control"а.


 
BWG ©   (2001-12-24 15:04) [1]

Сравнить текущие координаты мыши и координаты Control`а


 
Dim ©   (2001-12-24 15:19) [2]

Прошу прощения за вопрос, но где взять текущие координаты.


 
Sergey_n ©   (2001-12-25 00:39) [3]

Из справки D4
The GetCursorPos function retrieves the cursor"s position, in screen coordinates.

BOOL GetCursorPos(LPPOINT l pPoint ); // address of structure for cursor position

Parameters

lpPoint

Points to a POINT structure that receives the screen coordinates of the cursor.

Object.ScreenToClient Привести к координатам объекта


 
Dimka Maslov ©   (2001-12-25 09:44) [4]

Обрабатывай сообщения CM_MOUSEENTERи CM_MOUSELEAVE. Первое сообщение передаётся контролу, когда мышь на него находит, второе - когда уходит.

type
TMouseSensitiveControl = class (TSomeControlDescendant)
private
FMouseHover: Boolean;
procedure CMMouseEnter( var Message); message CM_MOUSEENTER;
procedure CMMouseLeave( var Message); message CM_MOUSELEAVE;
public
property MouseHover: Boolean read FMouseHover;
end;

procedure TMouseSensitiveControl.CMMouseEnter( var Message);
begin
FMouseHover:=True;
inherited;
end;

procedure TMouseSensitiveControl.CMMouseLeave( var Message);
begin
FMouseHover:=False;
inherited;
end;



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

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

Наверх




Память: 0.47 MB
Время: 0.008 c
3-42343
Alexsandr
2001-12-10 04:33
2002.01.14
вопрос


1-42501
dva
2001-12-25 23:03
2002.01.14
Помогите чайнику с Таймером


3-42390
Bizon
2001-12-13 16:26
2002.01.14
Что происходит с ролями?


4-42600
wHammer
2001-11-13 16:16
2002.01.14
Мастера, помогите в поиске решения!


1-42474
fliz
2001-12-25 12:55
2002.01.14
Запись в поток (SaveToStream) перестала работать после переноса проги на Вин2000.