IPrxScene3DSeries.Remove

Синтаксис

Remove(Index: Integer): Boolean;

Параметры

Index. Индекс ряда.

Описание

Метод Remove удаляет ряд по заданному индексу. Метод возвращает True, в случае успешного удаления, в противном случае - False.

Пример

Для выполнения примера предполагается наличие формы, где расположена кнопка с наименованием «Button1»,  компонент IntegerEdit с наименованием «IntegerEdit1». Наличие регламентного отчета с идентификатором «REGULAR_REPORT», на листе которого расположена трёхмерная сцена с несколькими рядами данных. Подключите системные сборки: Metabase, Report, Tab, Ui, Forms.

Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
    Report: IPrxReport;
    S: IPrxScene3D;
    Series: IPrxScene3DSeries;
    MB: IMetabase;
    Tab: ITabSheet;
Begin
    MB := MetabaseClass.Active;
    Report := MB.ItemById(
"REGULAR_REPORT").Edit As IPrxReport;
    Tab := (Report.Sheets.Item(
0As IPRxTable).TabSheet;
    S := Tab.Objects.Item(
0).Extension As IPrxScene3D;
    Series := S.Series;
    
If Series.Remove(IntegerEdit1.Value) Then
        WinApplication.InformationBox(
"Объект удален");
    
Else
        WinApplication.InformationBox(
"Нет объекта для удаления");
    
End If;
   (Report 
As IMetabaseObject).Save;
End Sub Button1OnClick;

Введите в строку индекс ряда и нажмите кнопку. По результатам выполнения будет выдано соответствующее сообщение.

См. также:

IPrxScene3DSeries