IWorkspaceBox.ActiveTool

Syntax

ActiveTool: WxTool;

The ActivTool property determines an active tool of the workspace.

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

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.