ESOUI SVN LibAddonMenu

[/] [branches/] [LibAddonMenu-2.0/] [LibAddonMenu-2.0/] [controls/] [editbox.lua] - Rev 32

Compare with Previous | Blame | View Log

--[[editboxData = {
        type = "editbox",
        name = "My Editbox",
        tooltip = "Editbox's tooltip text.",
        getFunc = function() return db.text end,
        setFunc = function(text) db.text = text doStuff() end,
        isMultiline = true,     --boolean
        width = "full", --or "half" (optional)
        disabled = function() return db.someBooleanSetting end, --or boolean (optional)
        warning = "Will need to reload the UI.",        --(optional)
        default = defaults.text,        --(optional)
        reference = "MyAddonEditbox"    --(optional) unique global reference to control
}       ]]


local widgetVersion = 2
local LAM = LibStub("LibAddonMenu-2.0")
if not LAM:RegisterWidget("editbox", widgetVersion) then return end

local wm = WINDOW_MANAGER
local cm = CALLBACK_MANAGER
local tinsert = table.insert


local function UpdateDisabled(control)
        local disable
        if type(control.data.disabled) == "function" then
                disable = control.data.disabled()
        else
                disable = control.data.disabled
        end
        
        if disable then
                control.label:SetColor(ZO_DEFAULT_DISABLED_COLOR:UnpackRGBA())
                control.editbox:SetColor(ZO_DEFAULT_DISABLED_MOUSEOVER_COLOR:UnpackRGBA())
        else
                control.label:SetColor(ZO_DEFAULT_ENABLED_COLOR:UnpackRGBA())
                control.editbox:SetColor(ZO_DEFAULT_ENABLED_COLOR:UnpackRGBA())
        end
        --control.editbox:SetEditEnabled(not disable)
        control.editbox:SetMouseEnabled(not disable)
end

local function UpdateValue(control, forceDefault, value)        
        if forceDefault then    --if we are forcing defaults
                value = control.data.default
                control.data.setFunc(value)
                control.editbox:SetText(value)
        elseif value then
                control.data.setFunc(value)
                --after setting this value, let's refresh the others to see if any should be disabled or have their settings changed
                if control.panel.data.registerForRefresh then
                        cm:FireCallbacks("LAM-RefreshPanel", control)
                end
        else
                value = control.data.getFunc()
                control.editbox:SetText(value)
        end
end


local scrollCount = 1
function LAMCreateControl.editbox(parent, editboxData, controlName)
        local control = wm:CreateTopLevelWindow(controlName or editboxData.reference)
        control:SetParent(parent.scroll)
        control:SetMouseEnabled(true)
        control:SetResizeToFitDescendents(true)
        control.tooltipText = editboxData.tooltip
        control:SetHandler("OnMouseEnter", ZO_Options_OnMouseEnter)
        control:SetHandler("OnMouseExit", ZO_Options_OnMouseExit)
        
        control.label = wm:CreateControl(nil, control, CT_LABEL)
        local label = control.label
        label:SetAnchor(TOPLEFT)
        label:SetFont("ZoFontWinH4")
        label:SetWrapMode(TEXT_WRAP_MODE_ELLIPSIS)
        label:SetText(editboxData.name)
        
        control.bg = wm:CreateControlFromVirtual(nil, control, "ZO_EditBackdrop")
        local bg = control.bg
        
        if editboxData.isMultiline then
                control.scroll = wm:CreateControlFromVirtual(parent:GetName().."Scroll"..scrollCount, bg, "ZO_ScrollContainer")
                scrollCount = scrollCount + 1
                control.editbox = wm:CreateControlFromVirtual(nil, control.scroll, "ZO_DefaultEditMultiLineForBackdrop")
        else
                control.editbox = wm:CreateControlFromVirtual(nil, bg, "ZO_DefaultEditForBackdrop")
        end
        local editbox = control.editbox
        editbox:SetText(editboxData.getFunc())
        editbox:SetMaxInputChars(3000)
        editbox:SetHandler("OnFocusLost", function(self) control:UpdateValue(false, self:GetText()) end)
        editbox:SetHandler("OnEscape", function(self) self:LoseFocus() control:UpdateValue() end)
        editbox:SetHandler("OnMouseEnter", function() ZO_Options_OnMouseEnter(control) end)
        editbox:SetHandler("OnMouseExit", function() ZO_Options_OnMouseExit(control) end)
        
        local isHalfWidth = editboxData.width == "half"
        if isHalfWidth then
                control:SetDimensions(250, 55)
                label:SetDimensions(250, 26)
                bg:SetDimensions(240, editboxData.isMultiline and 74 or 24)
                bg:SetAnchor(TOPRIGHT, label, BOTTOMRIGHT)
        else
                control:SetDimensions(510, 30)
                label:SetDimensions(300, 26)
                bg:SetDimensions(200, editboxData.isMultiline and 100 or 24)
                bg:SetAnchor(TOPRIGHT)
        end

        if editboxData.warning then
                control.warning = wm:CreateControlFromVirtual(nil, control, "ZO_Options_WarningIcon")
                control.warning:SetAnchor(TOPRIGHT, control.bg, TOPLEFT, -5, 0)
                control.warning.tooltipText = editboxData.warning
        end

        control.panel = parent.panel or parent  --if this is in a submenu, panel is its parent
        control.data = editboxData
        
        if editboxData.disabled then
                control.UpdateDisabled = UpdateDisabled
                control:UpdateDisabled()
        end
        control.UpdateValue = UpdateValue
        control:UpdateValue()

        if control.panel.data.registerForRefresh or control.panel.data.registerForDefaults then --if our parent window wants to refresh controls, then add this to the list
                tinsert(control.panel.controlsToRefresh, control)
        end

        return control
end

Compare with Previous | Blame