TControlNavigationManager

Manages navigating controls using Alt key combinations.

Inheritance

Level	Ancestor	Description
1	TObject	Ultimate ancestor in a class hierarchy
2	TBaseObject	A base class for objects that can be used instead of `TObject`.
3	TControlNavigationManager

Source

UserInterface.Control.Navigation.pas (60)

Description

Besides navigating between controls this class also manages the Drag and Drop functionality of controls and the layout of controls like adding split panels and tab panels that is accessible by the user through Alt key combinations.

Fields

Scope	Visibility	Type	Name
Instance	private	TControl	FRootControl
Instance	private	TControlWeakReference<TControl>	CurrentReference
Instance	private	TNavigationOverlayControl	OverlayControl
Instance	public	TControlNavigationContainerControl	ContainerControl
Instance	public	TKeyboardFocusManager	FocusManager
Instance	public	TDragAndDropManager	DragAndDropManager
Instance	public	TBoolean	IsActive
Instance	public	TControlNavigationStack	History

Methods

Scope	Visibility	Result	Name
Instance	private		SetCurrent(Value: TControl)
Instance	private	TControl	GetCurrent()
Instance	private		SetRootControl(Value: TControl)
Instance	protected	TControlNavigationAction	KeyToNavigationAction(Key: TKey)
Instance	protected	TBoolean	IsInverseNavigation(ControlNavigationInfo: TControlNavigationInfo; Direction: TNavigationDirection)
Instance	protected	TControl	NextNavigationControl(CurrentControl: TControl; Direction: TNavigationDirection)
Instance	protected		LayoutControl(NavigationAction: TControlNavigationAction)
Instance	protected		HandleNavigationAction(Action: TControlNavigationAction)
Instance	protected		DragControl()
Instance	protected		PrintScreen()
Instance	protected		CloseCurrent()
Instance	protected		SetUserLevel(Level: TUserLevel)
Instance	protected		NavigateControl(Direction: TNavigationDirection)
Instance	protected	TBoolean	HandleStartEvent(Event: TEvent)
Instance	protected	TBoolean	HandleKeyboardEvent(Event: TKeyboardEvent)
Instance	protected	TBoolean	HandleMouseWheelEvent(Event: TMouseWheelEvent)
Instance	protected		UpdateOverlayBounds()
Instance	public		Create()
Instance	public		Destroy()
Instance	public		Start()
Instance	public		Stop(Successful: TBoolean)
Instance	public	TBoolean	ImmediateNavigateControl(Direction: TNavigationDirection)
Instance	public	TBoolean	HandleEvent(Event: TEvent)
Instance	public		Paint(Canvas: TCanvas)