Класс для перемещения объектов при изменении размеров формы

Очень часто возникает необходимость изменения размеров и перемещения объектов при изменении размеров формы. В Delphi, например, все визуальные компоненты имеют свойство Anchor(якорь) для привязки их к размерам формы...

Класс для перемещения объектов при изменении размеров формы

Очень часто возникает необходимость изменения размеров и перемещения визуальных объектов при изменении размеров формы. В Delphi, например, все визуальные компоненты имеют свойство Anchor(якорь) для привязки их к размерам формы. Данный класс - это попытка придать компонентам Visual FoxPro похожие свойства.
Для этого Вам необходимо поместить класс Anchor из прилагаемой библиотеки (см. ссылку ниже) на форму. И объектам, которые должны изменять свое положение или размер при изменении размеров формы, в свойство Tag добавить через пробел привязываемые углы:
RT - правый верхний (RightTop)
RB - правый нижний (RightBottom)
LT - левый верхний (LeftTop)
LB - левый нижний (LeftBottom).

В событие Resize() формы необходимо добавить код: This.Anchor1.Anchor(), где Anchor1 - имя объекта.

Пример использования данного класса вы найдете в прилагаемом архиве.

Автор: Юрий Кузьменко

Автор публикации

не в сети 3 месяца

admin

Комментарии: 1Публикации: 123Регистрация: 10-12-2000
Вложенные файлы
#
Название
Тип файла
Размер
1 313Anchor .zip 57,98 КБ
Материалы по теме
Оставить комментарий
//////////////// ///////////////
Авторизация
*
*
Генерация пароля