TApplication

Abstract base class for applications that support a graphical user interface.

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	TApplication

Source

Application.pas (54)

Description

TApplication sets up the basic components that are needed for an application that supports a graphical user interface. By default MainWindow will be created as an empty window. Descendant classes are responsible for adding TControl descendants to this window as appropriate for the specific application.

An application can be started by calling Run. This function executes an event loop that handles and dispatches events in response to user input and other user interface events. The loop is terminated whenever an event is received that indicates the application should be closed. Such an event can be the result of the user clicking the close-button of the main window.

Fields

Scope	Visibility	Type	Name
Instance	protected	TPagedPanel	FExplorerTarget
Instance	protected	TControlFactory	FControlFactory
Instance	protected	TObjectActionFactory	ObjectActionFactory
Instance	protected	TWindowsClipBoard	ClipBoard
Instance	protected	TWindowsMouseManager	MouseManager
Instance	protected	TKeyboardFocusManager	FocusManager
Instance	protected	THotKeyManager	HotKeyManager
Instance	protected	TControlNavigationManager	NavigationManager
Instance	protected	TDragAndDropManager	DragAndDropManager
Instance	protected	TPositiveInteger32	ThreadIdentifier
Instance	protected	TWindowsEventQueue	EventQueue
Instance	protected	TCharacterCodePoint	SurrogatePairStart
Instance	public	TWindow	MainWindow
Type	public	TApplication	Instance

Methods

Scope	Visibility	Result	Name
Instance	protected	TMouseButtonEvent	ConvertMessageToMouseButtonEvent(Message: TMSG)
Instance	protected	TMouseMoveEvent	ConvertMessageToMouseMoveEvent(Message: TMSG)
Instance	protected	TMouseWheelEvent	ConvertMessageToMouseWheelEvent(TopLevelControl: TControl; Message: TMSG)
Instance	protected	TMouseLeaveEvent	ConvertMessageToMouseLeaveEvent(TopLevelControl: TControl; Message: TMSG)
Instance	protected	TMouseEvent	ConvertMessageToMouseEvent(TopLevelControl: TControl; Message: TMSG)
Instance	protected	TTargetedEvent	ConvertMouseMessage(Message: TMSG)
Instance	protected	TKeyModifiers	GetCurrentModifierKeys()
Instance	protected	TCharacterCodePoint	HandleSurrogatePair(Character: TCharacterCodePoint)
Instance	protected	TKeyboardEvent	ConvertMessageToKeyboardEvent(Message: TMSG)
Instance	protected	TBoolean	PreemptTargetedEvent(TargetedEvent: TTargetedEvent)
Instance	protected	TBoolean	HandleKeyboardEvent(TargetedEvent: TTargetedEvent)
Instance	protected	TBoolean	HandleTargetedEvent(TargetedEvent: TTargetedEvent)
Instance	protected	TTargetedEvent	ConvertKeyboardMessage(Message: TMSG)
Instance	protected	TTargetedEvent	ConvertMessage(Message: TMSG)
Instance	protected	TBoolean	HandleMessage(Message: TMSG)
Instance	protected	TWindow	CreateWindow()
Instance	protected	TPagedPanel	DetermineExplorerTarget()
Instance	protected		CloseUserInterface()
Instance	protected	TControl	EmbellishWithToolbar(Control: TControl; Path: TValuePath)
Instance	public		Create()
Instance	public		Run()
Instance	public		OpenControl(Control: TControl; TransferFocus: TBoolean; Target: TPagedPanel)
Instance	public	TControl	OpenControlForValue(Path: TValuePath; TransferFocus: TBoolean; Target: TPagedPanel)
Instance	public	TControl	Old_OpenControlForValue(Value: TValue; TransferFocus: TBoolean; Target: TPagedPanel)
Instance	public		ShowError(Message: TText)
Instance	public		ShowException(Exception: EException)
Instance	public		ShowInformation(Message: TText)
Instance	public	TBoolean	ShowConfirmation(Message: TText)
Instance	public		HandleException(Exception: EException)
Type	public		Main()