ReadOnly: Boolean;
Свойство ReadOnly определяет возможность сохранения измененных данных в источник.
Если для данного свойства установлено значение False, измененные в ячейках данные могут быть сохранены в источник. При значении True сохранить измененные данные в источник невозможно.
Значение данного свойства влияет на состояние флажка «Разрешить изменения данных» в диалоге «Параметры» для области данных. При значении свойства True - флажок снят.
Для выполнения примера предполагается наличие формы с кнопкой с наименованием «Button1», наличие регламентного отчета с идентификатором «REPORT» который содержит область данных. Добавьте ссылки на системные сборки: Metabase, Report, Ui. Пример является обработчиком события кнопки «Button1».
Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
MB: IMetabase;
MObj: IMetabaseObject;
DI: IPrxDataIsland;
Begin
MB := MetabaseClass.Active;
MObj := MB.ItemById("REPORT").Bind;
DI := (MObj As IPrxReport).DataIslands.Item(0);
// Выводим на экран
сообщение со значением свойства.
If DI.ReadOnly Then
WinApplication.InformationBox("Измененные
данные нельзя сохранить в источник", self As IWin32Window);
Else
WinApplication.InformationBox("Измененные
данные можно сохранить в источник", self As IWin32Window);
End If;
End Sub Button1OnClick;
После выполнения примера при нажатии на кнопку на экран будет выведено сообщение с информацией о возможности сохранения в источник измененных данных первой области данных регламентного отчета «REPORT».
См. также: