Sub OnShapeChanged(Sender: Object; Args: IShapeChangedEventArgs);
Begin
//set of operators;
End Sub OnShapeChanged;
Sender. The parameter that returns the component that generated the event.
Args. The parameter that enables the user to determine event parameters.
The OnShapeChanged event occurs after any changes related to workspace shape.
The event occurs on creating or removing shapes and also on changing their parameters (shape text, format or image are changed).
Executing the example requires a form with the WorkspaceBox component named WorkspaceBox1 and a data source for the WorkspaceBox1 component. The specified procedure is a handler of the OnAfterMoveCP event.
Add links to the Andy, ExtCtrls, Forms, and Workspace system assemblies.
Sub WorkspaceBox1OnShapeChanged(Sender: Object; Args: IShapeChangedEventArgs);
Begin
Debug.WriteLine(Args.Shape.Id);
Debug.WriteLine(Args.ShapeOperation);
End Sub WorkspaceBox1OnShapeChanged;
If any changes related to shapes are made in the component, the development environment component displays shape identifier and the action that caused event generation.
See also: