 |
|
Модераторы: Poseidon, Snowy, bems, MetalFan |
 
|
|
Перетаскивание формы, Какое сообщение? 
| Dayana |
|
|||
 Опытный  Профиль Группа: Участник Клуба Сообщений: 352 Регистрация: 6.10.2002 Где: Тель-Авив Репутация: 2 Всего: 4 |
Какой event наступает, когда перетаскиваешь мышкой форму MDIChild за caption?
|
|||
|
||||
Загрузка ...
| rhf |
|
|||
|
Шустрый Профиль Группа: Участник Сообщений: 51 Регистрация: 13.8.2002 Репутация: нет Всего: нет |
возможно WM_SYSCOMMAND с wParam=SC_DRAGMOVE ($F012)
|
|||
|
||||
| man2002ua |
|
|||
 Опытный Профиль Группа: Участник Клуба Сообщений: 943 Регистрация: 12.11.2002 Где: Киев Репутация: нет Всего: 2 |
сообщение WM_MOVING;
определяй procedure WM (var m:TMessage) ;message WM_MOVING; в обработке procedure TForm2.WM (var m:TMessage); var t : ^TRECT; begin t := pointer(m.LParam); caption := IntToStr(t^.left) + ' ' + IntToStr(t^.top); end; и усё  -------------------- "Нет ничего более постоянного, чем временное" |
|||
|
||||
| Dayana |
|
|||
|
Опытный Профиль Группа: Участник Клуба Сообщений: 352 Регистрация: 6.10.2002 Где: Тель-Авив Репутация: 2 Всего: 4 |
Спасибо!
 |
|||
|
||||
| Song |
|
|||
 Sysman.ru Профиль Группа: Участник Сообщений: 1095 Регистрация: 2.6.2002 Репутация: 2 Всего: 4 |
А может просто WM_NCHITTEST ?
-------------------- Прежде чем сказать "Невозможно", подумай, прав ли ты |
|||
|
||||
| Dayana |
|
|||
|
Опытный Профиль Группа: Участник Клуба Сообщений: 352 Регистрация: 6.10.2002 Где: Тель-Авив Репутация: 2 Всего: 4 |
WM_NCHITTEST срабатывает на движение мышки вне клиенской области...
|
|||
|
||||
| Song |
|
|||
|
Sysman.ru Профиль Группа: Участник Сообщений: 1095 Регистрация: 2.6.2002 Репутация: 2 Всего: 4 |
С каких это пор caption стал у нас клиентской областью окна?
-------------------- Прежде чем сказать "Невозможно", подумай, прав ли ты |
|||
|
||||
| Dayana |
|
|||
|
Опытный Профиль Группа: Участник Клуба Сообщений: 352 Регистрация: 6.10.2002 Где: Тель-Авив Репутация: 2 Всего: 4 |
так я и говорю - ВНЕ клиенской... У меня еще проблема, не могу никак сделать активной MDIChild форму. SetFocus, SetActiveWindow, WM_MDIACTIVATE не имеют эффекта. Например посылаю WM_MDIACTIVATE, сообщение доходит, а форма активной не становится... |
|||
|
||||
| Song |
|
|||
|
Sysman.ru Профиль Группа: Участник Сообщений: 1095 Регистрация: 2.6.2002 Репутация: 2 Всего: 4 |
Так или лыжи не едут или одно из двух...:
Caption - НЕклиентская область. Так? Так. WM_NCHITTEST - ловить мышь на НЕклиентской области. Так? Так. Так что я прав. Даяна, а ты нет -------------------- Прежде чем сказать "Невозможно", подумай, прав ли ты |
|||
|
||||
| Song |
|
|||
|
Sysman.ru Профиль Группа: Участник Сообщений: 1095 Регистрация: 2.6.2002 Репутация: 2 Всего: 4 |
Попробуй SetForeGroundWindow()
-------------------- Прежде чем сказать "Невозможно", подумай, прав ли ты |
|||
|
||||
| Dayana |
|
|||
|
Опытный Профиль Группа: Участник Клуба Сообщений: 352 Регистрация: 6.10.2002 Где: Тель-Авив Репутация: 2 Всего: 4 |
Ты совершенно прав! Только WM_NCHITTEST хорошо обрабатывать, когда нажимаешь на мышку на неклиенской области или бросаешь ее там, или двигаешь ее там же. А вот когда двигаешь мышку вместе с неклиенской областью (caption), т.е. захватив ее мышкой, то WM_NCHITTEST не помогает. |
|||
|
||||
| Dayana |
|
|||
|
Опытный Профиль Группа: Участник Клуба Сообщений: 352 Регистрация: 6.10.2002 Где: Тель-Авив Репутация: 2 Всего: 4 |
Спасибо, попробую... |
|||
|
||||
|
|
| Правила форума "Delphi: Общие вопросы" | |
|
|
Запрещается! 1. Публиковать ссылки на вскрытые компоненты 2. Обсуждать взлом компонентов и делиться вскрытыми компонентами
Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader. |
| 0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
| 0 Пользователей: | |
| « Предыдущая тема | Delphi: Общие вопросы | Следующая тема » |
[ Время генерации скрипта: 0.0576 ] [ Использовано запросов: 22 ] [ GZIP включён ]
Реклама на сайте Информационное спонсорство
|
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |