В VCL нет ничего, чтобы автоматически привязывать управление относительно соседнего элемента управления. Свойство Anchors
предназначено для выравнивания элемента управления относительно краев его Parent
, а не по отношению к другим элементам управления. Тем не менее, окна управления (а не графические элементы управления) имеют OnAlignInsertBefore
и OnAlignPosition
события, которые могут использоваться для пользовательского выравнивания, если для свойства Align
установлено значение alCustom
. В противном случае вам необходимо использовать обработчики событий OnResize
для управления положением и размером вручную.
В FireMonkey, есть TLayout
-derived компоненты (TFlowLayout
, TGridLayout
, TScaledLayout
), чтобы помочь организовать компоненты (см Using Layouts to Arrange Components для более подробной информации), но это не необходимые приравнивать к закрепляет управление соседним контроля, он по-прежнему по сравнению с Parent
, немного более гибким, чем предлагает VCL.
Благодарим за предложение. Я попробовал и работал, как ожидалось. Howeer, мне интересно, почему сообщества Lazarus и Embarcadero Delphi идут разными путями после DX7. –
Хорошее предложение. Я также пробовал и проверял TGridPanel и TFlowPanel, и в какой-то степени это помогло мне. –