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

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

Изменение размеров формы с BorderStyle=bsNone [D7, WinXP]


Dismember ©   (2007-03-31 11:11:00) 

Возможно ли это?


easy   (2007-03-31 12:42:00) [1]

http://dfc.com.ru/?sid=2&id=7&itemid=10


Alexey (AZ)   (2007-03-31 12:41:00) [2]

Не, можно сделать примерно так:
Хватаешь форму за Rect, создаёшь внутри ещё один регион (тоже TRect, если форма прямоугольник). Дальше есть два варианта:
1) Скомбинировать регионы (CombineRgn) c XOR и проверять мышиные координаты ч/з PtInRect/PtInRegn.
2) Ничего не комбинировать и проверять на принадлежность точки большому прямоугольнику и НЕ принадлежность маленькому.
Смысл в том, что ты образуешь рамку по форме и по мышиным событиям проверяешь что там происходит, в зависимости от этого меняешь курсор, ресайзишь форму и регионы.


Джо   (2007-03-31 12:34:00) [3]

> [3] Dismember ©   (31.03.07 12:32)
> Form1.Width и Form1.Height, да? :)
> Мне нужно, чтобы пользователь мог изменять размеры мышкой,
> типа как у стандартной формы с bsSizeable.

О том, «что нужно», логично было бы написать в вопросе, а не аж в 4-м посте, не так ли? ;->


Dismember   (2007-03-31 12:32:00) [4]

Form1.Width и Form1.Height, да? :)
Мне нужно, чтобы пользователь мог изменять размеры мышкой, типа как у стандартной формы с bsSizeable.


Alexey (AZ)   (2007-03-31 12:25:00) [5]

+1

> Dismember ©   (31.03.07 11:11)

Хочешь, помогу? :)


Anatoly Podgoretsky   (2007-03-31 12:01:00) [6]

Возможно


Наверх

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