Table of Contents

Getting Started with TMS FNC Toolbar

Use TTMSFNCToolBar to group buttons, separators, picker controls, and custom controls in a compact command surface.

Create a Toolbar

  1. Drop a TTMSFNCToolBar on the form.
  2. Add buttons and separators at design time from the context menu, or add them in code.
  3. Keep AutoAlign and AutoSize enabled when the toolbar should size itself around its controls.
procedure TForm1.ConfigureToolbar;
var
  Button: TTMSFNCToolBarButton;
begin
  TMSFNCToolBar1.AutoAlign := True;
  TMSFNCToolBar1.AutoSize := True;

  Button := TMSFNCToolBar1.AddButton(96, 32, '', '', 'Refresh');
  Button.OnClick := RefreshButtonClick;

  TMSFNCToolBar1.AddSeparator;
  TMSFNCToolBar1.AddFontSizePicker;
  TMSFNCToolBar1.AddColorPicker;
end;

procedure TForm1.RefreshButtonClick(Sender: TObject);
begin
  ShowMessage('Refresh the current view.');
end;
Toolbar with buttons and picker controls

Next Steps