Added dropdown control
This commit is contained in:
File diff suppressed because it is too large
Load Diff
@@ -19,14 +19,20 @@ feature
|
||||
initialize_controls
|
||||
local
|
||||
btn: WSF_BUTTON_CONTROL
|
||||
dropdown:WSF_DROPDOWN_CONTROL
|
||||
do
|
||||
create control.make ("container")
|
||||
control.add_class ("container")
|
||||
create dropdown.make_with_tag_name ("mydropdown", "Dropdown", "li")
|
||||
dropdown.add_link_item ("Example link 1", "#")
|
||||
dropdown.add_divider
|
||||
dropdown.add_link_item ("Example link 2", "#")
|
||||
create navbar.make_with_brand ("navbar1", "Example")
|
||||
navbar.add_list_element (create {WSF_BASIC_CONTROL}.make_with_body ("a", "href=%"/%"", "Home"))
|
||||
navbar.add_list_element (create {WSF_BASIC_CONTROL}.make_with_body ("a", "href=%"/grid%"", "Grid"))
|
||||
navbar.add_list_element (create {WSF_BASIC_CONTROL}.make_with_body ("a", "href=%"/repeater%"", "Repeater"))
|
||||
navbar.add_list_element (create {WSF_BASIC_CONTROL}.make_with_body ("a", "href=%"/slider%"", "Slider"))
|
||||
navbar.add_element (dropdown)
|
||||
navbar.add_list_element_right (create {WSF_BASIC_CONTROL}.make_with_body ("a", "href=%"/about%"", "About"))
|
||||
create btn.make ("scode", "Show Code")
|
||||
btn.set_click_event (agent show_code)
|
||||
|
||||
Reference in New Issue
Block a user