ToolBar – Araç Çubuğu
Eklediğiniz butonlara resim yerleştirmek için öncelikle forma bir ImageList ekler ve resimleri bundan aktarırız.
Private Sub ToolBar1_ButtonClick(ByVal Button As ComctlLib.Button)
Select Case Button.Key
Case "Key Adı"
‘ İşlemler
Case "KeyAdi2"
‘ İşlemler2
End Select
End Sub
Private Sub Toolbar1_ButtonClick(ByVal Tus As Button)
Select Case Tus.Key
Case "Yeni"
Mönü_Yeni_Click
Case "Ac"
Mönü_Aç_Click
Case "Kaydet"
Mönü_Kaydet_Click
End Select
End Sub
ToolBar - Özellikler
Align
AllowCustomize
Appearance
BorderStyle
ButtonHeight
ButtonMenus
Buttons
ButtonWidth
Container
Controls
DataBinding
DataBindings
DisabledImagesList
DragIcon
Dragmode
Enabled
Height
HelpContexID
HelpFile
HotImageList
HWnd
ImageList
Index
Left
MouseIcon
MousePointer
Name
Object
OleDropMode
Parent
ShowTips
Style
Tabndex
Tag
TextAllignment
ToolTipText
Top
Visible
WhatsThisHelpID
Width
Wrappable
Align : ToolBar’ın form üzerinde ki yerleşim yeri
AllowCustomize : True - Kullanıcı Toolbar’da değişiklik yapabilir
BorderStyle : Toolbarın sınırları
Custom : Yeni buton eklemek ve butonlarda değişiklikleri
ImageList : ToolBarda kullanılacak olan resimlerin saklandığı ImageList
ButtonStyle : 0 - tbrDefault : Default tip bağımsız olarak işlevini yerine getirir
( Aç, Sil, Kaydet vb )
ButtonStyle : 1 - tbrCheck : Kullanıldığı zaman aktif durumda kalır
( Kalın karakter vb )
ButtonStyle : 2 – tbrButtonGroup : Yöntem tercihi
( Sağa - Sola yanaşık vb )
ButtonStyle : 3 - tbrSeperator : Diğer butonları birbirinden ayırır
ButtonStyle : 4 - tbrPlaceHolder : Yeni buton ilavesi için yer açar
ButtonStyle : 5 - tbrDropDown: Taşınabilir
ToolBar - Olaylar
ButtonClick
MuttonMenuClick
Change
Click
DblClick
DragDrop
DroOver MouseDown
MouseMove
MouseUp
OleCompleteDrag
OleDragDrop
OleDragOver
OleGiveFeedBack
OleSetData
OleStartDrag
ToolBar - Yöntemler
Customize
Drag
Move
OleDrag
Refresh
Restore
SaveToolBar
ShowWhatsThis
ZOrder
Eklediğiniz butonlara resim yerleştirmek için öncelikle forma bir ImageList ekler ve resimleri bundan aktarırız.
Private Sub ToolBar1_ButtonClick(ByVal Button As ComctlLib.Button)
Select Case Button.Key
Case "Key Adı"
‘ İşlemler
Case "KeyAdi2"
‘ İşlemler2
End Select
End Sub
Private Sub Toolbar1_ButtonClick(ByVal Tus As Button)
Select Case Tus.Key
Case "Yeni"
Mönü_Yeni_Click
Case "Ac"
Mönü_Aç_Click
Case "Kaydet"
Mönü_Kaydet_Click
End Select
End Sub
ToolBar - Özellikler
Align
AllowCustomize
Appearance
BorderStyle
ButtonHeight
ButtonMenus
Buttons
ButtonWidth
Container
Controls
DataBinding
DataBindings
DisabledImagesList
DragIcon
Dragmode
Enabled
Height
HelpContexID
HelpFile
HotImageList
HWnd
ImageList
Index
Left
MouseIcon
MousePointer
Name
Object
OleDropMode
Parent
ShowTips
Style
Tabndex
Tag
TextAllignment
ToolTipText
Top
Visible
WhatsThisHelpID
Width
Wrappable
Align : ToolBar’ın form üzerinde ki yerleşim yeri
AllowCustomize : True - Kullanıcı Toolbar’da değişiklik yapabilir
BorderStyle : Toolbarın sınırları
Custom : Yeni buton eklemek ve butonlarda değişiklikleri
ImageList : ToolBarda kullanılacak olan resimlerin saklandığı ImageList
ButtonStyle : 0 - tbrDefault : Default tip bağımsız olarak işlevini yerine getirir
( Aç, Sil, Kaydet vb )
ButtonStyle : 1 - tbrCheck : Kullanıldığı zaman aktif durumda kalır
( Kalın karakter vb )
ButtonStyle : 2 – tbrButtonGroup : Yöntem tercihi
( Sağa - Sola yanaşık vb )
ButtonStyle : 3 - tbrSeperator : Diğer butonları birbirinden ayırır
ButtonStyle : 4 - tbrPlaceHolder : Yeni buton ilavesi için yer açar
ButtonStyle : 5 - tbrDropDown: Taşınabilir
ToolBar - Olaylar
ButtonClick
MuttonMenuClick
Change
Click
DblClick
DragDrop
DroOver MouseDown
MouseMove
MouseUp
OleCompleteDrag
OleDragDrop
OleDragOver
OleGiveFeedBack
OleSetData
OleStartDrag
ToolBar - Yöntemler
Customize
Drag
Move
OleDrag
Refresh
Restore
SaveToolBar
ShowWhatsThis
ZOrder
