HeaderTitle: String;
HeaderTitle: string;
Свойство HeaderTitle определяет текст заголовка уголка.
Текст может быть произвольным. Для пользовательского текста заголовка уголка надо использовать свойство IEaxGrid.HeaderTitleType со значением EaxHeaderTitleType.Custom.
Для выполнения примера в репозитории предполагается наличие экспресс-отчета с идентификатором «EXP_REPORT_HT».
Добавьте ссылки на системные сборки: Express, Metabase.
Sub UserProc;
Var
MB: IMetabase;
MObj: IMetabaseObject;
Expr: IEaxAnalyzer;
Grid: IEaxGrid;
Begin
// Получаем текущий репозиторий
mb := MetabaseClass.Active;
// Получаем экспресс-отчет
MObj := mb.ItemById("EXP_REPORT_HT").Edit;
Expr := MObj As IEaxAnalyzer;
// Получаем таблицу
Grid := Expr.Grid;
// Задаем текст в уголке таблицы
Grid.HeaderTitleType := EaxHeaderTitleType.Custom;
Grid.HeaderTitle := "Произвольный текст";
// Сохраняем отчет
MObj.Save;
End Sub UserProc;
В результате выполнения примера в экспресс-отчете в уголке будет задан пользовательский текст.
Необходимые требования и результат выполнения примера Fore.NET совпадают с примером Fore.
Imports Prognoz.Platform.Interop.Express;
…]
Public Shared Sub Main(Params: StartParams);
Var
MB: IMetabase;
MObj: IMetabaseObject;
Expr: IEaxAnalyzer;
Grid: IEaxGrid;
Begin
// Получаем текущий репозиторий
mb := Params.Metabase;
// Получаем экспресс-отчет
MObj := mb.ItemById["EXP_REPORT_HT"].Edit();
Expr := MObj As IEaxAnalyzer;
// Получаем таблицу
Grid := Expr.Grid;
// Задаем текст в уголке таблицы
Grid.HeaderTitleType := EaxHeaderTitleType.ehtCustom;
Grid.HeaderTitle := "Произвольный текст";
// Сохраняем отчет
MObj.Save();
End Sub;
См. также: