Files
PathOfBuilding/Classes/CheckBoxControl.lua
Openarl e9a4b95580 Release 1.2.36
- Hide condition options if the condition isn't used
- Added support for "Ignited Enemies Burn faster"
- Added options for On Shocked/Burning/Chilled ground
- Added workaround for account name case sensitivity on character imports
2017-01-31 01:15:04 +10:00

96 lines
2.1 KiB
Lua

-- Path of Building
--
-- Class: Check Box Control
-- Basic check box control.
--
local launch, main = ...
local CheckBoxClass = common.NewClass("CheckBoxControl", "Control", function(self, anchor, x, y, size, label, changeFunc)
self.Control(anchor, x, y, size, size)
self.label = label
self.changeFunc = changeFunc
end)
function CheckBoxClass:IsMouseOver()
if not self:IsShown() then
return false
end
return self:IsMouseInBounds()
end
function CheckBoxClass:Draw(viewPort)
local x, y = self:GetPos()
local size = self.width
local enabled = self:IsEnabled()
local mOver = self:IsMouseOver()
if not enabled then
SetDrawColor(0.33, 0.33, 0.33)
elseif mOver then
SetDrawColor(1, 1, 1)
else
SetDrawColor(0.5, 0.5, 0.5)
end
DrawImage(nil, x, y, size, size)
if not enabled then
SetDrawColor(0, 0, 0)
elseif self.clicked and mOver then
SetDrawColor(0.5, 0.5, 0.5)
elseif mOver then
SetDrawColor(0.33, 0.33, 0.33)
else
SetDrawColor(0, 0, 0)
end
DrawImage(nil, x + 1, y + 1, size - 2, size - 2)
if self.state then
if not enabled then
SetDrawColor(0.33, 0.33, 0.33)
elseif mOver then
SetDrawColor(1, 1, 1)
else
SetDrawColor(0.75, 0.75, 0.75)
end
main:DrawCheckMark(x + size/2, y + size/2, size * 0.8)
end
if enabled then
SetDrawColor(1, 1, 1)
else
SetDrawColor(0.33, 0.33, 0.33)
end
local label = self:GetProperty("label")
if label then
DrawString(x - 5, y + 2, "RIGHT_X", size - 4, "VAR", label)
end
if mOver and self.tooltip then
local tooltip = self:GetProperty("tooltip")
if tooltip then
main:AddTooltipLine(16, tooltip)
SetDrawLayer(nil, 100)
main:DrawTooltip(x, y, size, size, viewPort)
SetDrawLayer(nil, 0)
end
end
end
function CheckBoxClass:OnKeyDown(key)
if not self:IsShown() or not self:IsEnabled() then
return
end
if key == "LEFTBUTTON" then
self.clicked = true
end
return self
end
function CheckBoxClass:OnKeyUp(key)
if not self:IsShown() or not self:IsEnabled() then
return
end
if key == "LEFTBUTTON" then
if self:IsMouseOver() then
self.state = not self.state
self.changeFunc(self.state)
end
end
self.clicked = false
end