PercentWidth: Integer;
PercentWidth: Integer;
Свойство PercentWidth определяет процент, занимаемый панелью по ширине.
Свойство актуально, если панель сносок располагается в левой или правой части окна.
Для выполнения примера предполагается наличие в репозитории экспресс-отчета с идентификатором «EXPRESS_REPORT». В таблице отчета добавлены сноски для данных или элементов измерений. Добавьте ссылки на системные сборки Express, Forms, Metabase, Tab.
Sub UserProc;
Var
MB: IMetabase;
Express: IEaxAnalyzer;
FootnotePanel: ITabFootnotesPanelOptions;
Begin
MB := MetabaseClass.Active;
Express := MB.ItemById("EXPRESS_REPORT").Edit As IEaxAnalyzer;
FootnotePanel := Express.Grid.FootnotePanelOptions;
FootnotePanel.Position := BarDockingEdge.Right;
FootnotePanel.PercentWidth := 15;
(Express As IMetabaseObject).Save;
End Sub UserProc;
При выполнении примера будут изменены параметры расположения панели со сносками: панель будет располагаться справа от таблицы и занимать пятнадцать процентов от доступной области таблицы.
Необходимые требования и результат выполнения примера Fore.NET совпадают
с примером Fore.
Imports Prognoz.Platform.Interop.Express;
Imports Prognoz.Platform.Interop.Forms;
Imports Prognoz.Platform.Interop.Metabase;
Imports Prognoz.Platform.Interop.Tab;
Public Shared Sub Main(Params: StartParams);
Var
MB: IMetabase;
Express: IEaxAnalyzer;
FootnotePanel: ITabFootnotesPanelOptions;
Begin
MB := Params.Metabase;
Express := MB.ItemById["EXPRESS_REPORT"].Edit() As IEaxAnalyzer;
FootnotePanel := Express.Grid.FootnotePanelOptions;
FootnotePanel.Position := BarDockingEdge.bdeRight;
FootnotePanel.PercentWidth := 15;
(Express As IMetabaseObject).Save();
End Sub;
См. также: