Scales: IPrxMapScales;
Свойство Scales возвращает объект, содержащий все шкалы регламентного отчета.
Sub UserProc;
Var
MB: IMetabase;
Report: IPrxReport;
Scales: IPrxMapScales;
i: Integer;
Begin
MB := MetabaseClass.Active;
Report := MB.ItemById("Report").Bind As IPrxReport;
Scales := Report.Scales;
i := Scales.Count;
End Sub UserProc;
После выполнения примера в переменной «i» будет содержаться количество шкал регламентного отчета с идентификатором «Report».
См. также: