Bagnon-3.3.5/Bagnon/components/sortButton.lua
Richard Steininger 37d072dcc4 Initial commit
2023-10-18 20:34:32 +02:00

99 lines
No EOL
2.2 KiB
Lua

--[[
sortButton.lua
A style agnostic item sorting button
--]]
local Bagnon = LibStub('AceAddon-3.0'):GetAddon('Bagnon')
local L = LibStub('AceLocale-3.0'):GetLocale("Bagnon")
local SortButton = Bagnon.Classy:New('CheckButton')
Bagnon.SortButton = SortButton
local SIZE = 20
local NORMAL_TEXTURE_SIZE = 64 * (SIZE/36)
--[[ Construct ]]--
function SortButton:New(frameID, parent)
local b = self:Bind(CreateFrame('CheckButton', nil, parent))
b:SetWidth(SIZE)
b:SetHeight(SIZE)
b:RegisterForClicks('anyUp')
local nt = b:CreateTexture()
nt:SetTexture([[Interface\Buttons\UI-Quickslot2]])
nt:SetWidth(NORMAL_TEXTURE_SIZE)
nt:SetHeight(NORMAL_TEXTURE_SIZE)
nt:SetPoint('CENTER', 0, -1)
b:SetNormalTexture(nt)
local pt = b:CreateTexture()
pt:SetTexture([[Interface\Buttons\UI-Quickslot-Depress]])
pt:SetAllPoints(b)
b:SetPushedTexture(pt)
local ht = b:CreateTexture()
ht:SetTexture([[Interface\Buttons\ButtonHilight-Square]])
ht:SetAllPoints(b)
b:SetHighlightTexture(ht)
local ct = b:CreateTexture()
ct:SetTexture([[Interface\Buttons\CheckButtonHilight]])
ct:SetAllPoints(b)
ct:SetBlendMode('ADD')
b:SetCheckedTexture(ct)
local icon = b:CreateTexture()
icon:SetAllPoints(b)
icon:SetTexture([[Interface\AddOns\Bagnon\textures\Broom]])
b:SetScript('OnClick', b.OnClick)
b:SetScript('OnEnter', b.OnEnter)
b:SetScript('OnLeave', b.OnLeave)
b:SetFrameID(frameID)
return b
end
function SortButton:OnClick(button)
self:SetChecked(true)
self:RegisterMessage('SORTING_STATUS')
local frame = self:GetParent()
-- frame:IsCached ?
frame:SortItems()
end
function SortButton:OnEnter()
if self:GetRight() > (GetScreenWidth() / 2) then
GameTooltip:SetOwner(self, 'ANCHOR_LEFT')
else
GameTooltip:SetOwner(self, 'ANCHOR_RIGHT')
end
GameTooltip:SetText(L.TipCleanItems)
GameTooltip:Show()
end
function SortButton:OnLeave()
if GameTooltip:IsOwned(self) then
GameTooltip:Hide()
end
end
function SortButton:SORTING_STATUS()
self:SetChecked(nil)
self:UnregisterAllMessages()
end
--[[ Properties ]]--
function SortButton:SetFrameID(frameID)
if self:GetFrameID() ~= frameID then
self.frameID = frameID
end
end
function SortButton:GetFrameID()
return self.frameID
end