TBeBarManager

Komponente zum Steuern von Toolbarelementen.

Eigenschaften

Eigenschaft	Beschreibung
AllowCallFromAnotherForm:L
AllowReset:L
AlwaysMerge:L
AlwaysSaveText:L
AutoAlignBars:L
AutoDockColor:L
AutoHideEmptyBars:L
Backgrounds:O
BarInfoItems:O
ButtonArrowWidth:N
CanCustomize:L
Categories:O
DisabledImages:O
DisabledLargeImages:O
DockColor:N
FakeComponentLink1:O
FakeComponentLink2:O
FakeComponentLink3:O
FlatCloseButton:L
Font:O
HelpButtonGlyph:O
HelpContext:N
HideFloatingBarsWhenInactive:L
HotImages:O
ImageListBkColor:N
ImageOptions:O
Images:O
IniFileName:C
LargeButtonArrowWidth:N
LargeIcons:L
LargeImages:O
LookAndFeel:O
MakeDisabledImagesFaded:L
MenuAnimations:N
MenusShowRecentItemsFirst:L
MostRecentItemsPercents:N
Name:C
NotDocking:N
PopupMenuLinks:O
RegistryPath:C
Scaled:L
ShowCloseButton:L
ShowFullMenusAfterDelay:L
ShowHelpButton:L
ShowHint:L
ShowHintForDisabledItems:L
ShowShortCutInHint:L
StoreInIniFile:L
StoreInRegistry:L
StretchGlyphs:L
Style:N
SunkenBorder:L
Tag:N
UseBarHintWindow:L
UseF10ForMenu:L
UseFullReset:L
UseLargeImagesForLargeIcons:L
UseSystemFont:L
WaitForDockingTime:N

Methoden

Methode	Beschreibung
CbAddToolBar():O	Erzeugt eine TbeBar
CbDeleteToolBar(aBar:O)
CbBeginUpdate()	Verhindert Aktualisierung und Neuzeichnen
CbEndUpdate()	Erlaubt Aktualisierung und Neuzeichnen

Beispiel

//##############################################################################
//##############################################################################
// Online-Hilfe Beispiel für die Klasse 'TBeBarManager'
//##############################################################################
//##############################################################################

| oBarManager, oForm, oBar, btn_BarButton1, pnl_Main, oActionList, aActionButton1 |

//##############################################################################
//##############################################################################
// Eventhandler
//##############################################################################
//##############################################################################

//******************************************************************************
//
// @Result: null
//******************************************************************************
function A_DeleteToolbar  ( Sender )
   startseq,
     oBarManager.CbDeleteToolBar(oBar),
   onerror
      GU_ShowStdErrorMessage(GetErrorText(), GetErrorObj()),
   stopseq,
end,

//******************************************************************************
// InitForm lädt das Formular
// @Result: null
//******************************************************************************
function InitForm()
   oForm             := CreateObject('TFormEx', 'TFormEx'),
   oForm.BorderStyle := bsSingle,
   oForm.Width       := 500,
   oForm.Height      := 500,
   oForm.OrigCapt    := 'Beispielprogramm',
   oForm.Position    := poScreenCenter,
end,

//******************************************************************************
// LoadGUI lädt sämtliche Komponenten die für die Oberfläche benötigt werden
// @Result: null
//******************************************************************************
function LoadGUID()
   pnl_Main         := CreateObject('TBePanel', 'Main', oForm, oForm),
   pnl_Main.Align   := alClient,
   pnl_Main.Caption := '',

   oBarManager        := CreateObject('TBeBarManager', 'barMan', oForm),
   oBarManager.Images := BeImageList(nImageListMain16),
   oBar               := oBarManager.CbAddToolbar(),

   oActionList        := createObject('TBeActionList', 'actions', oForm, oForm),
   oActionList.Images := BeImageList(nImageListMain16),

   aActionButton1            := CreateObject('TBeAction', 'A_DeleteToolbar', oForm, oForm),
   aActionButton1.ActionList := oActionList,
   aActionButton1.Caption    := 'Delete Toolbar',
   aActionButton1.ImageIndex := 928,

   btn_BarButton1            := oBar.CbAddButton(),
   btn_BarButton1.Action     := aActionButton1,
   btn_BarButton1.PaintStyle := psCaptionGlyph,
   AssignEvent(aActionButton1, 'OnExecute', 'A_DeleteToolbar'),
end,

//##############################################################################
//##############################################################################
// Hauptprogramm
//##############################################################################
//##############################################################################
startseq,
   InitForm(),
   LoadGUID(),
   ShowModal(oForm),

   DestroyObject(oBarManager),
   DestroyObject(oActionList),
onerror
   DestroyObject(oBarManager),
   DestroyObject(oActionList),
   DestroyObject(oForm),
   GU_ShowStdErrorMessage(GetErrorText(), GetErrorObj()),
stopseq,

Weitere Verknüpfungen

TbeBar