ITabRange.ToIntegerArray

Синтаксис Fore

ToIntegerArray([SkipNonIntegers: Boolean = false]): Array;

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

ToIntegerArray(SkipNonIntegers: boolean): System.Array;

Параметры

SkipNonIntegers. Определяет, будут ли пропускаться нецелочисленные значения.

Описание

Метод ToIntegerArray осуществляет преобразование диапазона в целочисленный массив.

Комментарии

Параметр SkipNonIntegers определяет правило пропуска нецелочисленных значений диапазона. Доступные значения:

• True. Нецелочисленное значение будет пропущено;

• False. Значение по умолчанию. На месте элемента с нецелочисленным значением в массиве будет стоять «0».

Если свойство ITabErrorCheckingOptions.EnableChecking принимает значение true, то при вызове метода ToIntegerArray будут учитываться все опции из ITabSheet.ErrorCheckingOptions.

Пример Fore

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

Пример является обработчиком события OnClick для компонента «Button1».

Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
    TSheet: ITabSheet;
    TRange: ITabRange;
    Arr: Array Of Integer;
Begin
    TSheet := UiTabSheet1.TabSheet;
    TRange := TSheet.View.Selection.Range;
    Arr := TRange.ToIntegerArray(True);
    // Получим длину массива
    Debug.WriteLine("Длина массива: " + Arr.Length.ToString);
End Sub Button1OnClick;

При нажатии на кнопку будет создан целочисленный массив «Arr», в него будут помещены значения из выделенного диапазона таблицы. Невещественные значения будут пропущены. В окно консоли будет выведено сообщение о длине массива «Arr».

Пример Fore.NET

Необходимые требования и результат выполнения примера Fore.NET совпадают с примером Fore. Вместо компонентов Fore используйте их Fore.NET аналоги.

Imports Prognoz.Platform.Interop.Tab;
…
Private Sub button1_Click(sender: System.Object; e: System.EventArgs);
Var
    TSheet: ITabSheet;
    TRange: ITabRange;
    Arr: Array;
Begin
    TSheet := UiTabSheetNet1.TabSheetUi.TabSheet;
    TRange := TSheet.View.Selection.Range;
    Arr := TRange.ToIntegerArray(True);
    // Получим длину массива
    System.Diagnostics.Debug.WriteLine("Длина массива: " + Arr.Length.ToString());
End Sub;

См. также:

ITabRange