ITabCustomSort.Add

Синтаксис Fore

Add(Index: Integer): ITabCustomSortItem;

Синтаксис Fore.NET

Add(Index: Integer): Prognoz.Platform.Interop.Tab.ITabCustomSortItem;

Параметры

Index - Параметр определяет относительный индекс строки/столбца диапазона, выбранного для настройки сортировки.

Описание

Метод Add осуществляет добавление новой области сортировки в таблице данных.

Пример Fore

Для выполнения примера предполагается наличие формы, расположенной на ней кнопки с наименованием «Button1», компонента TabSheetBox и компонента UiTabSheet с наименованием «UiTabSheet1», который является источником данных для компонента TabSheetBox.

    Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
    Var
        CustomSort: ITabCustomSort;
    Begin
        CustomSort := tab.CustomSort;
        CustomSort.Range := tab.Table;
        CustomSort.Add(Tab.ColumnIndex("A"));
        text := CustomSort.Count.ToString;
        tab.CustomSort.CaseSensitive := True;
        CustomSort.Item(0).Direction := TabCustomSortDirection.Ascending;
        tab.CustomSort.Item(0).Type := TabCustomSortType.Text;
        CustomSort.Sort;
        tab.CustomSort.IsColumnSort := False;
    End Sub Button1OnClick;

При нажатии кнопки в столбце с индексом «A» будет настроена сортировка по возрастанию.

Пример Fore.NET

Для выполнения примера предполагается наличие формы, расположенной на ней кнопки с наименованием «Button1», компонента TabSheetBox и компонента UiTabSheet с наименованием «UiTabSheet1», который является источником данных для компонента TabSheetBox.

Public Partial Class OBJ33041Form : Prognoz.Platform.Forms.Net.ForeNetForm
    
    CustomSort: ITabCustomSort;
    tab: ITabSheet;
    
    Public Constructor OBJ33041Form();
    Begin
        InitializeComponent();
    End Constructor;

    Private Sub button1_Click( sender : System.Object; e : System.EventArgs );
    Var
        CustomSort: ITabCustomSort;
    Begin
        CustomSort := tab.CustomSort;
        CustomSort.Range := tab.Table;
        CustomSort.Add(Tab.ColumnIndex["A"]);
        text := CustomSort.Count.ToString();
        tab.CustomSort.CaseSensitive := True;
        CustomSort.Item[0].Direction := TabCustomSortDirection.TcsdAscending;
        tab.CustomSort.Item[0].Type := TabCustomSortType.TcsText;
        CustomSort.Sort();
    End Sub;

End Class;

При нажатии кнопки в столбце с индексом «A» будет настроена сортировка по возрастанию.

См. также:

ITabCustomSort