Add: ITabUserInteractiveSelection;
The Add method creates an interactive range and returns its settings.
Executing the example requires a form with the Button1 button on it, the TabSheetBox component named TabSheetBox1, and a component that is a data source for TabSheetBox1.
Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
TSheet: ITabSheet;
IntSelections: ITabUserInteractiveSelections;
IntSelection: ITabUserInteractiveSelection;
Begin
TSheet := TabSheetBox1.Source.GetTabSheet;
IntSelections := TSheet.View.UserIntearactiveSelections;
IntSelection := IntSelections.Add;
IntSelection.BorderColor := GxColor.FromKnownColor(GxKnownColor.Red);
IntSelection.BorderStyle := TabBorderStyle.Dash;
IntSelection.InteractiveRestrictions := TabUserInteractiveSelectionChangeType.Top Or TabUserInteractiveSelectionChangeType.Bottom;
IntSelection.Range := TSheet.ParseRange("B1:C5");
IntSelection.Visible := True;
End Sub Button1OnClick;
Clicking the button creates an interactive range for table. Border drawing parameters are determined for this range, and a constraint is imposed: it is prohibited to change top and bottom range borders.
See also: