Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Изменение размеров TPanel в run-time [D6, Win95/98, Win2k]


3asys ©   (2003-02-10 16:19:00) 

Есть форма. На форме лежит TPanel. Есть код, позволяющий в run-time с помощью мыши перемещать панель по форме. Как сделать так, чтобы при подведении курсора мыши к краям панели, появлялся курсор изменения размеров и можно было бы в run-time плавно изменять размеры панели (как в disigned-time)?
Буду признателен за пример кода или, хотя бы идею.

С Уважением, 3asys


Андрей Сенченко   (2003-02-10 16:23:00) [1]

- Отслеживай положение курсора,
- сравнивай с координатами краев панели,
- меняй курсор,
- лови нажиатие на кнопку мыши,
- лови координаты мыши при нажатой кнопке
- меняй размеры панели.

вроде все


Song   (2003-02-10 16:22:00) [2]

Примерно также как и двигаешь (WM_SYSCOMMAND), только wParam=$F008


Наверх

Титульная страница Поиск, карта сайта Написать письмо