Sheet(Sheet: IPrxSheet): Boolean;
Sheet - лист отчета.
Свойство Sheet определяет признак использования элемента управления для определенного листа. При значении True элемент управления будет отображен для листа, при значении False - нет.
По умолчанию свойство имеет значение False.
В рассматриваемом примере предполагается существование объекта Rep типа IPrxReport.
Sub UserProc;
Var
Rep : IPrxReport;
Ctrls : IPrxReportControls;
Ctrl : IPrxControl;
Sheet : IPrxSheet;
Begin
Ctrls := Rep.Controls.Edit;
//раскрывающийся список
Ctrl := Ctrls.Add(Null);
Ctrl.AutoRecalc := True;
Ctrl.Binding := "UI=""DimCombo""";
Ctrl.Dimension := Rep.DataSources.Item(0).Slices.FindByName("Срез1").Dimensions.FindById("D_TO");
Ctrl.Appearance.Report := False;
Ctrl.Appearance.Sheet(Rep.Sheets.Item(0)) := True;
Ctrl.Appearance.Sheet(Rep.Sheets.Item(1)) := True;
//редактор целых чисел
Ctrl := Ctrls.Add(Null);
Ctrl.AutoRecalc := True;
Ctrl.Binding := "UI=""IntegerEdit"" VALUE=""50""";
Ctrl.Appearance.Report := False;
Ctrl.Appearance.Sheet(Rep.Sheets.Item(0)) := True;
Ctrl.Appearance.Sheet(Rep.Sheets.Item(1)) := True;
Ctrls.Save;
//порядок элементов управления для Листа1
Sheet := Rep.Sheets.Item(0);
Rep.Controls.SheetControls(Sheet).Move(1,0); //второй элемент на первое место
End Sub UserProc;
После выполнения примера будут созданы два элемента управления для первых двух листов отчета. Для первого листа отчета изменен порядок элементов.
См. также: