ITabFootnote.CustomMark

Fore Syntax

CustomMark: String;

Fore.NET Syntax

CustomMark: String;

Description

The CustomMark property determines a custom label that is used to determine the footnote.

Comments

Default label is not set, the label set for the whole collection or automatic numeration are used for the footnote.

Fore Example

Executing the example requires a form with the Button1 button, the UiTabSheet component named UiTabSheet1 and any visualizers, for which UiTabSheet1 is set as a data source.

Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
    TabSheet: ITabSheet;
    Footnotes: ITabFootnotes;
    Footnote: ITabFootnote;
Begin
    TabSheet := UiTabSheet1.TabSheet;
    Footnotes := TabSheet.Footnotes;
    Footnote := Footnotes.Add(0, 0);
    Footnote.CustomMark := "+";
    Footnote.Text := "Average growth";
    Footnote.CustomMarkFontName := "Terminal";
    Footnote := Footnotes.Add(0, 1);
    Footnote.CustomMark := "-";
    Footnote.CustomMarkFontName := "Terminal";
    Footnote.Text := "Average decrease";
End Sub Button1OnClick;

On clicking the button for the A0 and B0 cells two footmarks will be added. Label, font for label drawing and text will be set for the footmark.

Fore.NET Example

The requirements and result of the Fore.NET Example execution match with those in the Fore Example. Use Fore.NET analogs instead of Fore components.

Imports Prognoz.Platform.Interop.Tab;

Private Sub button1_Click(sender: System.Object; e: System.EventArgs);
Var
    TabSheet: ITabSheet;
    Footnotes: ITabFootnotes;
    Footnote: ITabFootnote;
Begin
    TabSheet := uiTabSheetNet1.TabSheetUi.TabSheet;
    Footnotes := TabSheet.Footnotes;
    Footnote := Footnotes.Add(0, 0);
    Footnote.CustomMark := "+";
    Footnote.Text := "Average growth";
    Footnote.CustomMarkFontName := "Terminal";
    Footnote := Footnotes.Add(0, 1);
    Footnote.CustomMark := "-";
    Footnote.CustomMarkFontName := "Terminal";
    Footnote.Text := "Average decrease";
End Sub;