IWorkspaceBox.ActiveTool

Syntax

ActiveTool: WxTool;

Description

The ActivTool property determines an active tool of the workspace.

Example

Executing the example requires a form with the Button1 button, the WorkspaceBox component named WorkspaceBox1 and a data source for the WorkspaceBox1 component.

Add links to the Andy, ExtCtrls, Forms, Ui, and Workspace system assemblies.

Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Begin
WorkspaceBox1.ActiveTool := WxTool.Hand;
End Sub Button1OnClick;

On clicking the button the hand-shaped pointer that enables the user to change the workspace viewable area is selected as an active tool.