WoWInterface SVN PhanxConfigWidgets

Compare Revisions

  • This comparison shows the changes necessary to convert path 
    /trunk/PhanxConfig-ColorPicker
    from Rev 122 to Rev 129
    ↔ Reverse comparison
  •

Rev 122 → Rev 129

PhanxConfig-ColorPicker.lua
1,140 → 1,142
--[[--------------------------------------------------------------------
PhanxConfig-ColorPicker
Simple color picker widget generator.
Based on OmniCC_Options by Tuller.
Requires LibStub.
 
This library is not intended for use by other authors. Absolutely no
support of any kind will be provided for other authors using it, and
its internals may change at any time without notice.
----------------------------------------------------------------------]]
 
local MINOR_VERSION = tonumber(("$Revision$"):match("%d+"))
 
local lib, oldminor = LibStub:NewLibrary("PhanxConfig-ColorPicker", MINOR_VERSION)
if not lib then return end
 
local prototype = {}
 
function prototype:OnClick()
self:OnLeave()
if ColorPickerFrame:IsShown() then
ColorPickerFrame:Hide()
else
self.r, self.g, self.b, self.opacity = self:GetValue()
OpenColorPicker(self)
ColorPickerFrame:SetFrameStrata("TOOLTIP")
ColorPickerFrame:Raise()
end
end
 
function prototype:OnEnter()
local color = NORMAL_FONT_COLOR
self.bg:SetVertexColor(color.r, color.g, color.b)
 
if self.desc then
GameTooltip:SetOwner(self, "ANCHOR_RIGHT")
GameTooltip:SetText(self.desc, nil, nil, nil, nil, true)
end
end
 
function prototype:OnLeave()
local color = HIGHLIGHT_FONT_COLOR
self.bg:SetVertexColor(color.r, color.g, color.b)
 
GameTooltip:Hide()
end
 
function prototype:GetValue()
local r, g, b, a = self.swatch:GetVertexColor()
return floor(r * 100 + 0.5) / 100, floor(g * 100 + 0.5) / 100, floor(b * 100 + 0.5) / 100, floor(a * 100 + 0.5) / 100
end
 
function prototype:SetValue(r, g, b, a)
if type(r) == "table" then
r, g, b, a = r.r or r[1], r.g or r[2], r.b or r[3], r.a or r[4]
end
 
r = floor(r * 100 + 0.5) / 100
g = floor(g * 100 + 0.5) / 100
b = floor(b * 100 + 0.5) / 100
a = a and self.hasOpacity and (floor(a * 100 + 0.5) / 100) or 1
 
self.swatch:SetVertexColor(r, g, b, a)
self.bg:SetAlpha(a)
 
local handler = self.ApplyValue or self.OnValueChanged
if handler then
-- Ignore updates while ColorPickerFrame:IsShown() if desired.
handler(self, r, g, b, a)
else
-- Deprecated!!!
if self.OnColorChanged then
-- use this for immediate visual updating
self:OnColorChanged(r, g, b, a)
end
if not ColorPickerFrame:IsShown() and self.PostColorChanged then
-- use this for final updating after the color picker closes
self:PostColorChanged(r, g, b, a)
end
end
end
 
function lib:New(parent, name, desc, hasOpacity)
assert( type(parent) == "table" and parent.CreateFontString, "PhanxConfig-ColorPicker: Parent is not a valid frame!" )
if type(name) ~= "string" then name = nil end
if type(desc) ~= "string" then desc = nil end
 
local frame = CreateFrame("Button", nil, parent)
frame:SetHeight(26)
 
local swatch = frame:CreateTexture(nil, "OVERLAY")
swatch:SetTexture("Interface\\ChatFrame\\ChatFrameColorSwatch")
swatch:SetPoint("LEFT", 5, 1)
swatch:SetSize(17, 18)
frame.swatch = swatch
 
local bg = frame:CreateTexture(nil, "BACKGROUND")
bg:SetTexture(1, 1, 1)
bg:SetPoint("LEFT", 5, 1)
bg:SetSize(16, 16)
frame.bg = bg
 
local label = frame:CreateFontString(nil, "ARTWORK", "GameFontHighlight")
label:SetPoint("LEFT", swatch, "RIGHT", 7, 0)
label:SetHeight(19)
label:SetText(name)
frame.label = label
 
frame:SetWidth(math.min(186, math.max(5 + 16 + 7 + label:GetStringWidth(), 100)))
frame:SetMotionScriptsWhileDisabled(true)
 
frame.desc = desc
 
for name, func in pairs(prototype) do
frame[name] = func
end
 
frame:SetScript("OnClick", frame.OnClick)
frame:SetScript("OnEnter", frame.OnEnter)
frame:SetScript("OnLeave", frame.OnLeave)
 
frame.hasOpacity = hasOpacity
frame.cancelFunc = function()
frame:SetValue(frame.r, frame.g, frame.b, frame.hasOpacity and frame.opacity or 1)
end
frame.opacityFunc = function()
local r, g, b = ColorPickerFrame:GetColorRGB()
local a = OpacitySliderFrame:GetValue()
frame:SetValue(r, g, b, a)
end
frame.swatchFunc = function()
local r, g, b = ColorPickerFrame:GetColorRGB()
local a = OpacitySliderFrame:GetValue()
frame:SetValue(r, g, b, a)
end
 
return frame
end
 
--[[--------------------------------------------------------------------
PhanxConfig-ColorPicker
Simple color picker widget generator.
Based on OmniCC_Options by Tuller.
Requires LibStub.
 
This library is not intended for use by other authors. Absolutely no
support of any kind will be provided for other authors using it, and
its internals may change at any time without notice.
----------------------------------------------------------------------]]
 
local MINOR_VERSION = tonumber(("$Revision$"):match("%d+"))
 
local lib, oldminor = LibStub:NewLibrary("PhanxConfig-ColorPicker", MINOR_VERSION)
if not lib then return end
 
------------------------------------------------------------------------
 
local scripts = {}
 
function scripts:OnClick()
if ColorPickerFrame:IsShown() then
ColorPickerFrame:Hide()
else
self.r, self.g, self.b, self.opacity = self:GetValue()
OpenColorPicker(self)
ColorPickerFrame:SetFrameStrata("TOOLTIP")
ColorPickerFrame:Raise()
end
end
 
function scripts:OnEnter()
local color = NORMAL_FONT_COLOR
self.bg:SetVertexColor(color.r, color.g, color.b)
if self.tooltipText then
GameTooltip:SetOwner(self, "ANCHOR_RIGHT")
GameTooltip:SetText(self.tooltipText, nil, nil, nil, nil, true)
end
end
function scripts:OnLeave()
local color = HIGHLIGHT_FONT_COLOR
self.bg:SetVertexColor(color.r, color.g, color.b)
GameTooltip:Hide()
end
 
------------------------------------------------------------------------
 
local methods = {}
 
function methods:GetValue()
local r, g, b, a = self.swatch:GetVertexColor()
return floor(r * 100 + 0.5) / 100, floor(g * 100 + 0.5) / 100, floor(b * 100 + 0.5) / 100, floor(a * 100 + 0.5) / 100
end
function methods:SetValue(r, g, b, a)
if type(r) == "table" then
r, g, b, a = r.r or r[1], r.g or r[2], r.b or r[3], r.a or r[4]
end
 
r = floor(r * 100 + 0.5) / 100
g = floor(g * 100 + 0.5) / 100
b = floor(b * 100 + 0.5) / 100
a = a and self.hasOpacity and (floor(a * 100 + 0.5) / 100) or 1
 
self.swatch:SetVertexColor(r, g, b, a)
self.bg:SetAlpha(a)
 
local func = self.func or self.ApplyValue or self.OnValueChanged
if func then
-- Ignore updates while ColorPickerFrame:IsShown() if desired.
func(self, r, g, b, a)
end
end
 
function methods:GetTooltipText()
return self.tooltipText
end
function methods:SetTooltipText(text)
self.tooltipText = text
end
 
function methods:SetFunction(func)
self.func = func
end
 
------------------------------------------------------------------------
 
function lib:New(parent, name, tooltipText, hasOpacity)
assert(type(parent) == "table" and parent.CreateFontString, "PhanxConfig-ColorPicker: Parent is not a valid frame!")
if type(name) ~= "string" then name = nil end
if type(tooltipText) ~= "string" then tooltipText = nil end
 
local frame = CreateFrame("Button", nil, parent)
frame:SetHeight(26)
 
local swatch = frame:CreateTexture(nil, "OVERLAY")
swatch:SetTexture("Interface\\ChatFrame\\ChatFrameColorSwatch")
swatch:SetPoint("LEFT", 5, 1)
swatch:SetSize(17, 18)
frame.swatch = swatch
 
local bg = frame:CreateTexture(nil, "BACKGROUND")
bg:SetTexture(1, 1, 1)
bg:SetPoint("LEFT", 5, 1)
bg:SetSize(16, 16)
frame.bg = bg
 
local label = frame:CreateFontString(nil, "ARTWORK", "GameFontHighlight")
label:SetPoint("LEFT", swatch, "RIGHT", 7, 0)
label:SetHeight(19)
frame.label = label
 
frame:SetMotionScriptsWhileDisabled(true)
for name, func in pairs(scripts) do
frame[name] = func
frame:SetScript(name, func)
end
for name, func in pairs(methods) do
frame[name] = func
end
 
frame.hasOpacity = hasOpacity
frame.cancelFunc = function()
frame:SetValue(frame.r, frame.g, frame.b, frame.hasOpacity and frame.opacity or 1)
end
frame.opacityFunc = function()
local r, g, b = ColorPickerFrame:GetColorRGB()
local a = OpacitySliderFrame:GetValue()
frame:SetValue(r, g, b, a)
end
frame.swatchFunc = function()
local r, g, b = ColorPickerFrame:GetColorRGB()
local a = OpacitySliderFrame:GetValue()
frame:SetValue(r, g, b, a)
end
 
label:SetText(name)
frame.tooltipText = tooltipText
frame:SetWidth(math.min(186, math.max(5 + 16 + 7 + label:GetStringWidth(), 100)))
return frame
end
 
function lib.CreateColorPicker(...) return lib:New(...) end
\ No newline at end of file Property changes : Added: svn:eol-style + native