| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как отработать ButtonUp левой на ;заголовке формы? [WinXP]
Matolch. © (2003-01-12 12:54:00)Не помогает:
procedure NCLButtonUp(var Message: TWMNCLButtonUp); message WM_NCLBUTTONUP;
procedure TMainForm.NCLButtonUp(var Message: TWMNCLButtonUp);
begin
beep;
inherited;
end;
Matolch. (2003-01-12 13:49:00) [1]Мда. Для того и спрашивал, куда послали.
Matolch. (2003-01-12 13:21:00) [2]Спасибо Юрий. Буду смотреть.
Юрий Зотов (2003-01-12 13:08:00) [3]Думаю, все дело в захвате мыши. Если при нажатии кнопки мышь захватывается, то при ее отпускании форма получит сообщение WM_LBUTTONUP, а не WM_NCLBUTTONUP.
Ставьте флажок в обработчике WM_NCLBUTTONDOWN, а в обработчике WM_LBUTTONUP сбрасывайте его и производите нужные действия. Пример можно посмотреть здесь:
http://delphi.mastak.ru/cgi-bin/forum.pl?look=1&id=1042356911&n=5
Matolch. (2003-01-12 13:01:00) [4]Немножко вру. Помогает, если wsMaximized.
| |
