Class TDemoForm (unit Demo1)

Inherits from

TForm

Constructors



Functions

procedure AddButtonClick(Sender: TObject);


procedure DeleteButtonClick(Sender: TObject);


procedure FExitClick(Sender: TObject);

Use the SetSlaveControl method of a TToolbar97 to configure a separate top/bottom docked and left/right docked version of a control.

procedure FontButtonClick(Sender: TObject);

Toggle the status bar's visibility

procedure FormCreate(Sender: TObject);


procedure ListBoxClick(Sender: TObject);


procedure SampleToolWindowVisibleChanged(Sender: TObject);


procedure ToolbarPopupMenuPopup(Sender: TObject);


procedure ToolWinButtonClick(Sender: TObject);


procedure VMenuClick(Sender: TObject);


procedure VStatusBarClick(Sender: TObject);


procedure VTEditClick(Sender: TObject);


procedure VTMainClick(Sender: TObject);


procedure VTSampleClick(Sender: TObject);


Properties

Events

Variables

AddButton : TButton;


BottomDock : TDock97;


CenterButton : TToolbarButton97;


CopyButton : TToolbarButton97;


CutButton : TToolbarButton97;


DeleteButton : TButton;


dropdown1 : TMenuItem;


DropdownButton : TToolbarButton97;


DropPopupMenu : TPopupMenu;


EditSep1 : TToolbarSep97;


EditToolbar : TToolbar97;


FExit : TMenuItem;


FMenu : TMenuItem;


FontButton : TToolbarButton97;


FontCombo : TComboBox;


LeftButton : TToolbarButton97;


LeftDock : TDock97;


ListBox : TListBox;


MainMenu : TMainMenu;


MainSep1 : TToolbarSep97;


MainSep2 : TToolbarSep97;


MainSep3 : TToolbarSep97;


MainToolbar : TToolbar97;


Memo : TMemo;


menu1 : TMenuItem;


NewButton : TToolbarButton97;


OpenButton : TToolbarButton97;


Panel1 : TPanel;


PasteButton : TToolbarButton97;


PrintButton : TToolbarButton97;


PrintPreviewButton : TToolbarButton97;


RedoButton : TToolbarButton97;


RightButton : TToolbarButton97;


RightDock : TDock97;


Sample1 : TMenuItem;


SampleEdit1 : TEdit97;


SampleEdit2 : TEdit97;


SampleSep1 : TToolbarSep97;


SampleSep2 : TToolbarSep97;


SampleToolbar : TToolbar97;


SampleToolWindow : TToolWindow97;


SaveButton : TToolbarButton97;


StatusBar : TStatusBar;


ToolbarPopupMenu : TPopupMenu;


ToolWinButton : TToolbarButton97;


TopDock : TDock97;


TPEdit : TMenuItem;


TPMain : TMenuItem;


TPSample : TMenuItem;


UndoButton : TToolbarButton97;


VMenu : TMenuItem;


VStatusBar : TMenuItem;


VTEdit : TMenuItem;


VTMain : TMenuItem;


VToolbars : TMenuItem;


VTSample : TMenuItem;



Constructors


Functions


procedure AddButtonClick(Sender: TObject);


procedure DeleteButtonClick(Sender: TObject);


procedure FExitClick(Sender: TObject);

Use the SetSlaveControl method of a TToolbar97 to configure a separate top/bottom docked and left/right docked version of a control. Please see TB97.DOC for more info on slave controls. The line below tells it that FontCombo is the top/bottom docked version, and FontButton is the left/right docked version.


procedure FontButtonClick(Sender: TObject);

Toggle the status bar's visibility


procedure FormCreate(Sender: TObject);


procedure ListBoxClick(Sender: TObject);


procedure SampleToolWindowVisibleChanged(Sender: TObject);


procedure ToolbarPopupMenuPopup(Sender: TObject);


procedure ToolWinButtonClick(Sender: TObject);


procedure VMenuClick(Sender: TObject);


procedure VStatusBarClick(Sender: TObject);


procedure VTEditClick(Sender: TObject);


procedure VTMainClick(Sender: TObject);


procedure VTSampleClick(Sender: TObject);


Properties


Events


Variables


AddButton : TButton;


BottomDock : TDock97;


CenterButton : TToolbarButton97;


CopyButton : TToolbarButton97;


CutButton : TToolbarButton97;


DeleteButton : TButton;


dropdown1 : TMenuItem;


DropdownButton : TToolbarButton97;


DropPopupMenu : TPopupMenu;


EditSep1 : TToolbarSep97;


EditToolbar : TToolbar97;


FExit : TMenuItem;


FMenu : TMenuItem;


FontButton : TToolbarButton97;


FontCombo : TComboBox;


LeftButton : TToolbarButton97;


LeftDock : TDock97;


ListBox : TListBox;


MainMenu : TMainMenu;


MainSep1 : TToolbarSep97;


MainSep2 : TToolbarSep97;


MainSep3 : TToolbarSep97;


MainToolbar : TToolbar97;


Memo : TMemo;


menu1 : TMenuItem;


NewButton : TToolbarButton97;


OpenButton : TToolbarButton97;


Panel1 : TPanel;


PasteButton : TToolbarButton97;


PrintButton : TToolbarButton97;


PrintPreviewButton : TToolbarButton97;


RedoButton : TToolbarButton97;


RightButton : TToolbarButton97;


RightDock : TDock97;


Sample1 : TMenuItem;


SampleEdit1 : TEdit97;


SampleEdit2 : TEdit97;


SampleSep1 : TToolbarSep97;


SampleSep2 : TToolbarSep97;


SampleToolbar : TToolbar97;


SampleToolWindow : TToolWindow97;


SaveButton : TToolbarButton97;


StatusBar : TStatusBar;


ToolbarPopupMenu : TPopupMenu;


ToolWinButton : TToolbarButton97;


TopDock : TDock97;


TPEdit : TMenuItem;


TPMain : TMenuItem;


TPSample : TMenuItem;


UndoButton : TToolbarButton97;


VMenu : TMenuItem;


VStatusBar : TMenuItem;


VTEdit : TMenuItem;


VTMain : TMenuItem;


VToolbars : TMenuItem;


VTSample : TMenuItem;