| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Вызвать MouseDblClick раньше MouseUp [D6, Win95/98, WinME, NT4, Win2k, WinXP]
Белый Орёл © (2006-05-14 13:24:00)Здравствуйте! У меня следующая задача. На одинарный щелчок и на двойной по иконке программы в трее происходят разные события, но MouseDown, понятно, вызывается раньше, чем doubleclick. Как можно сделать примерно так: проходит щелчок и включается ожидание второго щелчка; если его нет, то выполняется MouseDown, иначе - doubleclick.
procedure TForm.IconMouse(var Msg: TMessage);
var p: TPoint;
begin
GetCursorPos(p);
case Msg.LParam of
WM_LBUTTONUP:
....
WM_LBUTTONDBLCLK:
....
end;
end;
Это код, где происходит обработка щелчков мыши (сама обработка в ....).
Игорь Шевченко (2006-05-15 11:01:00) [1]http://road.uww.edu/road/siemannb/delphi/TrayIcon.pas?
GrayFace (2006-05-15 10:48:00) [2]А зачем так извращаться? ИМХО, гланды хотите вырывать не с той стороны.
| |
