Интерфейс

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

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

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

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

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

не в сети 1 год

admin

0

Комментарии: 0Публикации: 109Регистрация: 10-12-2000