DoPositionLabel - perform the code for positioning the label.
Source position: extctrls.pp line 981
protected procedure TCustomLabeledEdit.DoPositionLabel; virtual; |
DoPositionLabel is a procedure used to place the EditLabel relative to the companion control. No actions are performed in the method when EditLabel is unassigned (contains Nil).
DoPositionLabel ensures that DisableAlign is called in the Parent control (when assigned). EnableAlign is called for the Parent control prior to exiting from the method.
DoPositionLabel updates EditLabel to use the values assigned to the Parent and Visibility properties. The values in LabelPosition and LabelSpacing are used to determine the anchoring to the companion control applied to EditLabel.
|
EditLabel - the label attached to the edit box. |
|
|
LabelPosition - whether above, below, to the left or to the right of the Edit box. |
|
|
LabelSpacing - the distance between the Label and the Edit box. |
|
|
Allows the control, and all of its children, to be displayed or hidden. |
|
|
Disables auto-sizing when aligning the control and its parent. |
|
|
Re-enables auto-sizing after aligning the control and its parent. |
|
|
The control within which the control is shown. |