| Valdo |
| Отправлено: 16.12.2003, 15:04 |
|
Не зарегистрирован
|
Люди!
Подскажите, примерчик перетаскивания формы с BorderStyle=bsNone за два Image, которые валяются на этой форме... Или за всю панель, которая "лежит в основании формы"... |
|
| anatoliys |
| Отправлено: 16.12.2003, 17:04 |
|
Не зарегистрирован
|
В событие формы FormMouseDown вставить код:
long SC_DRAGMOVE = 0xF012;
if(Button == mbLeft)
{ ReleaseCapture();
SendMessage(Handle, WM_SYSCOMMAND, SC_DRAGMOVE, 0);
Удачи. |
|
| Valdo |
| Отправлено: 17.12.2003, 14:34 |
|
Не зарегистрирован
|
Спасибо!
Правда заработало, только когда добавлял сие в onMouseDown конкретных визуальных элементов, а на форме — не бе — не ме... |
|
| Asher |
| Отправлено: 17.12.2003, 15:43 |
|
Мастер участка
Группа: Модератор
Сообщений: 550
|
| QUOTE | | а на форме — не бе — не ме... |
Понятно. Событие ведь до формы не доходит, так как ее твоя панель перекрывает.
Можно было оставить код в FormMouseDown, а затем для твоих компонентов (Image там всякие и панель) не создавть своих обработчиков, а в инспекторе объектов выбрать для их событий OnMouseDown в выпадающем списке обработчик формы. Так и кода меньше, и относится он к таскаемой форме
|
|
| Void Z7 |
| Отправлено: 17.12.2003, 19:26 |
|
Не зарегистрирован
|
Спасибо большое и от меня а то работал с регионами сами понимаете пришлось от заголовка отказаться |
|
