Sub OnObjectResizing(Sender: Object; Agrs: ITabObjectResizingEventArgs);
Begin
//set of operators
End Sub OnObjectResizing;
Sender. The parameter that returns the component that generated the event.
Args. The parameter that enables the user to determine event parameters.
The OnObjectResizing event occurs on object resizing.
It occurs before the TabSheetBox.OnBeforeObjectChange event.
Executing the example requires a form containing the TabSheetBox component named TabSheetBox1 and the UiReport component named UiReport1 that is a data source for TabSheetBox1. Set the Edit value in the OperationMode property of the UiReport1 component, True - in the Active property. UiReport1 must contain loaded regular report with shapes on the active list.
The specified procedure must be assigned by handler of the OnObjectResizing event handler for the TabSheetBox1 component.
Add a link to the Drawing system assembly for Fore.
Sub TabSheetBox1OnObjectResizing(Sender: object; Args: ITabObjectResizingEventArgs);
Begin
Debug.WriteLine("Object sizes " + Args.Object.Id +
" are changed on the side:" + Args.Side.ToString + ", coordinates:" + Args.Rect.Left.ToString);
End Sub TabSheetBox1OnObjectResizing;
After executing the example on shape sizes changing a message containing object identifier, side on which action occurred, and coordinate from the left side is displayed in the console window.
See also: