Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.14;
Скачать: [xml.tar.bz2];




Вниз

Контроль за перемещениями мышки. 


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;




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.14;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.016 c
1-42518           Волокитин Николай     2001-12-26 15:55  2002.01.14  
Загрузка электронных таблиц в компонент F1Book.


3-42375           Venus                 2001-12-13 11:12  2002.01.14  
DBLookupListBox


3-42353           Ser GIK               2001-12-07 23:22  2002.01.14  
Подскажите чудаку!


1-42459           Dim                   2001-12-24 14:23  2002.01.14  
Контроль за перемещениями мышки.


4-42632           AlexKniga             2001-11-15 13:42  2002.01.14  
Тип PChar и пустая строка