INavigationBarHeader.TitleSuffix

Syntax

TitleSuffix: String;

Description

The TitleSuffix property determines suffix for tab header text.

Comments

To determine the text displayed in the tab header, use the INavigationBarHeader.Title property.

Example

Executing the example requires a form with the NavigationBar component named NavigationBar1 on it. The repository also contains forms with the F_FORM1, F_FORM2 identifiers. These forms will be connected to the NavigationBar1 component tab panels.

Sub TESTFormOnCreate(Sender: Object; Args: IEventArgs);
Var
    Pad: INavigationBarPad;
Begin
    Pad := New NavigationBarPad.Create;
    Pad.Header.Title := "Pad " + NavigationBar1.Pads.Count.ToString;
    Pad.Header.TitleSuffix := "(suffix of " + NavigationBar1.Pads.Count.ToString + " pad)";
    Pad.Content.MetabaseObject := "DimensionCombo1";
    NavigationBar1.Pads.Add(Pad);
    Pad := New NavigationBarPad.Create;
    Pad.Header.Title := "Pad " + NavigationBar1.Pads.Count.ToString;
    Pad.Header.TitleSuffix := "(suffix of " + NavigationBar1.Pads.Count.ToString + " pad)";
    Pad.Content.MetabaseObject := "DimensionCombo2";
    NavigationBar1.Pads.Add(Pad);
End Sub TESTFormOnCreate;

The NavigationBar1 tab collection is set up at the form startup. Two tabs are created in the collection, and the header and the panel are set up for each of them.

An approximate form available for the form after setup of the NavigationBar1 component: