TToolBar.AlignControls procedure
Performs actions to align the tool bar buttons in the specified rectangle.
Declaration
procedure AlignControls(AControl: TControl;
var RemainingClientRect: TRect); overrideArguments
AControl | Not used in the overridden method |
RemainingClientRect | Rectangle with the bounds where the tool bar and its buttons are aligned. |
Description
AlignControls is an overridden method in
TToolBar and
re-implements the method from the ancestor class. It does not call the
inherited method.
No actions are performed in the method when tbfPlacingControls has
already been included in the flags for the tool bar. This indicates that
AlignControls has already been called, but not yet completed.
DisableAlign is called to prevent automatic alignment while the
method is active.
WrapButtons is called to position the buttons
and controls in
RemainingClientRect using the setting in
Wrapable and the value from
IsVertical.
EnableAlign is called to re-enable alignment when the buttons have
been positioned.
tbfPlacingControls is removed from the tool bar flags prior to
exiting from the method.
See also
An experiment, built from development snapshots. Not the official Free Pascal or Lazarus documentation.