mirror of
https://github.com/PHIDIAS0303/ExpCluster.git
synced 2025-12-27 11:35:22 +09:00
52 lines
1.2 KiB
Lua
52 lines
1.2 KiB
Lua
--[[-- Core Module - ExpStyle
|
|
@module ExpStyle
|
|
]]
|
|
|
|
local Gui = require 'expcore.gui' -- @dep expcore.gui
|
|
|
|
Gui.require_concept 'frame' -- @dep gui.concept.table
|
|
|
|
local right_align =
|
|
Gui.new_concept('alignment')
|
|
|
|
--[[-- A frame that acts as a header to a section of content
|
|
@see Gui.frame
|
|
@element header
|
|
@tparam string tooltip the tooltip to show on the title
|
|
@usage-- Concept Structure
|
|
-- Root
|
|
--> [header] - the header frame
|
|
-->> header_caption - the lable with the title in it
|
|
-->> header_content - the area to contain butons
|
|
Gui.new_concept('header')
|
|
:set_title('Example Header')
|
|
]]
|
|
|
|
Gui.new_concept('frame')
|
|
:save_as('header')
|
|
:new_property('tooltip')
|
|
|
|
-- Draw
|
|
:define_draw(function(properties,parent,element)
|
|
-- Update the table style
|
|
Gui.set_padding(element,2,2,4,4)
|
|
element.style = 'subheader_frame'
|
|
element.caption = nil
|
|
|
|
local style = element.style
|
|
style.horizontally_stretchable = true
|
|
style.use_header_filler = false
|
|
|
|
-- Add the caption to the frame
|
|
element.add{
|
|
type = 'label',
|
|
name = 'header_caption',
|
|
caption = properties.title,
|
|
tooltip = properties.tooltip
|
|
}
|
|
|
|
-- Add the right align area
|
|
local align = right_align:draw(element,'header_content')
|
|
|
|
return align
|
|
end) |