Unit 'ExtCtrls' Package
[Overview][Types][Classes][Procedures and functions][Index] [#lcl]

TCustomLabeledEdit

[Properties (by Name)] [Methods (by Name)] [Events (by Name)]

Defines a edit control with a label bound to the control.

Declaration

Source position: extctrls.pp line 969

type TCustomLabeledEdit = class(TCustomEdit)

protected

  class procedure WSRegisterClass; override;

  

Registers this component class with the current WidgetSet.

  procedure SetParent(); override;

  

Sets the value for the Parent property.

  procedure SetName(); override;

  

Sets the value for the Name property and the Caption in the label.

  procedure Loaded; override;

  

Performs actions needed when the component has finished loading in the LCL streaming mechanism.

  procedure DoPositionLabel; virtual;

  

DoPositionLabel - perform the code for positioning the label.

  procedure Notification(); override;

  

Handles a notification when a component is added to or removed from the control.

  procedure CMBiDiModeChanged(); message;

  

Handles the CM_BIDIMODECHANGED control message for the control.

  procedure CMVisibleChanged(); message;

  

Handles Focus changes, and forces UpdateControlState.

  procedure CMEnabledChanged(); message;

  

Handler for changed Enabled message; notifies the widgetset.

  procedure CreateInternalLabel; virtual;

  

CreateInternalLabel - method for internally creating label.

public

  constructor Create(); override;

  

Create - constructor for TCustomLabeledEdit: calls inherited Create then sets initial position and label spacing.

  property EditLabel: TBoundLabel; [r]

  

EditLabel - the label attached to the edit box.

  property LabelPosition: TLabelPosition; [rw]

  

LabelPosition - whether above, below, to the left or to the right of the Edit box.

  property LabelSpacing: Integer; [rw]

  

LabelSpacing - the distance between the Label and the Edit box.

end;

Inheritance

TCustomLabeledEdit

  

Defines a edit control with a label bound to the control.

|

TCustomEdit

  

The base class for controls presenting editable text.

|

TWinControl

  

Implements a windowed control which can contain other child controls.

|

TControl

  

The base class for visible controls.

|

TLCLComponent

  

The base class for LCL components which have an associated widget.

|

TObject

Description

TCustomLabeledEdit : The base type for LabeledEdit.

Note particularly the EditLabel property (see TBoundLabel), which contains the label attached to the Edit control.

See also

TCustomEdit

  

The base class for controls presenting editable text.

TCustomLabel

  

Control used to show static text optionally using multiple lines.