mirror of
https://github.com/linux-man/LoveFrames.git
synced 2024-11-26 05:14:21 +00:00
603 lines
14 KiB
Lua
603 lines
14 KiB
Lua
--[[------------------------------------------------
|
|
-- Love Frames - A GUI library for LOVE --
|
|
-- Copyright (c) 2012 Kenny Shields --
|
|
--]]------------------------------------------------
|
|
|
|
-- list class
|
|
local newobject = loveframes.NewObject("list", "loveframes_object_list", true)
|
|
|
|
--[[---------------------------------------------------------
|
|
- func: initialize()
|
|
- desc: initializes the object
|
|
--]]---------------------------------------------------------
|
|
function newobject:initialize()
|
|
|
|
self.type = "list"
|
|
self.display = "vertical"
|
|
self.width = 300
|
|
self.height = 150
|
|
self.clickx = 0
|
|
self.clicky = 0
|
|
self.padding = 0
|
|
self.spacing = 0
|
|
self.offsety = 0
|
|
self.offsetx = 0
|
|
self.extrawidth = 0
|
|
self.extraheight = 0
|
|
self.buttonscrollamount = 0.10
|
|
self.mousewheelscrollamount = 5
|
|
self.internal = false
|
|
self.hbar = false
|
|
self.vbar = false
|
|
self.autoscroll = false
|
|
self.internals = {}
|
|
self.children = {}
|
|
self.OnScroll = nil
|
|
|
|
end
|
|
|
|
--[[---------------------------------------------------------
|
|
- func: update(deltatime)
|
|
- desc: updates the object
|
|
--]]---------------------------------------------------------
|
|
function newobject:update(dt)
|
|
|
|
local visible = self.visible
|
|
local alwaysupdate = self.alwaysupdate
|
|
|
|
if not visible then
|
|
if not alwaysupdate then
|
|
return
|
|
end
|
|
end
|
|
|
|
local internals = self.internals
|
|
local children = self.children
|
|
local display = self.display
|
|
local parent = self.parent
|
|
local base = loveframes.base
|
|
local update = self.Update
|
|
|
|
-- move to parent if there is a parent
|
|
if parent ~= base then
|
|
self.x = self.parent.x + self.staticx
|
|
self.y = self.parent.y + self.staticy
|
|
end
|
|
|
|
self:CheckHover()
|
|
|
|
for k, v in ipairs(internals) do
|
|
v:update(dt)
|
|
end
|
|
|
|
for k, v in ipairs(children) do
|
|
v:update(dt)
|
|
v:SetClickBounds(self.x, self.y, self.width, self.height)
|
|
v.y = (v.parent.y + v.staticy) - self.offsety
|
|
v.x = (v.parent.x + v.staticx) - self.offsetx
|
|
|
|
if display == "vertical" then
|
|
if v.lastheight ~= v.height then
|
|
self:CalculateSize()
|
|
self:RedoLayout()
|
|
end
|
|
end
|
|
|
|
end
|
|
|
|
if update then
|
|
update(self, dt)
|
|
end
|
|
|
|
end
|
|
|
|
--[[---------------------------------------------------------
|
|
- func: draw()
|
|
- desc: draws the object
|
|
--]]---------------------------------------------------------
|
|
function newobject:draw()
|
|
|
|
local visible = self.visible
|
|
|
|
if not visible then
|
|
return
|
|
end
|
|
|
|
local internals = self.internals
|
|
local children = self.children
|
|
local stencilfunc = function() love.graphics.rectangle("fill", self.x, self.y, self.width, self.height) end
|
|
local stencil = love.graphics.newStencil(stencilfunc)
|
|
local skins = loveframes.skins.available
|
|
local skinindex = loveframes.config["ACTIVESKIN"]
|
|
local defaultskin = loveframes.config["DEFAULTSKIN"]
|
|
local selfskin = self.skin
|
|
local skin = skins[selfskin] or skins[skinindex]
|
|
local drawfunc = skin.DrawList or skins[defaultskin].DrawList
|
|
local drawoverfunc = skin.DrawOverList or skins[defaultskin].DrawOverList
|
|
local draw = self.Draw
|
|
local drawcount = loveframes.drawcount
|
|
|
|
-- set the object's draw order
|
|
self:SetDrawOrder()
|
|
|
|
if draw then
|
|
draw(self)
|
|
else
|
|
drawfunc(self)
|
|
end
|
|
|
|
love.graphics.setStencil(stencil)
|
|
|
|
for k, v in ipairs(children) do
|
|
local col = loveframes.util.BoundingBox(self.x, v.x, self.y, v.y, self.width, v.width, self.height, v.height)
|
|
if col == true then
|
|
v:draw()
|
|
end
|
|
end
|
|
|
|
love.graphics.setStencil()
|
|
|
|
for k, v in ipairs(internals) do
|
|
v:draw()
|
|
end
|
|
|
|
if not draw then
|
|
drawoverfunc(self)
|
|
end
|
|
|
|
end
|
|
|
|
--[[---------------------------------------------------------
|
|
- func: mousepressed(x, y, button)
|
|
- desc: called when the player presses a mouse button
|
|
--]]---------------------------------------------------------
|
|
function newobject:mousepressed(x, y, button)
|
|
|
|
local visible = self.visible
|
|
|
|
if not visible then
|
|
return
|
|
end
|
|
|
|
local toplist = self:IsTopList()
|
|
local hover = self.hover
|
|
local vbar = self.vbar
|
|
local hbar = self.hbar
|
|
local scrollamount = self.mousewheelscrollamount
|
|
local children = self.children
|
|
local internals = self.internals
|
|
|
|
if hover and button == "l" then
|
|
|
|
local baseparent = self:GetBaseParent()
|
|
|
|
if baseparent and baseparent.type == "frame" then
|
|
baseparent:MakeTop()
|
|
end
|
|
|
|
end
|
|
|
|
if vbar or hbar then
|
|
|
|
if toplist then
|
|
|
|
local bar = self:GetScrollBar()
|
|
|
|
if button == "wu" then
|
|
bar:Scroll(-scrollamount)
|
|
elseif button == "wd" then
|
|
bar:Scroll(scrollamount)
|
|
end
|
|
|
|
end
|
|
|
|
end
|
|
|
|
for k, v in ipairs(internals) do
|
|
v:mousepressed(x, y, button)
|
|
end
|
|
|
|
for k, v in ipairs(children) do
|
|
v:mousepressed(x, y, button)
|
|
end
|
|
|
|
end
|
|
|
|
--[[---------------------------------------------------------
|
|
- func: AddItem(object)
|
|
- desc: adds an item to the object
|
|
--]]---------------------------------------------------------
|
|
function newobject:AddItem(object)
|
|
|
|
if object.type == "frame" then
|
|
return
|
|
end
|
|
|
|
local children = self.children
|
|
|
|
-- remove the item object from it's current parent and make it's new parent the list object
|
|
object:Remove()
|
|
object.parent = self
|
|
|
|
-- insert the item object into the list object's children table
|
|
table.insert(children, object)
|
|
|
|
-- resize the list and redo it's layout
|
|
self:CalculateSize()
|
|
self:RedoLayout()
|
|
|
|
end
|
|
|
|
--[[---------------------------------------------------------
|
|
- func: RemoveItem(object)
|
|
- desc: removes an item from the object
|
|
--]]---------------------------------------------------------
|
|
function newobject:RemoveItem(object)
|
|
|
|
object:Remove()
|
|
self:CalculateSize()
|
|
self:RedoLayout()
|
|
|
|
end
|
|
|
|
--[[---------------------------------------------------------
|
|
- func: CalculateSize()
|
|
- desc: calculates the size of the object's children
|
|
--]]---------------------------------------------------------
|
|
function newobject:CalculateSize()
|
|
|
|
local numitems = #self.children
|
|
local height = self.height
|
|
local width = self.width
|
|
local padding = self.padding
|
|
local spacing = self.spacing
|
|
local itemheight = self.padding
|
|
local itemwidth = self.padding
|
|
local display = self.display
|
|
local vbar = self.vbar
|
|
local hbar = self.hbar
|
|
local internals = self.internals
|
|
local children = self.children
|
|
|
|
if display == "vertical" then
|
|
|
|
for k, v in ipairs(self.children) do
|
|
itemheight = itemheight + v.height + spacing
|
|
end
|
|
|
|
self.itemheight = (itemheight - spacing) + padding
|
|
|
|
local itemheight = self.itemheight
|
|
|
|
if itemheight > height then
|
|
|
|
self.extraheight = itemheight - height
|
|
|
|
if not vbar then
|
|
local scrollbar = loveframes.objects["scrollbody"]:new(self, display)
|
|
table.insert(internals, scrollbar)
|
|
self.vbar = true
|
|
self:GetScrollBar().autoscroll = self.autoscroll
|
|
end
|
|
|
|
else
|
|
|
|
if vbar then
|
|
local bar = internals[1]
|
|
bar:Remove()
|
|
self.vbar = false
|
|
self.offsety = 0
|
|
end
|
|
|
|
end
|
|
|
|
elseif display == "horizontal" then
|
|
|
|
for k, v in ipairs(children) do
|
|
itemwidth = itemwidth + v.width + spacing
|
|
end
|
|
|
|
self.itemwidth = (itemwidth - spacing) + padding
|
|
|
|
local itemwidth = self.itemwidth
|
|
|
|
if itemwidth > width then
|
|
|
|
self.extrawidth = itemwidth - width
|
|
|
|
if not hbar then
|
|
local scrollbar = loveframes.objects["scrollbody"]:new(self, display)
|
|
table.insert(internals, scrollbar)
|
|
self.hbar = true
|
|
self:GetScrollBar().autoscroll = self.autoscroll
|
|
end
|
|
|
|
else
|
|
|
|
if hbar then
|
|
local bar = internals[1]
|
|
bar:Remove()
|
|
self.hbar = false
|
|
self.offsetx = 0
|
|
end
|
|
|
|
end
|
|
|
|
end
|
|
|
|
end
|
|
|
|
--[[---------------------------------------------------------
|
|
- func: RedoLayout()
|
|
- desc: used to redo the layout of the object
|
|
--]]---------------------------------------------------------
|
|
function newobject:RedoLayout()
|
|
|
|
local children = self.children
|
|
local padding = self.padding
|
|
local spacing = self.spacing
|
|
local starty = padding
|
|
local startx = padding
|
|
local vbar = self.vbar
|
|
local hbar = self.hbar
|
|
local display = self.display
|
|
|
|
if #children > 0 then
|
|
|
|
for k, v in ipairs(children) do
|
|
|
|
if display == "vertical" then
|
|
|
|
local height = v.height
|
|
|
|
v.staticx = padding
|
|
v.staticy = starty
|
|
v.lastheight = v.height
|
|
|
|
if vbar then
|
|
if v.width + padding > (self.width - self.internals[1].width) then
|
|
v:SetWidth((self.width - self.internals[1].width) - (padding*2))
|
|
end
|
|
if not v.retainsize then
|
|
v:SetWidth((self.width - self.internals[1].width) - (padding*2))
|
|
end
|
|
self.internals[1].staticx = self.width - self.internals[1].width
|
|
self.internals[1].height = self.height
|
|
else
|
|
if not v.retainsize then
|
|
v:SetWidth(self.width - (padding*2))
|
|
end
|
|
end
|
|
|
|
starty = starty + v.height
|
|
starty = starty + spacing
|
|
|
|
elseif display == "horizontal" then
|
|
|
|
v.staticx = startx
|
|
v.staticy = padding
|
|
|
|
if hbar then
|
|
if v.height + padding > (self.height - self.internals[1].height) then
|
|
v:SetHeight((self.height - self.internals[1].height) - (padding*2))
|
|
end
|
|
if not v.retainsize then
|
|
v:SetHeight((self.height - self.internals[1].height) - (padding*2))
|
|
end
|
|
self.internals[1].staticy = self.height - self.internals[1].height
|
|
self.internals[1].width = self.width
|
|
else
|
|
if not v.retainsize then
|
|
v:SetHeight(self.height - (padding*2))
|
|
end
|
|
end
|
|
|
|
startx = startx + v.width
|
|
startx = startx + spacing
|
|
|
|
end
|
|
|
|
end
|
|
|
|
end
|
|
|
|
end
|
|
|
|
--[[---------------------------------------------------------
|
|
- func: SetDisplayType(type)
|
|
- desc: sets the object's display type
|
|
--]]---------------------------------------------------------
|
|
function newobject:SetDisplayType(type)
|
|
|
|
local children = self.children
|
|
local numchildren = #children
|
|
|
|
self.display = type
|
|
self.vbar = false
|
|
self.hbar = false
|
|
self.offsetx = 0
|
|
self.offsety = 0
|
|
self.internals = {}
|
|
|
|
if numchildren > 0 then
|
|
self:CalculateSize()
|
|
self:RedoLayout()
|
|
end
|
|
|
|
end
|
|
|
|
--[[---------------------------------------------------------
|
|
- func: GetDisplayType()
|
|
- desc: gets the object's display type
|
|
--]]---------------------------------------------------------
|
|
function newobject:GetDisplayType()
|
|
|
|
return self.display
|
|
|
|
end
|
|
|
|
--[[---------------------------------------------------------
|
|
- func: SetPadding(amount)
|
|
- desc: sets the object's padding
|
|
--]]---------------------------------------------------------
|
|
function newobject:SetPadding(amount)
|
|
|
|
local children = self.children
|
|
local numchildren = #children
|
|
|
|
self.padding = amount
|
|
|
|
if numchildren > 0 then
|
|
self:CalculateSize()
|
|
self:RedoLayout()
|
|
end
|
|
|
|
end
|
|
|
|
--[[---------------------------------------------------------
|
|
- func: SetSpacing(amount)
|
|
- desc: sets the object's spacing
|
|
--]]---------------------------------------------------------
|
|
function newobject:SetSpacing(amount)
|
|
|
|
local children = self.children
|
|
local numchildren = #children
|
|
|
|
self.spacing = amount
|
|
|
|
if numchildren > 0 then
|
|
self:CalculateSize()
|
|
self:RedoLayout()
|
|
end
|
|
|
|
end
|
|
|
|
--[[---------------------------------------------------------
|
|
- func: Clear()
|
|
- desc: removes all of the object's children
|
|
--]]---------------------------------------------------------
|
|
function newobject:Clear()
|
|
|
|
self.children = {}
|
|
self:CalculateSize()
|
|
self:RedoLayout()
|
|
|
|
end
|
|
|
|
--[[---------------------------------------------------------
|
|
- func: SetWidth(width)
|
|
- desc: sets the object's width
|
|
--]]---------------------------------------------------------
|
|
function newobject:SetWidth(width)
|
|
|
|
self.width = width
|
|
self:CalculateSize()
|
|
self:RedoLayout()
|
|
|
|
end
|
|
|
|
--[[---------------------------------------------------------
|
|
- func: SetHeight(height)
|
|
- desc: sets the object's height
|
|
--]]---------------------------------------------------------
|
|
function newobject:SetHeight(height)
|
|
|
|
self.height = height
|
|
self:CalculateSize()
|
|
self:RedoLayout()
|
|
|
|
end
|
|
|
|
--[[---------------------------------------------------------
|
|
- func: GetSize()
|
|
- desc: gets the object's size
|
|
--]]---------------------------------------------------------
|
|
function newobject:SetSize(width, height)
|
|
|
|
self.width = width
|
|
self.height = height
|
|
self:CalculateSize()
|
|
self:RedoLayout()
|
|
|
|
end
|
|
|
|
--[[---------------------------------------------------------
|
|
- func: GetScrollBar()
|
|
- desc: gets the object's scroll bar
|
|
--]]---------------------------------------------------------
|
|
function newobject:GetScrollBar()
|
|
|
|
local vbar = self.vbar
|
|
local hbar = self.hbar
|
|
local internals = self.internals
|
|
|
|
if vbar or hbar then
|
|
local scrollbody = internals[1]
|
|
local scrollarea = scrollbody.internals[1]
|
|
local scrollbar = scrollarea.internals[1]
|
|
return scrollbar
|
|
else
|
|
return false
|
|
end
|
|
|
|
end
|
|
|
|
--[[---------------------------------------------------------
|
|
- func: SetAutoScroll(bool)
|
|
- desc: sets whether or not the list's scrollbar should
|
|
auto scroll to the bottom when a new object is
|
|
added to the list
|
|
--]]---------------------------------------------------------
|
|
function newobject:SetAutoScroll(bool)
|
|
|
|
local scrollbar = self:GetScrollBar()
|
|
|
|
self.autoscroll = bool
|
|
|
|
if scrollbar then
|
|
scrollbar.autoscroll = bool
|
|
end
|
|
|
|
end
|
|
|
|
--[[---------------------------------------------------------
|
|
- func: SetButtonScrollAmount(speed)
|
|
- desc: sets the scroll amount of the object's scrollbar
|
|
buttons
|
|
--]]---------------------------------------------------------
|
|
function newobject:SetButtonScrollAmount(amount)
|
|
|
|
self.buttonscrollamount = amount
|
|
|
|
end
|
|
|
|
--[[---------------------------------------------------------
|
|
- func: GetButtonScrollAmount()
|
|
- desc: gets the scroll amount of the object's scrollbar
|
|
buttons
|
|
--]]---------------------------------------------------------
|
|
function newobject:GetButtonScrollAmount()
|
|
|
|
return self.buttonscrollamount
|
|
|
|
end
|
|
|
|
--[[---------------------------------------------------------
|
|
- func: SetMouseWheelScrollAmount(amount)
|
|
- desc: sets the scroll amount of the mouse wheel
|
|
--]]---------------------------------------------------------
|
|
function newobject:SetMouseWheelScrollAmount(amount)
|
|
|
|
self.mousewheelscrollamount = amount
|
|
|
|
end
|
|
|
|
--[[---------------------------------------------------------
|
|
- func: GetMouseWheelScrollAmount()
|
|
- desc: gets the scroll amount of the mouse wheel
|
|
--]]---------------------------------------------------------
|
|
function newobject:GetButtonScrollAmount()
|
|
|
|
return self.mousewheelscrollamount
|
|
|
|
end |