Reference TWebAddressBar

  TWebAddressBar = class(TCustomControl)
  protected
    procedure Notification(AComponent: TComponent; Operation: TOperation); override;
    procedure Resize; override;
  public
    constructor Create(AOwner: TComponent); override;
    destructor Destroy; override;
    { Click a button as if the user had clicked it }
    procedure ButtonClick(Button: TWebAddressButton);
  published
    property Align;
    property Anchors;
    property BorderSpacing;
    { The buttons shown on the bar }
    property Buttons: TWebAddressButtons read FButtons write SetButtons default DefaultAddressButtons;
    property Constraints;
    property Enabled;
    property Font;
    { The location loaded by the home button }
    property HomePage: string read FHomePage write FHomePage;
    property ParentFont;
    property Visible;
    { The browser to navigate }
    property WebBrowser: TCustomWebBrowser read FWebBrowser write SetWebBrowser;
    { OnButtonClick is invoked when any button is clicked }
    property OnButtonClick: TWebAddressButtonEvent read FOnButtonClick write FOnButtonClick;
  end;