ich bin bei der "native" Toolbar. Die hat ja Buttons welche man mit o:AddItem() hinzufügen kann
Code: Alles auswählen
METHOD DXE_Toolbar:Additem(cCaption, xImage, xDisabledImage, xHotImage, cDLL, nStyle, cKey)
AADD(::aTBitems,{ cCaption,xImage, xDisabledImage, xHotImage, cDLL, nStyle, cKey })
wenn ich mir nun den oToobar:buttonClick Callbackslot ansehe finde ich oButton "im Codeblock"
Code: Alles auswählen
:buttonClick := {| oButton,uNil,self | ... }
Code: Alles auswählen
CLASS DXE_ToolBarButton
EXPORTED:
VAR bottom
VAR caption
VAR description
VAR disabledImage
VAR enabled
VAR height
VAR hotImage
VAR image
VAR index
VAR key
VAR left
VAR mixedState
VAR pressed
VAR style
VAR tooltipText
VAR top
VAR visible
VAR width
METHOD init()
METHOD addItem()
METHOD clear()
METHOD delItem()
METHOD getItem()
METHOD numItems()
ENDCLASS
METHOD DXE_ToolBarButton:init(p1,p2,p3,p4,p5,p6)
METHOD DXE_ToolBarButton:addItem( cCaption, cKey )
METHOD DXE_ToolBarButton:clear()
METHOD DXE_ToolBarButton:delItem( xItem )
METHOD DXE_ToolBarButton:getItem( xItem )
METHOD DXE_ToolBarButton:numItems()
wie bekomme ich nun beides zusammen ?