WoWInterface SVN NeedyGreedy
Compare Revisions
- This comparison shows the changes necessary to convert path
/trunk/libs
- from Rev 124 to Rev 126
- ↔ Reverse comparison
Rev 124 → Rev 126
AceLocale-3.0/AceLocale-3.0.lua
1,13 → 1,21
| --- **AceLocale-3.0** manages localization in addons, allowing for multiple locale to be registered with fallback to the base locale for untranslated strings. |
| -- @class file |
| -- @name AceLocale-3.0 |
| -- @release $Id: AceLocale-3.0.lua 766 2009-04-04 08:26:05Z nevcairiel $ |
| -- @release $Id: AceLocale-3.0.lua 895 2009-12-06 16:28:55Z nevcairiel $ |
| local MAJOR,MINOR = "AceLocale-3.0", 2 |
| local AceLocale, oldminor = LibStub:NewLibrary(MAJOR, MINOR) |
| if not AceLocale then return end -- no upgrade needed |
| -- Lua APIs |
| local assert, tostring, error = assert, tostring, error |
| local setmetatable, rawset, rawget = setmetatable, rawset, rawget |
| -- Global vars/functions that we don't upvalue since they might get hooked, or upgraded |
| -- List them here for Mikk's FindGlobals script |
| -- GLOBALS: GAME_LOCALE, geterrorhandler |
| local gameLocale = GetLocale() |
| if gameLocale == "enGB" then |
| gameLocale = "enUS" |
CallbackHandler-1.0/CallbackHandler-1.0.lua
1,20 → 1,21
| --[[ $Id: CallbackHandler-1.0.lua 3 2008-09-29 16:54:20Z nevcairiel $ ]] |
| local MAJOR, MINOR = "CallbackHandler-1.0", 3 |
| --[[ $Id: CallbackHandler-1.0.lua 895 2009-12-06 16:28:55Z nevcairiel $ ]] |
| local MAJOR, MINOR = "CallbackHandler-1.0", 5 |
| local CallbackHandler = LibStub:NewLibrary(MAJOR, MINOR) |
| if not CallbackHandler then return end -- No upgrade needed |
| local meta = {__index = function(tbl, key) tbl[key] = {} return tbl[key] end} |
| local type = type |
| local pcall = pcall |
| local pairs = pairs |
| local assert = assert |
| local concat = table.concat |
| local loadstring = loadstring |
| local next = next |
| local select = select |
| local type = type |
| -- Lua APIs |
| local tconcat = table.concat |
| local assert, error, loadstring = assert, error, loadstring |
| local setmetatable, rawset, rawget = setmetatable, rawset, rawget |
| local next, select, pairs, type, tostring = next, select, pairs, type, tostring |
| -- Global vars/functions that we don't upvalue since they might get hooked, or upgraded |
| -- List them here for Mikk's FindGlobals script |
| -- GLOBALS: geterrorhandler |
| local xpcall = xpcall |
| local function errorhandler(err) |
46,7 → 47,7
| local ARGS, OLD_ARGS = {}, {} |
| for i = 1, argCount do ARGS[i], OLD_ARGS[i] = "arg"..i, "old_arg"..i end |
| code = code:gsub("OLD_ARGS", concat(OLD_ARGS, ", ")):gsub("ARGS", concat(ARGS, ", ")) |
| code = code:gsub("OLD_ARGS", tconcat(OLD_ARGS, ", ")):gsub("ARGS", tconcat(ARGS, ", ")) |
| return assert(loadstring(code, "safecall Dispatcher["..argCount.."]"))(next, xpcall, errorhandler) |
| end |
AceTimer-3.0/AceTimer-3.0.lua
15,7 → 15,7
| -- make into AceTimer. |
| -- @class file |
| -- @name AceTimer-3.0 |
| -- @release $Id: AceTimer-3.0.lua 769 2009-04-04 11:05:08Z nevcairiel $ |
| -- @release $Id: AceTimer-3.0.lua 895 2009-12-06 16:28:55Z nevcairiel $ |
| --[[ |
| Basic assumptions: |
46,14 → 46,20
| AceTimer.selfs = AceTimer.selfs or {} -- Array of [self]={[handle]=timerobj, [handle2]=timerobj2, ...} |
| AceTimer.frame = AceTimer.frame or CreateFrame("Frame", "AceTimer30Frame") |
| local type = type |
| local next = next |
| local pairs = pairs |
| local select = select |
| local tostring = tostring |
| local floor = floor |
| local max = max |
| -- Lua APIs |
| local assert, error, loadstring = assert, error, loadstring |
| local setmetatable, rawset, rawget = setmetatable, rawset, rawget |
| local select, pairs, type, next, tostring = select, pairs, type, next, tostring |
| local floor, max, min = math.floor, math.max, math.min |
| local tconcat = table.concat |
| -- WoW APIs |
| local GetTime = GetTime |
| -- Global vars/functions that we don't upvalue since they might get hooked, or upgraded |
| -- List them here for Mikk's FindGlobals script |
| -- GLOBALS: DEFAULT_CHAT_FRAME, geterrorhandler |
| -- Simple ONE-SHOT timer cache. Much more efficient than a full compost for our purposes. |
| local timerCache = nil |
103,7 → 109,7
| local ARGS = {} |
| for i = 1, argCount do ARGS[i] = "arg"..i end |
| code = code:gsub("ARGS", table.concat(ARGS, ", ")) |
| code = code:gsub("ARGS", tconcat(ARGS, ", ")) |
| return assert(loadstring(code, "safecall Dispatcher["..argCount.."]"))(xpcall, errorhandler) |
| end |
AceDBOptions-3.0/AceDBOptions-3.0.lua
1,12 → 1,22
| --- AceDBOptions-3.0 provides a universal AceConfig options screen for managing AceDB-3.0 profiles. |
| -- @class file |
| -- @name AceDBOptions-3.0 |
| -- @release $Id: AceDBOptions-3.0.lua 765 2009-04-03 19:14:41Z nevcairiel $ |
| local ACEDBO_MAJOR, ACEDBO_MINOR = "AceDBOptions-3.0", 10 |
| -- @release $Id: AceDBOptions-3.0.lua 938 2010-06-13 07:21:38Z nevcairiel $ |
| local ACEDBO_MAJOR, ACEDBO_MINOR = "AceDBOptions-3.0", 12 |
| local AceDBOptions, oldminor = LibStub:NewLibrary(ACEDBO_MAJOR, ACEDBO_MINOR) |
| if not AceDBOptions then return end -- No upgrade needed |
| -- Lua APIs |
| local pairs, next = pairs, next |
| -- WoW APIs |
| local UnitClass = UnitClass |
| -- Global vars/functions that we don't upvalue since they might get hooked, or upgraded |
| -- List them here for Mikk's FindGlobals script |
| -- GLOBALS: NORMAL_FONT_COLOR_CODE, FONT_COLOR_CODE_CLOSE |
| AceDBOptions.optionTables = AceDBOptions.optionTables or {} |
| AceDBOptions.handlers = AceDBOptions.handlers or {} |
20,7 → 30,7
| reset_desc = "Reset the current profile back to its default values, in case your configuration is broken, or you simply want to start over.", |
| reset = "Reset Profile", |
| reset_sub = "Reset the current profile to the default", |
| choose_desc = "You can either create a new profile by entering a name in the editbox, or choose one of the already exisiting profiles.", |
| choose_desc = "You can either create a new profile by entering a name in the editbox, or choose one of the already existing profiles.", |
| new = "New", |
| new_sub = "Create a new empty profile.", |
| choose = "Existing Profiles", |
33,6 → 43,7
| delete_confirm = "Are you sure you want to delete the selected profile?", |
| profiles = "Profiles", |
| profiles_sub = "Manage Profiles", |
| current = "Current Profile:", |
| } |
| local LOCALE = GetLocale() |
55,6 → 66,7
| L["delete_confirm"] = "Willst du das ausgew\195\164hlte Profil wirklich l\195\182schen?" |
| L["profiles"] = "Profile" |
| L["profiles_sub"] = "Profile verwalten" |
| --L["current"] = "Current Profile:" |
| elseif LOCALE == "frFR" then |
| L["default"] = "D\195\169faut" |
| L["intro"] = "Vous pouvez changer le profil actuel afin d'avoir des param\195\168tres diff\195\169rents pour chaque personnage, permettant ainsi d'avoir une configuration tr\195\168s flexible." |
74,6 → 86,7
| L["delete_confirm"] = "Etes-vous s\195\187r de vouloir supprimer le profil s\195\169lectionn\195\169 ?" |
| L["profiles"] = "Profils" |
| L["profiles_sub"] = "Gestion des profils" |
| --L["current"] = "Current Profile:" |
| elseif LOCALE == "koKR" then |
| L["default"] = "기본ê°" |
| L["intro"] = "모ë ìºë¦í°ì ë¤ìí ì¤ì ê³¼ ì¬ì©ì¤ì¸ ë°ì´í°ë² ì´ì¤ íë¡í, ì´ëê²ì´ëì§ ë§¤ì° ë¤ë£¨ê¸° ì½ê² ë°ê¿ì ììµëë¤." |
93,7 → 106,8
| L["delete_confirm"] = "ì ë§ë¡ ì íí íë¡íì ìì 를 ìíìëê¹?" |
| L["profiles"] = "íë¡í" |
| L["profiles_sub"] = "íë¡í ì¤ì " |
| elseif LOCALE == "esES" then |
| --L["current"] = "Current Profile:" |
| elseif LOCALE == "esES" or LOCALE == "esMX" then |
| L["default"] = "Por defecto" |
| L["intro"] = "Puedes cambiar el perfil activo de tal manera que cada personaje tenga diferentes configuraciones." |
| L["reset_desc"] = "Reinicia el perfil actual a los valores por defectos, en caso de que se haya estropeado la configuración o quieras volver a empezar de nuevo." |
112,6 → 126,7
| L["delete_confirm"] = "¿Estas seguro que quieres borrar el perfil seleccionado?" |
| L["profiles"] = "Perfiles" |
| L["profiles_sub"] = "Manejar Perfiles" |
| --L["current"] = "Current Profile:" |
| elseif LOCALE == "zhTW" then |
| L["default"] = "é è¨" |
| L["intro"] = "ä½ å¯ä»¥é¸æä¸åæ´»åçè³æè¨å®æªï¼éæ¨£ä½ çæ¯åè§è²å°±å¯ä»¥ææä¸åçè¨å®å¼ï¼å¯ä»¥çµ¦ä½ çæ件è¨å®å¸¶ä¾æ¥µå¤§çéæ´»æ§ã" |
131,6 → 146,7
| L["delete_confirm"] = "ä½ ç¢ºå®è¦åªé¤æé¸æçè¨å®æªåï¼" |
| L["profiles"] = "è¨å®æª" |
| L["profiles_sub"] = "管çè¨å®æª" |
| --L["current"] = "Current Profile:" |
| elseif LOCALE == "zhCN" then |
| L["default"] = "é»è®¤" |
| L["intro"] = "ä½ å¯ä»¥éæ©ä¸ä¸ªæ´»å¨çæ°æ®é ç½®æ件ï¼è¿æ ·ä½ çæ¯ä¸ªè§è²å°±å¯ä»¥æ¥æä¸åç设置å¼ï¼å¯ä»¥ç»ä½ çæ件é 置带æ¥æ大ççµæ´»æ§ã" |
150,6 → 166,7
| L["delete_confirm"] = "ä½ ç¡®å®è¦å é¤æéæ©çé ç½®æ件ä¹ï¼" |
| L["profiles"] = "é ç½®æ件" |
| L["profiles_sub"] = "管çé ç½®æ件" |
| --L["current"] = "Current Profile:" |
| elseif LOCALE == "ruRU" then |
| L["default"] = "Ðо ÑмолÑаниÑ" |
| L["intro"] = "ÐзменÑÑ Ð°ÐºÑивнÑй пÑоÑилÑ, Ð²Ñ Ð¼Ð¾Ð¶ÐµÑе задаÑÑ ÑазлиÑнÑе наÑÑÑойки модиÑикаÑий Ð´Ð»Ñ ÐºÐ°Ð¶Ð´Ð¾Ð³Ð¾ пеÑÑонажа." |
169,6 → 186,7
| L["delete_confirm"] = "ÐÑ ÑвеÑенÑ, ÑÑо Ð²Ñ Ñ Ð¾ÑиÑе ÑдалиÑÑ Ð²ÑбÑаннÑй пÑоÑилÑ?" |
| L["profiles"] = "ÐÑоÑили" |
| L["profiles_sub"] = "УпÑавление пÑоÑилÑми" |
| --L["current"] = "Current Profile:" |
| end |
| local defaultProfiles |
310,6 → 328,12
| desc = L["reset_sub"], |
| func = "Reset", |
| }, |
| current = { |
| order = 11, |
| type = "description", |
| name = function(info) return L["current"] .. " " .. NORMAL_FONT_COLOR_CODE .. info.handler:GetCurrentProfile() .. FONT_COLOR_CODE_CLOSE end, |
| width = "default", |
| }, |
| choosedesc = { |
| order = 20, |
| type = "description", |
AceEvent-3.0/AceEvent-3.0.lua
9,19 → 9,20
| -- make into AceEvent. |
| -- @class file |
| -- @name AceEvent-3.0 |
| -- @release $Id: AceEvent-3.0.lua 766 2009-04-04 08:26:05Z nevcairiel $ |
| -- @release $Id: AceEvent-3.0.lua 877 2009-11-02 15:56:50Z nevcairiel $ |
| local MAJOR, MINOR = "AceEvent-3.0", 3 |
| local AceEvent = LibStub:NewLibrary(MAJOR, MINOR) |
| if not AceEvent then return end |
| -- Lua APIs |
| local pairs = pairs |
| local CallbackHandler = LibStub:GetLibrary("CallbackHandler-1.0") |
| AceEvent.frame = AceEvent.frame or CreateFrame("Frame", "AceEvent30Frame") -- our event frame |
| AceEvent.embeds = AceEvent.embeds or {} -- what objects embed this lib |
| -- APIs and registry for blizzard events, using CallbackHandler lib |
| if not AceEvent.events then |
| AceEvent.events = CallbackHandler:New(AceEvent, |
AceGUI-3.0/AceGUI-3.0.xml
1,25 → 1,28
\ No newline at end of file
+
+
| <Ui xmlns="http://www.blizzard.com/wow/ui/" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xsi:schemaLocation="http://www.blizzard.com/wow/ui/ |
| ..\FrameXML\UI.xsd"> |
| <Script file="AceGUI-3.0.lua"/> |
| <!-- Container --> |
| <Script file="widgets\AceGUIContainer-BlizOptionsGroup.lua"/> |
| <Script file="widgets\AceGUIContainer-DropDownGroup.lua"/> |
| <Script file="widgets\AceGUIContainer-Frame.lua"/> |
| <Script file="widgets\AceGUIContainer-InlineGroup.lua"/> |
| <Script file="widgets\AceGUIContainer-ScrollFrame.lua"/> |
| <Script file="widgets\AceGUIContainer-SimpleGroup.lua"/> |
| <Script file="widgets\AceGUIContainer-TabGroup.lua"/> |
| <Script file="widgets\AceGUIContainer-TreeGroup.lua"/> |
| <Script file="widgets\AceGUIContainer-Window.lua"/> |
| <!-- Widgets --> |
| <Script file="widgets\AceGUIWidget-Button.lua"/> |
| <Script file="widgets\AceGUIWidget-CheckBox.lua"/> |
| <Script file="widgets\AceGUIWidget-ColorPicker.lua"/> |
| <Script file="widgets\AceGUIWidget-DropDownGroup.lua"/> |
| <Script file="widgets\AceGUIWidget-DropDown.lua"/> |
| <Script file="widgets\AceGUIWidget-DropDown-Items.lua"/> |
| <Script file="widgets\AceGUIWidget-EditBox.lua"/> |
| <Script file="widgets\AceGUIWidget-Frame.lua"/> |
| <Script file="widgets\AceGUIWidget-Heading.lua"/> |
| <Script file="widgets\AceGUIWidget-InlineGroup.lua"/> |
| <Script file="widgets\AceGUIWidget-Keybinding.lua"/> |
| <Script file="widgets\AceGUIWidget-ScrollFrame.lua"/> |
| <Script file="widgets\AceGUIWidget-SimpleGroup.lua"/> |
| <Script file="widgets\AceGUIWidget-Slider.lua"/> |
| <Script file="widgets\AceGUIWidget-TabGroup.lua"/> |
| <Script file="widgets\AceGUIWidget-TreeGroup.lua"/> |
| <Script file="widgets\AceGUIWidget-Heading.lua"/> |
| <Script file="widgets\AceGUIWidget-Icon.lua"/> |
| <Script file="widgets\AceGUIWidget-InteractiveLabel.lua"/> |
| <Script file="widgets\AceGUIWidget-Keybinding.lua"/> |
| <Script file="widgets\AceGUIWidget-Label.lua"/> |
| <Script file="widgets\AceGUIWidget-MultiLineEditBox.lua"/> |
| <Script file="widgets\AceGUIWidget-BlizOptionsGroup.lua"/> |
| <Script file="widgets\AceGUIWidget-InteractiveLabel.lua"/> |
| <Script file="widgets\AceGUIWidget-Icon.lua"/> |
| </Ui> |
AceGUI-3.0/AceGUI-3.0.lua
5,7 → 5,7
| -- |
| -- **Note**: When using AceGUI-3.0 directly, please do not modify the frames of the widgets directly, |
| -- as any "unknown" change to the widgets will cause addons that get your widget out of the widget pool |
| -- to misbehave. If you think some part of a widget should be modifiable, please open a ticket, and we'll |
| -- to misbehave. If you think some part of a widget should be modifiable, please open a ticket, and we"ll |
| -- implement a proper API to modify it. |
| -- @usage |
| -- local AceGUI = LibStub("AceGUI-3.0") |
24,12 → 24,26
| -- f:AddChild(btn) |
| -- @class file |
| -- @name AceGUI-3.0 |
| -- @release $Id: AceGUI-3.0.lua 803 2009-04-14 12:37:54Z nevcairiel $ |
| local ACEGUI_MAJOR, ACEGUI_MINOR = "AceGUI-3.0", 23 |
| -- @release $Id: AceGUI-3.0.lua 924 2010-05-13 15:12:20Z nevcairiel $ |
| local ACEGUI_MAJOR, ACEGUI_MINOR = "AceGUI-3.0", 33 |
| local AceGUI, oldminor = LibStub:NewLibrary(ACEGUI_MAJOR, ACEGUI_MINOR) |
| if not AceGUI then return end -- No upgrade needed |
| -- Lua APIs |
| local tconcat, tremove, tinsert = table.concat, table.remove, table.insert |
| local select, pairs, next, type = select, pairs, next, type |
| local error, assert, loadstring = error, assert, loadstring |
| local setmetatable, rawget, rawset = setmetatable, rawget, rawset |
| local math_max = math.max |
| -- WoW APIs |
| local UIParent = UIParent |
| -- Global vars/functions that we don't upvalue since they might get hooked, or upgraded |
| -- List them here for Mikk's FindGlobals script |
| -- GLOBALS: geterrorhandler, LibStub |
| --local con = LibStub("AceConsole-3.0",true) |
| AceGUI.WidgetRegistry = AceGUI.WidgetRegistry or {} |
43,17 → 57,6
| local LayoutRegistry = AceGUI.LayoutRegistry |
| local WidgetVersions = AceGUI.WidgetVersions |
| local pcall = pcall |
| local select = select |
| local pairs = pairs |
| local ipairs = ipairs |
| local type = type |
| local assert = assert |
| local tinsert = tinsert |
| local tremove = tremove |
| local CreateFrame = CreateFrame |
| local UIParent = UIParent |
| --[[ |
| xpcall safecall implementation |
| ]] |
81,7 → 84,7
| local ARGS = {} |
| for i = 1, argCount do ARGS[i] = "arg"..i end |
| code = code:gsub("ARGS", table.concat(ARGS, ", ")) |
| code = code:gsub("ARGS", tconcat(ARGS, ", ")) |
| return assert(loadstring(code, "safecall Dispatcher["..argCount.."]"))(xpcall, errorhandler) |
| end |
95,43 → 98,62
| end |
| local function safecall(func, ...) |
| return Dispatchers[select('#', ...)](func, ...) |
| return Dispatchers[select("#", ...)](func, ...) |
| end |
| -- Recycling functions |
| local new, del |
| local newWidget, delWidget |
| do |
| -- Version Upgrade in Minor 29 |
| -- Internal Storage of the objects changed, from an array table |
| -- to a hash table, and additionally we introduced versioning on |
| -- the widgets which would discard all widgets from a pre-29 version |
| -- anyway, so we just clear the storage now, and don't try to |
| -- convert the storage tables to the new format. |
| -- This should generally not cause *many* widgets to end up in trash, |
| -- since once dialogs are opened, all addons should be loaded already |
| -- and AceGUI should be on the latest version available on the users |
| -- setup. |
| -- -- nevcairiel - Nov 2nd, 2009 |
| if oldminor and oldminor < 29 and AceGUI.objPools then |
| AceGUI.objPools = nil |
| end |
| AceGUI.objPools = AceGUI.objPools or {} |
| local objPools = AceGUI.objPools |
| --Returns a new instance, if none are available either returns a new table or calls the given contructor |
| function new(type,constructor,...) |
| if not type then |
| type = "table" |
| function newWidget(type) |
| if not WidgetRegistry[type] then |
| error("Attempt to instantiate unknown widget type", 2) |
| end |
| if not objPools[type] then |
| objPools[type] = {} |
| end |
| local newObj = tremove(objPools[type]) |
| local newObj = next(objPools[type]) |
| if not newObj then |
| newObj = constructor and constructor(...) or {} |
| newObj = WidgetRegistry[type]() |
| newObj.AceGUIWidgetVersion = WidgetVersions[type] |
| else |
| objPools[type][newObj] = nil |
| -- if the widget is older then the latest, don't even try to reuse it |
| -- just forget about it, and grab a new one. |
| if not newObj.AceGUIWidgetVersion or newObj.AceGUIWidgetVersion < WidgetVersions[type] then |
| return newWidget(type) |
| end |
| end |
| return newObj |
| end |
| -- Releases an instance to the Pool |
| function del(obj,type) |
| if not type then |
| type = "table" |
| end |
| function delWidget(obj,type) |
| if not objPools[type] then |
| objPools[type] = {} |
| end |
| for i,v in ipairs(objPools[type]) do |
| if v == obj then |
| error("Attempt to Release Widget that is already released") |
| return |
| end |
| if objPools[type][obj] then |
| error("Attempt to Release Widget that is already released", 2) |
| end |
| tinsert(objPools[type],obj) |
| objPools[type][obj] = true |
| end |
| end |
148,20 → 170,19
| -- @param type The type of the widget. |
| -- @return The newly created widget. |
| function AceGUI:Create(type) |
| local reg = WidgetRegistry |
| if reg[type] then |
| local widget = new(type,reg[type]) |
| if WidgetRegistry[type] then |
| local widget = newWidget(type) |
| if rawget(widget,'Acquire') then |
| if rawget(widget, "Acquire") then |
| widget.OnAcquire = widget.Acquire |
| widget.Acquire = nil |
| elseif rawget(widget,'Aquire') then |
| elseif rawget(widget, "Aquire") then |
| widget.OnAcquire = widget.Aquire |
| widget.Aquire = nil |
| end |
| if rawget(widget,'Release') then |
| widget.OnRelease = rawget(widget,'Release') |
| if rawget(widget, "Release") then |
| widget.OnRelease = rawget(widget, "Release") |
| widget.Release = nil |
| end |
170,8 → 191,8
| else |
| error(("Widget type %s doesn't supply an OnAcquire Function"):format(type)) |
| end |
| -- Set the default Layout ('List') |
| safecall(widget.SetLayout, widget, 'List') |
| -- Set the default Layout ("List") |
| safecall(widget.SetLayout, widget, "List") |
| safecall(widget.ResumeLayout, widget) |
| return widget |
| end |
183,14 → 204,14
| -- If this widget is a Container-Widget, all of its Child-Widgets will be releases as well. |
| -- @param widget The widget to release |
| function AceGUI:Release(widget) |
| safecall( widget.PauseLayout, widget ) |
| safecall(widget.PauseLayout, widget) |
| widget:Fire("OnRelease") |
| safecall( widget.ReleaseChildren, widget ) |
| safecall(widget.ReleaseChildren, widget) |
| if widget.OnRelease then |
| widget:OnRelease() |
| else |
| error(("Widget type %s doesn't supply an OnRelease Function"):format(type)) |
| -- else |
| -- error(("Widget type %s doesn't supply an OnRelease Function"):format(widget.type)) |
| end |
| for k in pairs(widget.userdata) do |
| widget.userdata[k] = nil |
205,14 → 226,14
| widget.noAutoHeight = nil |
| widget.frame:ClearAllPoints() |
| widget.frame:Hide() |
| widget.frame:SetParent(nil) |
| widget.frame:SetParent(UIParent) |
| widget.frame.width = nil |
| widget.frame.height = nil |
| if widget.content then |
| widget.content.width = nil |
| widget.content.height = nil |
| end |
| del(widget,widget.type) |
| delWidget(widget, widget.type) |
| end |
| ----------- |
246,7 → 267,6
| --[[ |
| Widgets must provide the following functions |
| OnAcquire() - Called when the object is acquired, should set everything to a default hidden state |
| OnRelease() - Called when the object is Released, should remove any anchors and hide the Widget |
| And the following members |
| frame - the frame or derivitive object that will be treated as the widget for size and anchoring purposes |
260,11 → 280,12
| content - frame or derivitive that children will be anchored to |
| The Widget can supply the following Optional Members |
| :OnRelease() - Called when the object is Released, should remove any additional anchors and clear any data |
| :OnWidthSet(width) - Called when the width of the widget is changed |
| :OnHeightSet(height) - Called when the height of the widget is changed |
| Widgets should not use the OnSizeChanged events of thier frame or content members, use these methods instead |
| AceGUI already sets a handler to the event |
| :OnLayoutFinished(width, height) - called after a layout has finished, the width and height will be the width and height of the |
| :LayoutFinished(width, height) - called after a layout has finished, the width and height will be the width and height of the |
| area used for controls. These can be nil if the layout used the existing size to layout the controls. |
| ]] |
273,17 → 294,6
| -- Widget Base Template -- |
| -------------------------- |
| do |
| local function fixlevels(parent,...) |
| local i = 1 |
| local child = select(i, ...) |
| while child do |
| child:SetFrameLevel(parent:GetFrameLevel()+1) |
| fixlevels(child, child:GetChildren()) |
| i = i + 1 |
| child = select(i, ...) |
| end |
| end |
| local WidgetBase = AceGUI.WidgetBase |
| WidgetBase.SetParent = function(self, parent) |
291,7 → 301,6
| frame:SetParent(nil) |
| frame:SetParent(parent.content) |
| self.parent = parent |
| --fixlevels(parent.frame,parent.frame:GetChildren()) |
| end |
| WidgetBase.SetCallback = function(self, name, func) |
424,7 → 433,7
| if self.LayoutPaused then |
| return |
| end |
| safecall(self.LayoutFunc,self.content, self.children) |
| safecall(self.LayoutFunc, self.content, self.children) |
| end |
| --call this function to layout, makes sure layed out objects get a frame to get sizes etc |
465,7 → 474,7
| WidgetContainerBase.ReleaseChildren = function(self) |
| local children = self.children |
| for i in ipairs(children) do |
| for i = 1,#children do |
| AceGUI:Release(children[i]) |
| children[i] = nil |
| end |
503,7 → 512,7
| end |
| end |
| setmetatable(WidgetContainerBase,{__index=WidgetBase}) |
| setmetatable(WidgetContainerBase, {__index=WidgetBase}) |
| --One of these function should be called on each Widget Instance as part of its creation process |
516,10 → 525,11
| widget.base = WidgetContainerBase |
| widget.content.obj = widget |
| widget.frame.obj = widget |
| widget.content:SetScript("OnSizeChanged",ContentResize) |
| widget.frame:SetScript("OnSizeChanged",FrameResize) |
| setmetatable(widget,{__index=WidgetContainerBase}) |
| widget.content:SetScript("OnSizeChanged", ContentResize) |
| widget.frame:SetScript("OnSizeChanged", FrameResize) |
| setmetatable(widget, {__index = WidgetContainerBase}) |
| widget:SetLayout("List") |
| return widget |
| end |
| --- Register a widget-class as a widget. |
529,8 → 539,9
| widget.events = {} |
| widget.base = WidgetBase |
| widget.frame.obj = widget |
| widget.frame:SetScript("OnSizeChanged",FrameResize) |
| setmetatable(widget,{__index=WidgetBase}) |
| widget.frame:SetScript("OnSizeChanged", FrameResize) |
| setmetatable(widget, {__index = WidgetBase}) |
| return widget |
| end |
| end |
590,50 → 601,19
| return self.counts[type] |
| end |
| --[[ Widget Template |
| --- Return the number of created widgets for this type. |
| -- In contrast to GetNextWidgetNum, the number is not incremented. |
| -- @param type The widget type |
| function AceGUI:GetWidgetCount(type) |
| return self.counts[type] or 0 |
| end |
| -------------------------- |
| -- Widget Name -- |
| -------------------------- |
| do |
| local Type = "Type" |
| local function OnAcquire(self) |
| end |
| local function OnRelease(self) |
| self.frame:ClearAllPoints() |
| self.frame:Hide() |
| end |
| local function Constructor() |
| local frame = CreateFrame("Frame",nil,UIParent) |
| local self = {} |
| self.type = Type |
| self.OnRelease = OnRelease |
| self.OnAcquire = OnAcquire |
| self.frame = frame |
| frame.obj = self |
| --Container Support |
| --local content = CreateFrame("Frame",nil,frame) |
| --self.content = content |
| --AceGUI:RegisterAsContainer(self) |
| AceGUI:RegisterAsWidget(self) |
| return self |
| end |
| AceGUI:RegisterWidgetType(Type,Constructor) |
| --- Return the version of the currently registered widget type. |
| -- @param type The widget type |
| function AceGUI:GetWidgetVersion(type) |
| return WidgetVersions[type] |
| end |
| ]] |
| ------------- |
| -- Layouts -- |
| ------------- |
642,41 → 622,35
| A Layout is a func that takes 2 parameters |
| content - the frame that widgets will be placed inside |
| children - a table containing the widgets to layout |
| ]] |
| -- Very simple Layout, Children are stacked on top of each other down the left side |
| AceGUI:RegisterLayout("List", |
| function(content, children) |
| local height = 0 |
| local width = content.width or content:GetWidth() or 0 |
| for i, child in ipairs(children) do |
| function(content, children) |
| local height = 0 |
| local width = content.width or content:GetWidth() or 0 |
| for i = 1, #children do |
| local child = children[i] |
| local frame = child.frame |
| frame:ClearAllPoints() |
| frame:Show() |
| if i == 1 then |
| frame:SetPoint("TOPLEFT",content,"TOPLEFT",0,0) |
| frame:SetPoint("TOPLEFT", content) |
| else |
| frame:SetPoint("TOPLEFT",children[i-1].frame,"BOTTOMLEFT",0,0) |
| frame:SetPoint("TOPLEFT", children[i-1].frame, "BOTTOMLEFT") |
| end |
| if child.width == "fill" then |
| child:SetWidth(width) |
| frame:SetPoint("RIGHT",content,"RIGHT") |
| if child.OnWidthSet then |
| child:OnWidthSet(content.width or content:GetWidth()) |
| end |
| frame:SetPoint("RIGHT", content) |
| if child.DoLayout then |
| child:DoLayout() |
| end |
| elseif child.width == "relative" then |
| child:SetWidth(width * child.relWidth) |
| if child.OnWidthSet then |
| child:OnWidthSet(content.width or content:GetWidth()) |
| end |
| if child.DoLayout then |
| child:DoLayout() |
| end |
684,51 → 658,55
| height = height + (frame.height or frame:GetHeight() or 0) |
| end |
| safecall( content.obj.LayoutFinished, content.obj, nil, height ) |
| end |
| ) |
| safecall(content.obj.LayoutFinished, content.obj, nil, height) |
| end) |
| -- A single control fills the whole content area |
| AceGUI:RegisterLayout("Fill", |
| function(content, children) |
| function(content, children) |
| if children[1] then |
| children[1]:SetWidth(content:GetWidth() or 0) |
| children[1]:SetHeight(content:GetHeight() or 0) |
| children[1].frame:SetAllPoints(content) |
| children[1].frame:Show() |
| safecall( content.obj.LayoutFinished, content.obj, nil, children[1].frame:GetHeight() ) |
| safecall(content.obj.LayoutFinished, content.obj, nil, children[1].frame:GetHeight()) |
| end |
| end |
| ) |
| AceGUI:RegisterLayout("Flow", |
| function(content, children) |
| --used height so far |
| local height = 0 |
| --width used in the current row |
| local usedwidth = 0 |
| --height of the current row |
| local rowheight = 0 |
| local rowoffset = 0 |
| local lastrowoffset |
| end) |
| local width = content.width or content:GetWidth() or 0 |
| --control at the start of the row |
| local rowstart |
| AceGUI:RegisterLayout("Flow", |
| function(content, children) |
| --used height so far |
| local height = 0 |
| --width used in the current row |
| local usedwidth = 0 |
| --height of the current row |
| local rowheight = 0 |
| local rowoffset = 0 |
| local lastrowoffset |
| local width = content.width or content:GetWidth() or 0 |
| --control at the start of the row |
| local rowstart |
| local rowstartoffset |
| local lastrowstart |
| local isfullheight |
| local frameoffset |
| local lastframeoffset |
| local oversize |
| for i, child in ipairs(children) do |
| local lastrowstart |
| local isfullheight |
| local frameoffset |
| local lastframeoffset |
| local oversize |
| for i = 1, #children do |
| local child = children[i] |
| oversize = nil |
| local frame = child.frame |
| local frameheight = frame.height or frame:GetHeight() or 0 |
| local framewidth = frame.width or frame:GetWidth() or 0 |
| lastframeoffset = frameoffset |
| -- HACK: Why did we set a frameoffset of (frameheight / 2) ? |
| -- That was moving all widgets half the widgets size down, is that intended? |
| -- Actually, it seems to be neccessary for many cases, we'll leave it in for now. |
| -- If widgets seem to anchor weirdly with this, provide a valid alignoffset for them. |
| -- TODO: Investigate moar! |
| frameoffset = child.alignoffset or (frameheight / 2) |
| if child.width == "relative" then |
739,7 → 717,7
| frame:ClearAllPoints() |
| if i == 1 then |
| -- anchor the first control to the top left |
| --frame:SetPoint("TOPLEFT",content,"TOPLEFT",0,0) |
| frame:SetPoint("TOPLEFT", content) |
| rowheight = frameheight |
| rowoffset = frameoffset |
| rowstart = frame |
752,8 → 730,13
| -- if there isn't available width for the control start a new row |
| -- if a control is "fill" it will be on a row of its own full width |
| if usedwidth == 0 or ((framewidth) + usedwidth > width) or child.width == "fill" then |
| if isfullheight then |
| -- a previous row has already filled the entire height, there's nothing we can usefully do anymore |
| -- (maybe error/warn about this?) |
| break |
| end |
| --anchor the previous row, we will now know its height and offset |
| rowstart:SetPoint("TOPLEFT",content,"TOPLEFT",0,-(height+(rowoffset-rowstartoffset)+3)) |
| rowstart:SetPoint("TOPLEFT", content, "TOPLEFT", 0, -(height + (rowoffset - rowstartoffset) + 3)) |
| height = height + rowheight + 3 |
| --save this as the rowstart so we can anchor it after the row is complete and we have the max height and offset of controls in it |
| rowstart = frame |
770,25 → 753,22
| --math.max(rowheight-rowoffset+frameoffset, frameheight-frameoffset+rowoffset) |
| --offset is always the larger of the two offsets |
| rowoffset = math.max(rowoffset, frameoffset) |
| rowoffset = math_max(rowoffset, frameoffset) |
| rowheight = math_max(rowheight, rowoffset + (frameheight / 2)) |
| rowheight = math.max(rowheight,rowoffset+(frameheight/2)) |
| frame:SetPoint("TOPLEFT",children[i-1].frame,"TOPRIGHT",0,frameoffset-lastframeoffset) |
| frame:SetPoint("TOPLEFT", children[i-1].frame, "TOPRIGHT", 0, frameoffset - lastframeoffset) |
| usedwidth = framewidth + usedwidth |
| end |
| end |
| if child.width == "fill" then |
| child:SetWidth(width) |
| frame:SetPoint("RIGHT",content,"RIGHT",0,0) |
| frame:SetPoint("RIGHT", content) |
| usedwidth = 0 |
| rowstart = frame |
| rowstartoffset = frameoffset |
| if child.OnWidthSet then |
| child:OnWidthSet(width) |
| end |
| if child.DoLayout then |
| child:DoLayout() |
| end |
798,34 → 778,28
| elseif child.width == "relative" then |
| child:SetWidth(width * child.relWidth) |
| if child.OnWidthSet then |
| child:OnWidthSet(width) |
| end |
| if child.DoLayout then |
| child:DoLayout() |
| end |
| elseif oversize then |
| if width > 1 then |
| frame:SetPoint("RIGHT",content,"RIGHT",0,0) |
| frame:SetPoint("RIGHT", content) |
| end |
| end |
| if child.height == "fill" then |
| frame:SetPoint("BOTTOM",content,"BOTTOM") |
| frame:SetPoint("BOTTOM", content) |
| isfullheight = true |
| break |
| end |
| end |
| --anchor the last row, if its full height needs a special case since its height has just been changed by the anchor |
| if isfullheight then |
| rowstart:SetPoint("TOPLEFT",content,"TOPLEFT",0,-height) |
| rowstart:SetPoint("TOPLEFT", content, "TOPLEFT", 0, -height) |
| elseif rowstart then |
| rowstart:SetPoint("TOPLEFT",content,"TOPLEFT",0,-(height+(rowoffset-rowstartoffset)+3)) |
| rowstart:SetPoint("TOPLEFT", content, "TOPLEFT", 0, -(height + (rowoffset - rowstartoffset) + 3)) |
| end |
| height = height + rowheight + 3 |
| safecall( content.obj.LayoutFinished, content.obj, nil, height ) |
| end |
| ) |
| safecall(content.obj.LayoutFinished, content.obj, nil, height) |
| end) |
AceGUI-3.0/widgets/AceGUIWidget-BlizOptionsGroup.lua
File deleted
AceGUI-3.0/widgets/AceGUIWidget-Frame.lua
File deleted
AceGUI-3.0/widgets/AceGUIWidget-InlineGroup.lua
File deleted
AceGUI-3.0/widgets/AceGUIWidget-SimpleGroup.lua
File deleted
AceGUI-3.0/widgets/AceGUIWidget-ScrollFrame.lua
File deleted
AceGUI-3.0/widgets/AceGUIWidget-DropDownGroup.lua
File deleted
AceGUI-3.0/widgets/AceGUIWidget-TreeGroup.lua
File deleted
AceGUI-3.0/widgets/AceGUIWidget-TabGroup.lua
File deleted
AceGUI-3.0/widgets/AceGUIContainer-SimpleGroup.lua
New file
0,0 → 1,69
| --[[----------------------------------------------------------------------------- |
| SimpleGroup Container |
| Simple container widget that just groups widgets. |
| -------------------------------------------------------------------------------]] |
| local Type, Version = "SimpleGroup", 20 |
| local AceGUI = LibStub and LibStub("AceGUI-3.0", true) |
| if not AceGUI or (AceGUI:GetWidgetVersion(Type) or 0) >= Version then return end |
| -- Lua APIs |
| local pairs = pairs |
| -- WoW APIs |
| local CreateFrame, UIParent = CreateFrame, UIParent |
| --[[----------------------------------------------------------------------------- |
| Methods |
| -------------------------------------------------------------------------------]] |
| local methods = { |
| ["OnAcquire"] = function(self) |
| self:SetWidth(300) |
| self:SetHeight(100) |
| end, |
| -- ["OnRelease"] = nil, |
| ["LayoutFinished"] = function(self, width, height) |
| if self.noAutoHeight then return end |
| self:SetHeight(height or 0) |
| end, |
| ["OnWidthSet"] = function(self, width) |
| local content = self.content |
| content:SetWidth(width) |
| content.width = width |
| end, |
| ["OnHeightSet"] = function(self, height) |
| local content = self.content |
| content:SetHeight(height) |
| content.height = height |
| end |
| } |
| --[[----------------------------------------------------------------------------- |
| Constructor |
| -------------------------------------------------------------------------------]] |
| local function Constructor() |
| local frame = CreateFrame("Frame", nil, UIParent) |
| frame:SetFrameStrata("FULLSCREEN_DIALOG") |
| --Container Support |
| local content = CreateFrame("Frame", nil, frame) |
| content:SetPoint("TOPLEFT") |
| content:SetPoint("BOTTOMRIGHT") |
| local widget = { |
| frame = frame, |
| content = content, |
| type = Type |
| } |
| for method, func in pairs(methods) do |
| widget[method] = func |
| end |
| return AceGUI:RegisterAsContainer(widget) |
| end |
| AceGUI:RegisterWidgetType(Type, Constructor, Version) |
AceGUI-3.0/widgets/AceGUIContainer-Window.lua
New file
0,0 → 1,331
| local AceGUI = LibStub("AceGUI-3.0") |
| -- Lua APIs |
| local pairs, assert, type = pairs, assert, type |
| -- WoW APIs |
| local PlaySound = PlaySound |
| local CreateFrame, UIParent = CreateFrame, UIParent |
| -- Global vars/functions that we don't upvalue since they might get hooked, or upgraded |
| -- List them here for Mikk's FindGlobals script |
| -- GLOBALS: GameFontNormal |
| ---------------- |
| -- Main Frame -- |
| ---------------- |
| --[[ |
| Events : |
| OnClose |
| ]] |
| do |
| local Type = "Window" |
| local Version = 4 |
| local function frameOnClose(this) |
| this.obj:Fire("OnClose") |
| end |
| local function closeOnClick(this) |
| PlaySound("gsTitleOptionExit") |
| this.obj:Hide() |
| end |
| local function frameOnMouseDown(this) |
| AceGUI:ClearFocus() |
| end |
| local function titleOnMouseDown(this) |
| this:GetParent():StartMoving() |
| AceGUI:ClearFocus() |
| end |
| local function frameOnMouseUp(this) |
| local frame = this:GetParent() |
| frame:StopMovingOrSizing() |
| local self = frame.obj |
| local status = self.status or self.localstatus |
| status.width = frame:GetWidth() |
| status.height = frame:GetHeight() |
| status.top = frame:GetTop() |
| status.left = frame:GetLeft() |
| end |
| local function sizerseOnMouseDown(this) |
| this:GetParent():StartSizing("BOTTOMRIGHT") |
| AceGUI:ClearFocus() |
| end |
| local function sizersOnMouseDown(this) |
| this:GetParent():StartSizing("BOTTOM") |
| AceGUI:ClearFocus() |
| end |
| local function sizereOnMouseDown(this) |
| this:GetParent():StartSizing("RIGHT") |
| AceGUI:ClearFocus() |
| end |
| local function sizerOnMouseUp(this) |
| this:GetParent():StopMovingOrSizing() |
| end |
| local function SetTitle(self,title) |
| self.titletext:SetText(title) |
| end |
| local function SetStatusText(self,text) |
| -- self.statustext:SetText(text) |
| end |
| local function Hide(self) |
| self.frame:Hide() |
| end |
| local function Show(self) |
| self.frame:Show() |
| end |
| local function OnAcquire(self) |
| self.frame:SetParent(UIParent) |
| self.frame:SetFrameStrata("FULLSCREEN_DIALOG") |
| self:ApplyStatus() |
| self:EnableResize(true) |
| self:Show() |
| end |
| local function OnRelease(self) |
| self.status = nil |
| for k in pairs(self.localstatus) do |
| self.localstatus[k] = nil |
| end |
| end |
| -- called to set an external table to store status in |
| local function SetStatusTable(self, status) |
| assert(type(status) == "table") |
| self.status = status |
| self:ApplyStatus() |
| end |
| local function ApplyStatus(self) |
| local status = self.status or self.localstatus |
| local frame = self.frame |
| self:SetWidth(status.width or 700) |
| self:SetHeight(status.height or 500) |
| if status.top and status.left then |
| frame:SetPoint("TOP",UIParent,"BOTTOM",0,status.top) |
| frame:SetPoint("LEFT",UIParent,"LEFT",status.left,0) |
| else |
| frame:SetPoint("CENTER",UIParent,"CENTER") |
| end |
| end |
| local function OnWidthSet(self, width) |
| local content = self.content |
| local contentwidth = width - 34 |
| if contentwidth < 0 then |
| contentwidth = 0 |
| end |
| content:SetWidth(contentwidth) |
| content.width = contentwidth |
| end |
| local function OnHeightSet(self, height) |
| local content = self.content |
| local contentheight = height - 57 |
| if contentheight < 0 then |
| contentheight = 0 |
| end |
| content:SetHeight(contentheight) |
| content.height = contentheight |
| end |
| local function EnableResize(self, state) |
| local func = state and "Show" or "Hide" |
| self.sizer_se[func](self.sizer_se) |
| self.sizer_s[func](self.sizer_s) |
| self.sizer_e[func](self.sizer_e) |
| end |
| local function Constructor() |
| local frame = CreateFrame("Frame",nil,UIParent) |
| local self = {} |
| self.type = "Window" |
| self.Hide = Hide |
| self.Show = Show |
| self.SetTitle = SetTitle |
| self.OnRelease = OnRelease |
| self.OnAcquire = OnAcquire |
| self.SetStatusText = SetStatusText |
| self.SetStatusTable = SetStatusTable |
| self.ApplyStatus = ApplyStatus |
| self.OnWidthSet = OnWidthSet |
| self.OnHeightSet = OnHeightSet |
| self.EnableResize = EnableResize |
| self.localstatus = {} |
| self.frame = frame |
| frame.obj = self |
| frame:SetWidth(700) |
| frame:SetHeight(500) |
| frame:SetPoint("CENTER",UIParent,"CENTER",0,0) |
| frame:EnableMouse() |
| frame:SetMovable(true) |
| frame:SetResizable(true) |
| frame:SetFrameStrata("FULLSCREEN_DIALOG") |
| frame:SetScript("OnMouseDown", frameOnMouseDown) |
| frame:SetScript("OnHide",frameOnClose) |
| frame:SetMinResize(240,240) |
| frame:SetToplevel(true) |
| local titlebg = frame:CreateTexture(nil, "BACKGROUND") |
| titlebg:SetTexture([[Interface\PaperDollInfoFrame\UI-GearManager-Title-Background]]) |
| titlebg:SetPoint("TOPLEFT", 9, -6) |
| titlebg:SetPoint("BOTTOMRIGHT", frame, "TOPRIGHT", -28, -24) |
| local dialogbg = frame:CreateTexture(nil, "BACKGROUND") |
| dialogbg:SetTexture([[Interface\Tooltips\UI-Tooltip-Background]]) |
| dialogbg:SetPoint("TOPLEFT", 8, -24) |
| dialogbg:SetPoint("BOTTOMRIGHT", -6, 8) |
| dialogbg:SetVertexColor(0, 0, 0, .75) |
| local topleft = frame:CreateTexture(nil, "BORDER") |
| topleft:SetTexture([[Interface\PaperDollInfoFrame\UI-GearManager-Border]]) |
| topleft:SetWidth(64) |
| topleft:SetHeight(64) |
| topleft:SetPoint("TOPLEFT") |
| topleft:SetTexCoord(0.501953125, 0.625, 0, 1) |
| local topright = frame:CreateTexture(nil, "BORDER") |
| topright:SetTexture([[Interface\PaperDollInfoFrame\UI-GearManager-Border]]) |
| topright:SetWidth(64) |
| topright:SetHeight(64) |
| topright:SetPoint("TOPRIGHT") |
| topright:SetTexCoord(0.625, 0.75, 0, 1) |
| local top = frame:CreateTexture(nil, "BORDER") |
| top:SetTexture([[Interface\PaperDollInfoFrame\UI-GearManager-Border]]) |
| top:SetHeight(64) |
| top:SetPoint("TOPLEFT", topleft, "TOPRIGHT") |
| top:SetPoint("TOPRIGHT", topright, "TOPLEFT") |
| top:SetTexCoord(0.25, 0.369140625, 0, 1) |
| local bottomleft = frame:CreateTexture(nil, "BORDER") |
| bottomleft:SetTexture([[Interface\PaperDollInfoFrame\UI-GearManager-Border]]) |
| bottomleft:SetWidth(64) |
| bottomleft:SetHeight(64) |
| bottomleft:SetPoint("BOTTOMLEFT") |
| bottomleft:SetTexCoord(0.751953125, 0.875, 0, 1) |
| local bottomright = frame:CreateTexture(nil, "BORDER") |
| bottomright:SetTexture([[Interface\PaperDollInfoFrame\UI-GearManager-Border]]) |
| bottomright:SetWidth(64) |
| bottomright:SetHeight(64) |
| bottomright:SetPoint("BOTTOMRIGHT") |
| bottomright:SetTexCoord(0.875, 1, 0, 1) |
| local bottom = frame:CreateTexture(nil, "BORDER") |
| bottom:SetTexture([[Interface\PaperDollInfoFrame\UI-GearManager-Border]]) |
| bottom:SetHeight(64) |
| bottom:SetPoint("BOTTOMLEFT", bottomleft, "BOTTOMRIGHT") |
| bottom:SetPoint("BOTTOMRIGHT", bottomright, "BOTTOMLEFT") |
| bottom:SetTexCoord(0.376953125, 0.498046875, 0, 1) |
| local left = frame:CreateTexture(nil, "BORDER") |
| left:SetTexture([[Interface\PaperDollInfoFrame\UI-GearManager-Border]]) |
| left:SetWidth(64) |
| left:SetPoint("TOPLEFT", topleft, "BOTTOMLEFT") |
| left:SetPoint("BOTTOMLEFT", bottomleft, "TOPLEFT") |
| left:SetTexCoord(0.001953125, 0.125, 0, 1) |
| local right = frame:CreateTexture(nil, "BORDER") |
| right:SetTexture([[Interface\PaperDollInfoFrame\UI-GearManager-Border]]) |
| right:SetWidth(64) |
| right:SetPoint("TOPRIGHT", topright, "BOTTOMRIGHT") |
| right:SetPoint("BOTTOMRIGHT", bottomright, "TOPRIGHT") |
| right:SetTexCoord(0.1171875, 0.2421875, 0, 1) |
| local close = CreateFrame("Button", nil, frame, "UIPanelCloseButton") |
| close:SetPoint("TOPRIGHT", 2, 1) |
| close:SetScript("OnClick", closeOnClick) |
| self.closebutton = close |
| close.obj = self |
| local titletext = frame:CreateFontString(nil, "ARTWORK") |
| titletext:SetFontObject(GameFontNormal) |
| titletext:SetPoint("TOPLEFT", 12, -8) |
| titletext:SetPoint("TOPRIGHT", -32, -8) |
| self.titletext = titletext |
| local title = CreateFrame("Button", nil, frame) |
| title:SetPoint("TOPLEFT", titlebg) |
| title:SetPoint("BOTTOMRIGHT", titlebg) |
| title:EnableMouse() |
| title:SetScript("OnMouseDown",titleOnMouseDown) |
| title:SetScript("OnMouseUp", frameOnMouseUp) |
| self.title = title |
| local sizer_se = CreateFrame("Frame",nil,frame) |
| sizer_se:SetPoint("BOTTOMRIGHT",frame,"BOTTOMRIGHT",0,0) |
| sizer_se:SetWidth(25) |
| sizer_se:SetHeight(25) |
| sizer_se:EnableMouse() |
| sizer_se:SetScript("OnMouseDown",sizerseOnMouseDown) |
| sizer_se:SetScript("OnMouseUp", sizerOnMouseUp) |
| self.sizer_se = sizer_se |
| local line1 = sizer_se:CreateTexture(nil, "BACKGROUND") |
| self.line1 = line1 |
| line1:SetWidth(14) |
| line1:SetHeight(14) |
| line1:SetPoint("BOTTOMRIGHT", -8, 8) |
| line1:SetTexture("Interface\\Tooltips\\UI-Tooltip-Border") |
| local x = 0.1 * 14/17 |
| line1:SetTexCoord(0.05 - x, 0.5, 0.05, 0.5 + x, 0.05, 0.5 - x, 0.5 + x, 0.5) |
| local line2 = sizer_se:CreateTexture(nil, "BACKGROUND") |
| self.line2 = line2 |
| line2:SetWidth(8) |
| line2:SetHeight(8) |
| line2:SetPoint("BOTTOMRIGHT", -8, 8) |
| line2:SetTexture("Interface\\Tooltips\\UI-Tooltip-Border") |
| local x = 0.1 * 8/17 |
| line2:SetTexCoord(0.05 - x, 0.5, 0.05, 0.5 + x, 0.05, 0.5 - x, 0.5 + x, 0.5) |
| local sizer_s = CreateFrame("Frame",nil,frame) |
| sizer_s:SetPoint("BOTTOMRIGHT",frame,"BOTTOMRIGHT",-25,0) |
| sizer_s:SetPoint("BOTTOMLEFT",frame,"BOTTOMLEFT",0,0) |
| sizer_s:SetHeight(25) |
| sizer_s:EnableMouse() |
| sizer_s:SetScript("OnMouseDown",sizersOnMouseDown) |
| sizer_s:SetScript("OnMouseUp", sizerOnMouseUp) |
| self.sizer_s = sizer_s |
| local sizer_e = CreateFrame("Frame",nil,frame) |
| sizer_e:SetPoint("BOTTOMRIGHT",frame,"BOTTOMRIGHT",0,25) |
| sizer_e:SetPoint("TOPRIGHT",frame,"TOPRIGHT",0,0) |
| sizer_e:SetWidth(25) |
| sizer_e:EnableMouse() |
| sizer_e:SetScript("OnMouseDown",sizereOnMouseDown) |
| sizer_e:SetScript("OnMouseUp", sizerOnMouseUp) |
| self.sizer_e = sizer_e |
| --Container Support |
| local content = CreateFrame("Frame",nil,frame) |
| self.content = content |
| content.obj = self |
| content:SetPoint("TOPLEFT",frame,"TOPLEFT",12,-32) |
| content:SetPoint("BOTTOMRIGHT",frame,"BOTTOMRIGHT",-12,13) |
| AceGUI:RegisterAsContainer(self) |
| return self |
| end |
| AceGUI:RegisterWidgetType(Type,Constructor,Version) |
| end |
AceGUI-3.0/widgets/AceGUIContainer-ScrollFrame.lua
New file
0,0 → 1,204
| --[[----------------------------------------------------------------------------- |
| ScrollFrame Container |
| Plain container that scrolls its content and doesn't grow in height. |
| -------------------------------------------------------------------------------]] |
| local Type, Version = "ScrollFrame", 20 |
| local AceGUI = LibStub and LibStub("AceGUI-3.0", true) |
| if not AceGUI or (AceGUI:GetWidgetVersion(Type) or 0) >= Version then return end |
| -- Lua APIs |
| local pairs, assert, type = pairs, assert, type |
| local min, max, floor = math.min, math.max, math.floor |
| -- WoW APIs |
| local CreateFrame, UIParent = CreateFrame, UIParent |
| --[[----------------------------------------------------------------------------- |
| Support functions |
| -------------------------------------------------------------------------------]] |
| local function FixScrollOnUpdate(frame) |
| frame:SetScript("OnUpdate", nil) |
| frame.obj:FixScroll() |
| end |
| --[[----------------------------------------------------------------------------- |
| Scripts |
| -------------------------------------------------------------------------------]] |
| local function ScrollFrame_OnMouseWheel(frame, value) |
| frame.obj:MoveScroll(value) |
| end |
| local function ScrollFrame_OnSizeChanged(frame) |
| frame:SetScript("OnUpdate", FixScrollOnUpdate) |
| end |
| local function ScrollBar_OnScrollValueChanged(frame, value) |
| frame.obj:SetScroll(value) |
| end |
| --[[----------------------------------------------------------------------------- |
| Methods |
| -------------------------------------------------------------------------------]] |
| local methods = { |
| ["OnAcquire"] = function(self) |
| self:SetScroll(0) |
| end, |
| ["OnRelease"] = function(self) |
| self.status = nil |
| for k in pairs(self.localstatus) do |
| self.localstatus[k] = nil |
| end |
| self.scrollframe:SetPoint("BOTTOMRIGHT") |
| self.scrollbar:Hide() |
| self.scrollBarShown = nil |
| self.content.height, self.content.width = nil, nil |
| end, |
| ["SetScroll"] = function(self, value) |
| local status = self.status or self.localstatus |
| local viewheight = self.scrollframe:GetHeight() |
| local height = self.content:GetHeight() |
| local offset |
| if viewheight > height then |
| offset = 0 |
| else |
| offset = floor((height - viewheight) / 1000.0 * value) |
| end |
| self.content:ClearAllPoints() |
| self.content:SetPoint("TOPLEFT", 0, offset) |
| self.content:SetPoint("TOPRIGHT", 0, offset) |
| status.offset = offset |
| status.scrollvalue = value |
| end, |
| ["MoveScroll"] = function(self, value) |
| local status = self.status or self.localstatus |
| local height, viewheight = self.scrollframe:GetHeight(), self.content:GetHeight() |
| if height > viewheight then |
| self.scrollbar:Hide() |
| else |
| self.scrollbar:Show() |
| local diff = height - viewheight |
| local delta = 1 |
| if value < 0 then |
| delta = -1 |
| end |
| self.scrollbar:SetValue(min(max(status.scrollvalue + delta*(1000/(diff/45)),0), 1000)) |
| end |
| end, |
| ["FixScroll"] = function(self) |
| if self.updateLock then return end |
| self.updateLock = true |
| local status = self.status or self.localstatus |
| local height, viewheight = self.scrollframe:GetHeight(), self.content:GetHeight() |
| local offset = status.offset or 0 |
| local curvalue = self.scrollbar:GetValue() |
| if viewheight < height then |
| if self.scrollBarShown then |
| self.scrollBarShown = nil |
| self.scrollbar:Hide() |
| self.scrollbar:SetValue(0) |
| self.scrollframe:SetPoint("BOTTOMRIGHT") |
| self:DoLayout() |
| end |
| else |
| if not self.scrollBarShown then |
| self.scrollBarShown = true |
| self.scrollbar:Show() |
| self.scrollframe:SetPoint("BOTTOMRIGHT", -20, 0) |
| self:DoLayout() |
| end |
| local value = (offset / (viewheight - height) * 1000) |
| if value > 1000 then value = 1000 end |
| self.scrollbar:SetValue(value) |
| self:SetScroll(value) |
| if value < 1000 then |
| self.content:ClearAllPoints() |
| self.content:SetPoint("TOPLEFT", 0, offset) |
| self.content:SetPoint("TOPRIGHT", 0, offset) |
| status.offset = offset |
| end |
| end |
| self.updateLock = nil |
| end, |
| ["LayoutFinished"] = function(self, width, height) |
| self.content:SetHeight(height or 0 + 20) |
| self.scrollframe:SetScript("OnUpdate", FixScrollOnUpdate) |
| end, |
| ["SetStatusTable"] = function(self, status) |
| assert(type(status) == "table") |
| self.status = status |
| if not status.scrollvalue then |
| status.scrollvalue = 0 |
| end |
| end, |
| ["OnWidthSet"] = function(self, width) |
| local content = self.content |
| content.width = width |
| end, |
| ["OnHeightSet"] = function(self, height) |
| local content = self.content |
| content.height = height |
| end |
| } |
| --[[----------------------------------------------------------------------------- |
| Constructor |
| -------------------------------------------------------------------------------]] |
| local function Constructor() |
| local frame = CreateFrame("Frame", nil, UIParent) |
| local num = AceGUI:GetNextWidgetNum(Type) |
| local scrollframe = CreateFrame("ScrollFrame", nil, frame) |
| scrollframe:SetPoint("TOPLEFT") |
| scrollframe:SetPoint("BOTTOMRIGHT") |
| scrollframe:EnableMouseWheel(true) |
| scrollframe:SetScript("OnMouseWheel", ScrollFrame_OnMouseWheel) |
| scrollframe:SetScript("OnSizeChanged", ScrollFrame_OnSizeChanged) |
| local scrollbar = CreateFrame("Slider", ("AceConfigDialogScrollFrame%dScrollBar"):format(num), scrollframe, "UIPanelScrollBarTemplate") |
| scrollbar:SetPoint("TOPLEFT", scrollframe, "TOPRIGHT", 4, -16) |
| scrollbar:SetPoint("BOTTOMLEFT", scrollframe, "BOTTOMRIGHT", 4, 16) |
| scrollbar:SetMinMaxValues(0, 1000) |
| scrollbar:SetValueStep(1) |
| scrollbar:SetValue(0) |
| scrollbar:SetWidth(16) |
| scrollbar:Hide() |
| -- set the script as the last step, so it doesn't fire yet |
| scrollbar:SetScript("OnValueChanged", ScrollBar_OnScrollValueChanged) |
| local scrollbg = scrollbar:CreateTexture(nil, "BACKGROUND") |
| scrollbg:SetAllPoints(scrollbar) |
| scrollbg:SetTexture(0, 0, 0, 0.4) |
| --Container Support |
| local content = CreateFrame("Frame", nil, scrollframe) |
| content:SetPoint("TOPLEFT") |
| content:SetPoint("TOPRIGHT") |
| content:SetHeight(400) |
| scrollframe:SetScrollChild(content) |
| local widget = { |
| localstatus = { scrollvalue = 0 }, |
| scrollframe = scrollframe, |
| scrollbar = scrollbar, |
| content = content, |
| frame = frame, |
| type = Type |
| } |
| for method, func in pairs(methods) do |
| widget[method] = func |
| end |
| scrollframe.obj, scrollbar.obj = widget, widget |
| return AceGUI:RegisterAsContainer(widget) |
| end |
| AceGUI:RegisterWidgetType(Type, Constructor, Version) |
AceGUI-3.0/widgets/AceGUIContainer-DropDownGroup.lua
New file
0,0 → 1,157
| --[[----------------------------------------------------------------------------- |
| DropdownGroup Container |
| Container controlled by a dropdown on the top. |
| -------------------------------------------------------------------------------]] |
| local Type, Version = "DropdownGroup", 20 |
| local AceGUI = LibStub and LibStub("AceGUI-3.0", true) |
| if not AceGUI or (AceGUI:GetWidgetVersion(Type) or 0) >= Version then return end |
| -- Lua APIs |
| local assert, pairs, type = assert, pairs, type |
| -- WoW APIs |
| local CreateFrame = CreateFrame |
| --[[----------------------------------------------------------------------------- |
| Scripts |
| -------------------------------------------------------------------------------]] |
| local function SelectedGroup(self, event, value) |
| local group = self.parentgroup |
| local status = group.status or group.localstatus |
| status.selected = value |
| self.parentgroup:Fire("OnGroupSelected", value) |
| end |
| --[[----------------------------------------------------------------------------- |
| Methods |
| -------------------------------------------------------------------------------]] |
| local methods = { |
| ["OnAcquire"] = function(self) |
| self.dropdown:SetText("") |
| self:SetDropdownWidth(200) |
| self:SetTitle("") |
| end, |
| ["OnRelease"] = function(self) |
| self.dropdown.list = nil |
| self.status = nil |
| for k in pairs(self.localstatus) do |
| self.localstatus[k] = nil |
| end |
| end, |
| ["SetTitle"] = function(self, title) |
| self.titletext:SetText(title) |
| self.dropdown.frame:ClearAllPoints() |
| if title and title ~= "" then |
| self.dropdown.frame:SetPoint("TOPRIGHT", -2, 0) |
| else |
| self.dropdown.frame:SetPoint("TOPLEFT", -1, 0) |
| end |
| end, |
| ["SetGroupList"] = function(self,list) |
| self.dropdown:SetList(list) |
| end, |
| ["SetStatusTable"] = function(self, status) |
| assert(type(status) == "table") |
| self.status = status |
| end, |
| ["SetGroup"] = function(self,group) |
| self.dropdown:SetValue(group) |
| local status = self.status or self.localstatus |
| status.selected = group |
| self:Fire("OnGroupSelected", group) |
| end, |
| ["OnWidthSet"] = function(self, width) |
| local content = self.content |
| local contentwidth = width - 26 |
| if contentwidth < 0 then |
| contentwidth = 0 |
| end |
| content:SetWidth(contentwidth) |
| content.width = contentwidth |
| end, |
| ["OnHeightSet"] = function(self, height) |
| local content = self.content |
| local contentheight = height - 63 |
| if contentheight < 0 then |
| contentheight = 0 |
| end |
| content:SetHeight(contentheight) |
| content.height = contentheight |
| end, |
| ["LayoutFinished"] = function(self, width, height) |
| self:SetHeight((height or 0) + 63) |
| end, |
| ["SetDropdownWidth"] = function(self, width) |
| self.dropdown:SetWidth(width) |
| end |
| } |
| --[[----------------------------------------------------------------------------- |
| Constructor |
| -------------------------------------------------------------------------------]] |
| local PaneBackdrop = { |
| bgFile = "Interface\\ChatFrame\\ChatFrameBackground", |
| edgeFile = "Interface\\Tooltips\\UI-Tooltip-Border", |
| tile = true, tileSize = 16, edgeSize = 16, |
| insets = { left = 3, right = 3, top = 5, bottom = 3 } |
| } |
| local function Constructor() |
| local frame = CreateFrame("Frame") |
| frame:SetHeight(100) |
| frame:SetWidth(100) |
| frame:SetFrameStrata("FULLSCREEN_DIALOG") |
| local titletext = frame:CreateFontString(nil, "OVERLAY", "GameFontNormal") |
| titletext:SetPoint("TOPLEFT", 4, -5) |
| titletext:SetPoint("TOPRIGHT", -4, -5) |
| titletext:SetJustifyH("LEFT") |
| titletext:SetHeight(18) |
| local dropdown = AceGUI:Create("Dropdown") |
| dropdown.frame:SetParent(frame) |
| dropdown.frame:SetFrameLevel(dropdown.frame:GetFrameLevel() + 2) |
| dropdown:SetCallback("OnValueChanged", SelectedGroup) |
| dropdown.frame:SetPoint("TOPLEFT", -1, 0) |
| dropdown.frame:Show() |
| dropdown:SetLabel("") |
| local border = CreateFrame("Frame", nil, frame) |
| border:SetPoint("TOPLEFT", 0, -26) |
| border:SetPoint("BOTTOMRIGHT", 0, 3) |
| border:SetBackdrop(PaneBackdrop) |
| border:SetBackdropColor(0.1,0.1,0.1,0.5) |
| border:SetBackdropBorderColor(0.4,0.4,0.4) |
| --Container Support |
| local content = CreateFrame("Frame", nil, border) |
| content:SetPoint("TOPLEFT", 10, -10) |
| content:SetPoint("BOTTOMRIGHT", -10, 10) |
| local widget = { |
| frame = frame, |
| localstatus = {}, |
| titletext = titletext, |
| dropdown = dropdown, |
| border = border, |
| content = content, |
| type = Type |
| } |
| for method, func in pairs(methods) do |
| widget[method] = func |
| end |
| dropdown.parentgroup = widget |
| return AceGUI:RegisterAsContainer(widget) |
| end |
| AceGUI:RegisterWidgetType(Type, Constructor, Version) |
AceGUI-3.0/widgets/AceGUIContainer-TreeGroup.lua
New file
0,0 → 1,670
| --[[----------------------------------------------------------------------------- |
| TreeGroup Container |
| Container that uses a tree control to switch between groups. |
| -------------------------------------------------------------------------------]] |
| local Type, Version = "TreeGroup", 30 |
| local AceGUI = LibStub and LibStub("AceGUI-3.0", true) |
| if not AceGUI or (AceGUI:GetWidgetVersion(Type) or 0) >= Version then return end |
| -- Lua APIs |
| local next, pairs, ipairs, assert, type = next, pairs, ipairs, assert, type |
| local math_min, math_max, floor = math.min, math.max, floor |
| local select, tremove, unpack = select, table.remove, unpack |
| -- WoW APIs |
| local CreateFrame, UIParent = CreateFrame, UIParent |
| -- Global vars/functions that we don't upvalue since they might get hooked, or upgraded |
| -- List them here for Mikk's FindGlobals script |
| -- GLOBALS: GameTooltip, FONT_COLOR_CODE_CLOSE |
| -- Recycling functions |
| local new, del |
| do |
| local pool = setmetatable({},{__mode='k'}) |
| function new() |
| local t = next(pool) |
| if t then |
| pool[t] = nil |
| return t |
| else |
| return {} |
| end |
| end |
| function del(t) |
| for k in pairs(t) do |
| t[k] = nil |
| end |
| pool[t] = true |
| end |
| end |
| local DEFAULT_TREE_WIDTH = 175 |
| local DEFAULT_TREE_SIZABLE = true |
| --[[----------------------------------------------------------------------------- |
| Support functions |
| -------------------------------------------------------------------------------]] |
| local function GetButtonUniqueValue(line) |
| local parent = line.parent |
| if parent and parent.value then |
| return GetButtonUniqueValue(parent).."\001"..line.value |
| else |
| return line.value |
| end |
| end |
| local function UpdateButton(button, treeline, selected, canExpand, isExpanded) |
| local self = button.obj |
| local toggle = button.toggle |
| local frame = self.frame |
| local text = treeline.text or "" |
| local icon = treeline.icon |
| local iconCoords = treeline.iconCoords |
| local level = treeline.level |
| local value = treeline.value |
| local uniquevalue = treeline.uniquevalue |
| local disabled = treeline.disabled |
| button.treeline = treeline |
| button.value = value |
| button.uniquevalue = uniquevalue |
| if selected then |
| button:LockHighlight() |
| button.selected = true |
| else |
| button:UnlockHighlight() |
| button.selected = false |
| end |
| local normalTexture = button:GetNormalTexture() |
| local line = button.line |
| button.level = level |
| if ( level == 1 ) then |
| button:SetNormalFontObject("GameFontNormal") |
| button:SetHighlightFontObject("GameFontHighlight") |
| button.text:SetPoint("LEFT", (icon and 16 or 0) + 8, 2) |
| else |
| button:SetNormalFontObject("GameFontHighlightSmall") |
| button:SetHighlightFontObject("GameFontHighlightSmall") |
| button.text:SetPoint("LEFT", (icon and 16 or 0) + 8 * level, 2) |
| end |
| if disabled then |
| button:EnableMouse(false) |
| button.text:SetText("|cff808080"..text..FONT_COLOR_CODE_CLOSE) |
| else |
| button.text:SetText(text) |
| button:EnableMouse(true) |
| end |
| if icon then |
| button.icon:SetTexture(icon) |
| button.icon:SetPoint("LEFT", 8 * level, (level == 1) and 0 or 1) |
| else |
| button.icon:SetTexture(nil) |
| end |
| if iconCoords then |
| button.icon:SetTexCoord(unpack(iconCoords)) |
| else |
| button.icon:SetTexCoord(0, 1, 0, 1) |
| end |
| if canExpand then |
| if not isExpanded then |
| toggle:SetNormalTexture("Interface\\Buttons\\UI-PlusButton-UP") |
| toggle:SetPushedTexture("Interface\\Buttons\\UI-PlusButton-DOWN") |
| else |
| toggle:SetNormalTexture("Interface\\Buttons\\UI-MinusButton-UP") |
| toggle:SetPushedTexture("Interface\\Buttons\\UI-MinusButton-DOWN") |
| end |
| toggle:Show() |
| else |
| toggle:Hide() |
| end |
| end |
| local function ShouldDisplayLevel(tree) |
| local result = false |
| for k, v in ipairs(tree) do |
| if v.children == nil and v.visible ~= false then |
| result = true |
| elseif v.children then |
| result = result or ShouldDisplayLevel(v.children) |
| end |
| if result then return result end |
| end |
| return false |
| end |
| local function addLine(self, v, tree, level, parent) |
| local line = new() |
| line.value = v.value |
| line.text = v.text |
| line.icon = v.icon |
| line.iconCoords = v.iconCoords |
| line.disabled = v.disabled |
| line.tree = tree |
| line.level = level |
| line.parent = parent |
| line.visible = v.visible |
| line.uniquevalue = GetButtonUniqueValue(line) |
| if v.children then |
| line.hasChildren = true |
| else |
| line.hasChildren = nil |
| end |
| self.lines[#self.lines+1] = line |
| return line |
| end |
| --fire an update after one frame to catch the treeframes height |
| local function FirstFrameUpdate(frame) |
| local self = frame.obj |
| frame:SetScript("OnUpdate", nil) |
| self:RefreshTree() |
| end |
| local function BuildUniqueValue(...) |
| local n = select('#', ...) |
| if n == 1 then |
| return ... |
| else |
| return (...).."\001"..BuildUniqueValue(select(2,...)) |
| end |
| end |
| --[[----------------------------------------------------------------------------- |
| Scripts |
| -------------------------------------------------------------------------------]] |
| local function Expand_OnClick(frame) |
| local button = frame.button |
| local self = button.obj |
| local status = (self.status or self.localstatus).groups |
| status[button.uniquevalue] = not status[button.uniquevalue] |
| self:RefreshTree() |
| end |
| local function Button_OnClick(frame) |
| local self = frame.obj |
| self:Fire("OnClick", frame.uniquevalue, frame.selected) |
| if not frame.selected then |
| self:SetSelected(frame.uniquevalue) |
| frame.selected = true |
| frame:LockHighlight() |
| self:RefreshTree() |
| end |
| AceGUI:ClearFocus() |
| end |
| local function Button_OnDoubleClick(button) |
| local self = button.obj |
| local status = self.status or self.localstatus |
| local status = (self.status or self.localstatus).groups |
| status[button.uniquevalue] = not status[button.uniquevalue] |
| self:RefreshTree() |
| end |
| local function Button_OnEnter(frame) |
| local self = frame.obj |
| self:Fire("OnButtonEnter", frame.uniquevalue, frame) |
| if self.enabletooltips then |
| GameTooltip:SetOwner(frame, "ANCHOR_NONE") |
| GameTooltip:SetPoint("LEFT",frame,"RIGHT") |
| GameTooltip:SetText(frame.text:GetText() or "", 1, .82, 0, 1) |
| GameTooltip:Show() |
| end |
| end |
| local function Button_OnLeave(frame) |
| local self = frame.obj |
| self:Fire("OnButtonLeave", frame.uniquevalue, frame) |
| if self.enabletooltips then |
| GameTooltip:Hide() |
| end |
| end |
| local function OnScrollValueChanged(frame, value) |
| if frame.obj.noupdate then return end |
| local self = frame.obj |
| local status = self.status or self.localstatus |
| status.scrollvalue = value |
| self:RefreshTree() |
| AceGUI:ClearFocus() |
| end |
| local function Tree_OnSizeChanged(frame) |
| frame.obj:RefreshTree() |
| end |
| local function Tree_OnMouseWheel(frame, delta) |
| local self = frame.obj |
| if self.showscroll then |
| local scrollbar = self.scrollbar |
| local min, max = scrollbar:GetMinMaxValues() |
| local value = scrollbar:GetValue() |
| local newvalue = math_min(max,math_max(min,value - delta)) |
| if value ~= newvalue then |
| scrollbar:SetValue(newvalue) |
| end |
| end |
| end |
| local function Dragger_OnLeave(frame) |
| frame:SetBackdropColor(1, 1, 1, 0) |
| end |
| local function Dragger_OnEnter(frame) |
| frame:SetBackdropColor(1, 1, 1, 0.8) |
| end |
| local function Dragger_OnMouseDown(frame) |
| local treeframe = frame:GetParent() |
| treeframe:StartSizing("RIGHT") |
| end |
| local function Dragger_OnMouseUp(frame) |
| local treeframe = frame:GetParent() |
| local self = treeframe.obj |
| local frame = treeframe:GetParent() |
| treeframe:StopMovingOrSizing() |
| --treeframe:SetScript("OnUpdate", nil) |
| treeframe:SetUserPlaced(false) |
| --Without this :GetHeight will get stuck on the current height, causing the tree contents to not resize |
| treeframe:SetHeight(0) |
| treeframe:SetPoint("TOPLEFT", frame, "TOPLEFT",0,0) |
| treeframe:SetPoint("BOTTOMLEFT", frame, "BOTTOMLEFT",0,0) |
| local status = self.status or self.localstatus |
| status.treewidth = treeframe:GetWidth() |
| treeframe.obj:Fire("OnTreeResize",treeframe:GetWidth()) |
| -- recalculate the content width |
| treeframe.obj:OnWidthSet(status.fullwidth) |
| -- update the layout of the content |
| treeframe.obj:DoLayout() |
| end |
| --[[----------------------------------------------------------------------------- |
| Methods |
| -------------------------------------------------------------------------------]] |
| local methods = { |
| ["OnAcquire"] = function(self) |
| self:SetTreeWidth(DEFAULT_TREE_WIDTH, DEFAULT_TREE_SIZABLE) |
| self:EnableButtonTooltips(true) |
| end, |
| ["OnRelease"] = function(self) |
| self.status = nil |
| for k, v in pairs(self.localstatus) do |
| if k == "groups" then |
| for k2 in pairs(v) do |
| v[k2] = nil |
| end |
| else |
| self.localstatus[k] = nil |
| end |
| end |
| self.localstatus.scrollvalue = 0 |
| self.localstatus.treewidth = DEFAULT_TREE_WIDTH |
| self.localstatus.treesizable = DEFAULT_TREE_SIZABLE |
| end, |
| ["EnableButtonTooltips"] = function(self, enable) |
| self.enabletooltips = enable |
| end, |
| ["CreateButton"] = function(self) |
| local num = AceGUI:GetNextWidgetNum("TreeGroupButton") |
| local button = CreateFrame("Button", ("AceGUI30TreeButton%d"):format(num), self.treeframe, "OptionsListButtonTemplate") |
| button.obj = self |
| local icon = button:CreateTexture(nil, "OVERLAY") |
| icon:SetWidth(14) |
| icon:SetHeight(14) |
| button.icon = icon |
| button:SetScript("OnClick",Button_OnClick) |
| button:SetScript("OnDoubleClick", Button_OnDoubleClick) |
| button:SetScript("OnEnter",Button_OnEnter) |
| button:SetScript("OnLeave",Button_OnLeave) |
| button.toggle.button = button |
| button.toggle:SetScript("OnClick",Expand_OnClick) |
| return button |
| end, |
| ["SetStatusTable"] = function(self, status) |
| assert(type(status) == "table") |
| self.status = status |
| if not status.groups then |
| status.groups = {} |
| end |
| if not status.scrollvalue then |
| status.scrollvalue = 0 |
| end |
| if not status.treewidth then |
| status.treewidth = DEFAULT_TREE_WIDTH |
| end |
| if not status.treesizable then |
| status.treesizable = DEFAULT_TREE_SIZABLE |
| end |
| self:SetTreeWidth(status.treewidth,status.treesizable) |
| self:RefreshTree() |
| end, |
| --sets the tree to be displayed |
| ["SetTree"] = function(self, tree, filter) |
| self.filter = filter |
| if tree then |
| assert(type(tree) == "table") |
| end |
| self.tree = tree |
| self:RefreshTree() |
| end, |
| ["BuildLevel"] = function(self, tree, level, parent) |
| local groups = (self.status or self.localstatus).groups |
| local hasChildren = self.hasChildren |
| for i, v in ipairs(tree) do |
| if v.children then |
| if not self.filter or ShouldDisplayLevel(v.children) then |
| local line = addLine(self, v, tree, level, parent) |
| if groups[line.uniquevalue] then |
| self:BuildLevel(v.children, level+1, line) |
| end |
| end |
| elseif v.visible ~= false or not self.filter then |
| addLine(self, v, tree, level, parent) |
| end |
| end |
| end, |
| ["RefreshTree"] = function(self) |
| local buttons = self.buttons |
| local lines = self.lines |
| for i, v in ipairs(buttons) do |
| v:Hide() |
| end |
| while lines[1] do |
| local t = tremove(lines) |
| for k in pairs(t) do |
| t[k] = nil |
| end |
| del(t) |
| end |
| if not self.tree then return end |
| --Build the list of visible entries from the tree and status tables |
| local status = self.status or self.localstatus |
| local groupstatus = status.groups |
| local tree = self.tree |
| local treeframe = self.treeframe |
| self:BuildLevel(tree, 1) |
| local numlines = #lines |
| local maxlines = (floor(((self.treeframe:GetHeight()or 0) - 20 ) / 18)) |
| local first, last |
| if numlines <= maxlines then |
| --the whole tree fits in the frame |
| status.scrollvalue = 0 |
| self:ShowScroll(false) |
| first, last = 1, numlines |
| else |
| self:ShowScroll(true) |
| --scrolling will be needed |
| self.noupdate = true |
| self.scrollbar:SetMinMaxValues(0, numlines - maxlines) |
| --check if we are scrolled down too far |
| if numlines - status.scrollvalue < maxlines then |
| status.scrollvalue = numlines - maxlines |
| self.scrollbar:SetValue(status.scrollvalue) |
| end |
| self.noupdate = nil |
| first, last = status.scrollvalue+1, status.scrollvalue + maxlines |
| end |
| local buttonnum = 1 |
| for i = first, last do |
| local line = lines[i] |
| local button = buttons[buttonnum] |
| if not button then |
| button = self:CreateButton() |
| buttons[buttonnum] = button |
| button:SetParent(treeframe) |
| button:SetFrameLevel(treeframe:GetFrameLevel()+1) |
| button:ClearAllPoints() |
| if i == 1 then |
| if self.showscroll then |
| button:SetPoint("TOPRIGHT", self.treeframe,"TOPRIGHT",-22,-10) |
| button:SetPoint("TOPLEFT", self.treeframe, "TOPLEFT", 0, -10) |
| else |
| button:SetPoint("TOPRIGHT", self.treeframe,"TOPRIGHT",0,-10) |
| button:SetPoint("TOPLEFT", self.treeframe, "TOPLEFT", 0, -10) |
| end |
| else |
| button:SetPoint("TOPRIGHT", buttons[buttonnum-1], "BOTTOMRIGHT",0,0) |
| button:SetPoint("TOPLEFT", buttons[buttonnum-1], "BOTTOMLEFT",0,0) |
| end |
| end |
| UpdateButton(button, line, status.selected == line.uniquevalue, line.hasChildren, groupstatus[line.uniquevalue] ) |
| button:Show() |
| buttonnum = buttonnum + 1 |
| end |
| end, |
| ["SetSelected"] = function(self, value) |
| local status = self.status or self.localstatus |
| if status.selected ~= value then |
| status.selected = value |
| self:Fire("OnGroupSelected", value) |
| end |
| end, |
| ["Select"] = function(self, uniquevalue, ...) |
| self.filter = false |
| local status = self.status or self.localstatus |
| local groups = status.groups |
| for i = 1, select('#', ...) do |
| groups[BuildUniqueValue(select(i, ...))] = true |
| end |
| status.selected = uniquevalue |
| self:RefreshTree() |
| self:Fire("OnGroupSelected", uniquevalue) |
| end, |
| ["SelectByPath"] = function(self, ...) |
| self:Select(BuildUniqueValue(...), ...) |
| end, |
| ["SelectByValue"] = function(self, uniquevalue) |
| self:Select(uniquevalue, ("\001"):split(uniquevalue)) |
| end, |
| ["ShowScroll"] = function(self, show) |
| self.showscroll = show |
| if show then |
| self.scrollbar:Show() |
| if self.buttons[1] then |
| self.buttons[1]:SetPoint("TOPRIGHT", self.treeframe,"TOPRIGHT",-22,-10) |
| end |
| else |
| self.scrollbar:Hide() |
| if self.buttons[1] then |
| self.buttons[1]:SetPoint("TOPRIGHT", self.treeframe,"TOPRIGHT",0,-10) |
| end |
| end |
| end, |
| ["OnWidthSet"] = function(self, width) |
| local content = self.content |
| local treeframe = self.treeframe |
| local status = self.status or self.localstatus |
| status.fullwidth = width |
| local contentwidth = width - status.treewidth - 20 |
| if contentwidth < 0 then |
| contentwidth = 0 |
| end |
| content:SetWidth(contentwidth) |
| content.width = contentwidth |
| local maxtreewidth = math_min(400, width - 50) |
| if maxtreewidth > 100 and status.treewidth > maxtreewidth then |
| self:SetTreeWidth(maxtreewidth, status.treesizable) |
| end |
| treeframe:SetMaxResize(maxtreewidth, 1600) |
| end, |
| ["OnHeightSet"] = function(self, height) |
| local content = self.content |
| local contentheight = height - 20 |
| if contentheight < 0 then |
| contentheight = 0 |
| end |
| content:SetHeight(contentheight) |
| content.height = contentheight |
| end, |
| ["SetTreeWidth"] = function(self, treewidth, resizable) |
| if not resizable then |
| if type(treewidth) == 'number' then |
| resizable = false |
| elseif type(treewidth) == 'boolean' then |
| resizable = treewidth |
| treewidth = DEFAULT_TREE_WIDTH |
| else |
| resizable = false |
| treewidth = DEFAULT_TREE_WIDTH |
| end |
| end |
| self.treeframe:SetWidth(treewidth) |
| self.dragger:EnableMouse(resizable) |
| local status = self.status or self.localstatus |
| status.treewidth = treewidth |
| status.treesizable = resizable |
| -- recalculate the content width |
| if status.fullwidth then |
| self:OnWidthSet(status.fullwidth) |
| end |
| end, |
| ["LayoutFinished"] = function(self, width, height) |
| if self.noAutoHeight then return end |
| self:SetHeight((height or 0) + 20) |
| end |
| } |
| --[[----------------------------------------------------------------------------- |
| Constructor |
| -------------------------------------------------------------------------------]] |
| local PaneBackdrop = { |
| bgFile = "Interface\\ChatFrame\\ChatFrameBackground", |
| edgeFile = "Interface\\Tooltips\\UI-Tooltip-Border", |
| tile = true, tileSize = 16, edgeSize = 16, |
| insets = { left = 3, right = 3, top = 5, bottom = 3 } |
| } |
| local DraggerBackdrop = { |
| bgFile = "Interface\\Tooltips\\UI-Tooltip-Background", |
| edgeFile = nil, |
| tile = true, tileSize = 16, edgeSize = 0, |
| insets = { left = 3, right = 3, top = 7, bottom = 7 } |
| } |
| local function Constructor() |
| local num = AceGUI:GetNextWidgetNum(Type) |
| local frame = CreateFrame("Frame", nil, UIParent) |
| local treeframe = CreateFrame("Frame", nil, frame) |
| treeframe:SetPoint("TOPLEFT") |
| treeframe:SetPoint("BOTTOMLEFT") |
| treeframe:SetWidth(DEFAULT_TREE_WIDTH) |
| treeframe:EnableMouseWheel(true) |
| treeframe:SetBackdrop(PaneBackdrop) |
| treeframe:SetBackdropColor(0.1, 0.1, 0.1, 0.5) |
| treeframe:SetBackdropBorderColor(0.4, 0.4, 0.4) |
| treeframe:SetResizable(true) |
| treeframe:SetMinResize(100, 1) |
| treeframe:SetMaxResize(400, 1600) |
| treeframe:SetScript("OnUpdate", FirstFrameUpdate) |
| treeframe:SetScript("OnSizeChanged", Tree_OnSizeChanged) |
| treeframe:SetScript("OnMouseWheel", Tree_OnMouseWheel) |
| local dragger = CreateFrame("Frame", nil, treeframe) |
| dragger:SetWidth(8) |
| dragger:SetPoint("TOP", treeframe, "TOPRIGHT") |
| dragger:SetPoint("BOTTOM", treeframe, "BOTTOMRIGHT") |
| dragger:SetBackdrop(DraggerBackdrop) |
| dragger:SetBackdropColor(1, 1, 1, 0) |
| dragger:SetScript("OnEnter", Dragger_OnEnter) |
| dragger:SetScript("OnLeave", Dragger_OnLeave) |
| dragger:SetScript("OnMouseDown", Dragger_OnMouseDown) |
| dragger:SetScript("OnMouseUp", Dragger_OnMouseUp) |
| local scrollbar = CreateFrame("Slider", ("AceConfigDialogTreeGroup%dScrollBar"):format(num), treeframe, "UIPanelScrollBarTemplate") |
| scrollbar:SetScript("OnValueChanged", nil) |
| scrollbar:SetPoint("TOPRIGHT", -10, -26) |
| scrollbar:SetPoint("BOTTOMRIGHT", -10, 26) |
| scrollbar:SetMinMaxValues(0,0) |
| scrollbar:SetValueStep(1) |
| scrollbar:SetValue(0) |
| scrollbar:SetWidth(16) |
| scrollbar:SetScript("OnValueChanged", OnScrollValueChanged) |
| local scrollbg = scrollbar:CreateTexture(nil, "BACKGROUND") |
| scrollbg:SetAllPoints(scrollbar) |
| scrollbg:SetTexture(0,0,0,0.4) |
| local border = CreateFrame("Frame",nil,frame) |
| border:SetPoint("TOPLEFT", treeframe, "TOPRIGHT") |
| border:SetPoint("BOTTOMRIGHT") |
| border:SetBackdrop(PaneBackdrop) |
| border:SetBackdropColor(0.1, 0.1, 0.1, 0.5) |
| border:SetBackdropBorderColor(0.4, 0.4, 0.4) |
| --Container Support |
| local content = CreateFrame("Frame", nil, border) |
| content:SetPoint("TOPLEFT", 10, -10) |
| content:SetPoint("BOTTOMRIGHT", -10, 10) |
| local widget = { |
| frame = frame, |
| lines = {}, |
| levels = {}, |
| buttons = {}, |
| hasChildren = {}, |
| localstatus = { groups = {}, scrollvalue = 0 }, |
| filter = false, |
| treeframe = treeframe, |
| dragger = dragger, |
| scrollbar = scrollbar, |
| border = border, |
| content = content, |
| type = Type |
| } |
| for method, func in pairs(methods) do |
| widget[method] = func |
| end |
| treeframe.obj, dragger.obj, scrollbar.obj = widget, widget, widget |
| return AceGUI:RegisterAsContainer(widget) |
| end |
| AceGUI:RegisterWidgetType(Type, Constructor, Version) |
AceGUI-3.0/widgets/AceGUIWidget-Button.lua
1,42 → 1,54
| local AceGUI = LibStub("AceGUI-3.0") |
| --[[----------------------------------------------------------------------------- |
| Button Widget |
| Graphical Button. |
| -------------------------------------------------------------------------------]] |
| local Type, Version = "Button", 20 |
| local AceGUI = LibStub and LibStub("AceGUI-3.0", true) |
| if not AceGUI or (AceGUI:GetWidgetVersion(Type) or 0) >= Version then return end |
| -------------------------- |
| -- Button -- |
| -------------------------- |
| do |
| local Type = "Button" |
| local Version = 10 |
| local function OnAcquire(self) |
| -- Lua APIs |
| local pairs = pairs |
| -- WoW APIs |
| local _G = _G |
| local PlaySound, CreateFrame, UIParent = PlaySound, CreateFrame, UIParent |
| --[[----------------------------------------------------------------------------- |
| Scripts |
| -------------------------------------------------------------------------------]] |
| local function Button_OnClick(frame, ...) |
| PlaySound("igMainMenuOption") |
| frame.obj:Fire("OnClick", ...) |
| AceGUI:ClearFocus() |
| end |
| local function Control_OnEnter(frame) |
| frame.obj:Fire("OnEnter") |
| end |
| local function Control_OnLeave(frame) |
| frame.obj:Fire("OnLeave") |
| end |
| --[[----------------------------------------------------------------------------- |
| Methods |
| -------------------------------------------------------------------------------]] |
| local methods = { |
| ["OnAcquire"] = function(self) |
| -- restore default values |
| self:SetHeight(24) |
| self:SetWidth(200) |
| end |
| local function OnRelease(self) |
| self.frame:ClearAllPoints() |
| self.frame:Hide() |
| self:SetDisabled(false) |
| end |
| local function Button_OnClick(this) |
| this.obj:Fire("OnClick") |
| AceGUI:ClearFocus() |
| end |
| local function Button_OnEnter(this) |
| this.obj:Fire("OnEnter") |
| end |
| local function Button_OnLeave(this) |
| this.obj:Fire("OnLeave") |
| end |
| local function SetText(self, text) |
| self.text:SetText(text or "") |
| end |
| local function SetDisabled(self, disabled) |
| self:SetText() |
| end, |
| -- ["OnRelease"] = nil, |
| ["SetText"] = function(self, text) |
| self.text:SetText(text) |
| end, |
| ["SetDisabled"] = function(self, disabled) |
| self.disabled = disabled |
| if disabled then |
| self.frame:Disable() |
44,57 → 56,37
| self.frame:Enable() |
| end |
| end |
| local function Constructor() |
| local num = AceGUI:GetNextWidgetNum(Type) |
| local name = "AceGUI30Button"..num |
| local frame = CreateFrame("Button",name,UIParent,"UIPanelButtonTemplate2") |
| local self = {} |
| self.num = num |
| self.type = Type |
| self.frame = frame |
| local left = _G[name .. "Left"] |
| local right = _G[name .. "Right"] |
| local middle = _G[name .. "Middle"] |
| left:SetPoint("TOP", frame, "TOP", 0, -1) |
| left:SetPoint("BOTTOM", frame, "BOTTOM", 0, 1) |
| right:SetPoint("TOP", frame, "TOP", 0, -1) |
| right:SetPoint("BOTTOM", frame, "BOTTOM", 0, 1) |
| middle:SetPoint("TOP", frame, "TOP", 0, -1) |
| middle:SetPoint("BOTTOM", frame, "BOTTOM", 0, 1) |
| } |
| local text = frame:GetFontString() |
| self.text = text |
| text:ClearAllPoints() |
| text:SetPoint("TOPLEFT",frame,"TOPLEFT", 15, -1) |
| text:SetPoint("BOTTOMRIGHT",frame,"BOTTOMRIGHT", -15, 1) |
| text:SetJustifyV("MIDDLE") |
| --[[----------------------------------------------------------------------------- |
| Constructor |
| -------------------------------------------------------------------------------]] |
| local function Constructor() |
| local name = "AceGUI30Button" .. AceGUI:GetNextWidgetNum(Type) |
| local frame = CreateFrame("Button", name, UIParent, "UIPanelButtonTemplate2") |
| frame:Hide() |
| frame:SetScript("OnClick",Button_OnClick) |
| frame:SetScript("OnEnter",Button_OnEnter) |
| frame:SetScript("OnLeave",Button_OnLeave) |
| frame:EnableMouse(true) |
| frame:SetScript("OnClick", Button_OnClick) |
| frame:SetScript("OnEnter", Control_OnEnter) |
| frame:SetScript("OnLeave", Control_OnLeave) |
| self.SetText = SetText |
| self.SetDisabled = SetDisabled |
| frame:EnableMouse(true) |
| local text = frame:GetFontString() |
| text:ClearAllPoints() |
| text:SetPoint("TOPLEFT", 15, -1) |
| text:SetPoint("BOTTOMRIGHT", -15, 1) |
| text:SetJustifyV("MIDDLE") |
| frame:SetHeight(24) |
| frame:SetWidth(200) |
| self.OnRelease = OnRelease |
| self.OnAcquire = OnAcquire |
| self.frame = frame |
| frame.obj = self |
| AceGUI:RegisterAsWidget(self) |
| return self |
| local widget = { |
| text = text, |
| frame = frame, |
| type = Type |
| } |
| for method, func in pairs(methods) do |
| widget[method] = func |
| end |
| AceGUI:RegisterWidgetType(Type,Constructor,Version) |
| return AceGUI:RegisterAsWidget(widget) |
| end |
| AceGUI:RegisterWidgetType(Type, Constructor, Version) |
AceGUI-3.0/widgets/AceGUIWidget-DropDown-Items.lua
1,7 → 1,14
| --[[ $Id: AceGUIWidget-DropDown-Items.lua 808 2009-05-07 14:45:15Z ammo $ ]]-- |
| --[[ $Id: AceGUIWidget-DropDown-Items.lua 916 2010-03-15 12:24:36Z nevcairiel $ ]]-- |
| local AceGUI = LibStub("AceGUI-3.0") |
| -- Lua APIs |
| local select, assert = select, assert |
| -- WoW APIs |
| local PlaySound = PlaySound |
| local CreateFrame = CreateFrame |
| local function fixlevels(parent,...) |
| local i = 1 |
| local child = select(i, ...) |
310,7 → 317,7
| -- Does not close the pullout on click. |
| do |
| local widgetType = "Dropdown-Item-Toggle" |
| local widgetVersion = 2 |
| local widgetVersion = 3 |
| local function UpdateToggle(self) |
| if self.value then |
329,6 → 336,11
| local self = this.obj |
| if self.disabled then return end |
| self.value = not self.value |
| if self.value then |
| PlaySound("igMainMenuOptionCheckBoxOn") |
| else |
| PlaySound("igMainMenuOptionCheckBoxOff") |
| end |
| UpdateToggle(self) |
| self:Fire("OnValueChanged", self.value) |
| end |
AceGUI-3.0/widgets/AceGUIWidget-ColorPicker.lua
1,172 → 1,186
| local AceGUI = LibStub("AceGUI-3.0") |
| --[[----------------------------------------------------------------------------- |
| ColorPicker Widget |
| -------------------------------------------------------------------------------]] |
| local Type, Version = "ColorPicker", 20 |
| local AceGUI = LibStub and LibStub("AceGUI-3.0", true) |
| if not AceGUI or (AceGUI:GetWidgetVersion(Type) or 0) >= Version then return end |
| -------------------------- |
| -- ColorPicker -- |
| -------------------------- |
| do |
| local Type = "ColorPicker" |
| local Version = 10 |
| local function OnAcquire(self) |
| self.HasAlpha = false |
| self:SetColor(0,0,0,1) |
| self:SetHeight(24) |
| self:SetWidth(200) |
| end |
| local function SetLabel(self, text) |
| self.text:SetText(text) |
| end |
| -- Lua APIs |
| local pairs = pairs |
| local function SetColor(self,r,g,b,a) |
| self.r = r |
| self.g = g |
| self.b = b |
| self.a = a or 1 |
| self.colorSwatch:SetVertexColor(r,g,b,a) |
| end |
| -- WoW APIs |
| local CreateFrame, UIParent = CreateFrame, UIParent |
| local function Control_OnEnter(this) |
| this.obj:Fire("OnEnter") |
| end |
| -- Global vars/functions that we don't upvalue since they might get hooked, or upgraded |
| -- List them here for Mikk's FindGlobals script |
| -- GLOBALS: ShowUIPanel, HideUIPanel, ColorPickerFrame, OpacitySliderFrame |
| local function Control_OnLeave(this) |
| this.obj:Fire("OnLeave") |
| --[[----------------------------------------------------------------------------- |
| Support functions |
| -------------------------------------------------------------------------------]] |
| local function ColorCallback(self, r, g, b, a, isAlpha) |
| if not self.HasAlpha then |
| a = 1 |
| end |
| local function SetHasAlpha(self, HasAlpha) |
| self.HasAlpha = HasAlpha |
| self:SetColor(r, g, b, a) |
| if ColorPickerFrame:IsVisible() then |
| --colorpicker is still open |
| self:Fire("OnValueChanged", r, g, b, a) |
| else |
| --colorpicker is closed, color callback is first, ignore it, |
| --alpha callback is the final call after it closes so confirm now |
| if isAlpha then |
| self:Fire("OnValueConfirmed", r, g, b, a) |
| end |
| end |
| end |
| local function ColorCallback(self,r,g,b,a,isAlpha) |
| if not self.HasAlpha then |
| a = 1 |
| --[[----------------------------------------------------------------------------- |
| Scripts |
| -------------------------------------------------------------------------------]] |
| local function Control_OnEnter(frame) |
| frame.obj:Fire("OnEnter") |
| end |
| local function Control_OnLeave(frame) |
| frame.obj:Fire("OnLeave") |
| end |
| local function ColorSwatch_OnClick(frame) |
| HideUIPanel(ColorPickerFrame) |
| local self = frame.obj |
| if not self.disabled then |
| ColorPickerFrame:SetFrameStrata("FULLSCREEN_DIALOG") |
| ColorPickerFrame.func = function() |
| local r, g, b = ColorPickerFrame:GetColorRGB() |
| local a = 1 - OpacitySliderFrame:GetValue() |
| ColorCallback(self, r, g, b, a) |
| end |
| self:SetColor(r,g,b,a) |
| if ColorPickerFrame:IsVisible() then |
| --colorpicker is still open |
| self:Fire("OnValueChanged",r,g,b,a) |
| else |
| --colorpicker is closed, color callback is first, ignore it, |
| --alpha callback is the final call after it closes so confirm now |
| if isAlpha then |
| self:Fire("OnValueConfirmed",r,g,b,a) |
| end |
| ColorPickerFrame.hasOpacity = self.HasAlpha |
| ColorPickerFrame.opacityFunc = function() |
| local r, g, b = ColorPickerFrame:GetColorRGB() |
| local a = 1 - OpacitySliderFrame:GetValue() |
| ColorCallback(self, r, g, b, a, true) |
| end |
| end |
| local function ColorSwatch_OnClick(this) |
| HideUIPanel(ColorPickerFrame) |
| local self = this.obj |
| if not self.disabled then |
| ColorPickerFrame:SetFrameStrata("FULLSCREEN_DIALOG") |
| ColorPickerFrame.func = function() |
| local r,g,b = ColorPickerFrame:GetColorRGB() |
| local a = 1 - OpacitySliderFrame:GetValue() |
| ColorCallback(self,r,g,b,a) |
| end |
| ColorPickerFrame.hasOpacity = self.HasAlpha |
| ColorPickerFrame.opacityFunc = function() |
| local r,g,b = ColorPickerFrame:GetColorRGB() |
| local a = 1 - OpacitySliderFrame:GetValue() |
| ColorCallback(self,r,g,b,a,true) |
| end |
| local r, g, b, a = self.r, self.g, self.b, self.a |
| if self.HasAlpha then |
| ColorPickerFrame.opacity = 1 - (a or 0) |
| end |
| ColorPickerFrame:SetColorRGB(r, g, b) |
| ColorPickerFrame.cancelFunc = function() |
| ColorCallback(self,r,g,b,a,true) |
| end |
| ShowUIPanel(ColorPickerFrame) |
| local r, g, b, a = self.r, self.g, self.b, self.a |
| if self.HasAlpha then |
| ColorPickerFrame.opacity = 1 - (a or 0) |
| end |
| AceGUI:ClearFocus() |
| end |
| ColorPickerFrame:SetColorRGB(r, g, b) |
| local function OnRelease(self) |
| self.frame:ClearAllPoints() |
| self.frame:Hide() |
| ColorPickerFrame.cancelFunc = function() |
| ColorCallback(self, r, g, b, a, true) |
| end |
| ShowUIPanel(ColorPickerFrame) |
| end |
| AceGUI:ClearFocus() |
| end |
| local function SetDisabled(self, disabled) |
| --[[----------------------------------------------------------------------------- |
| Methods |
| -------------------------------------------------------------------------------]] |
| local methods = { |
| ["OnAcquire"] = function(self) |
| self:SetHeight(24) |
| self:SetWidth(200) |
| self:SetHasAlpha(false) |
| self:SetColor(0, 0, 0, 1) |
| self:SetDisabled(nil) |
| self:SetLabel(nil) |
| end, |
| -- ["OnRelease"] = nil, |
| ["SetLabel"] = function(self, text) |
| self.text:SetText(text) |
| end, |
| ["SetColor"] = function(self, r, g, b, a) |
| self.r = r |
| self.g = g |
| self.b = b |
| self.a = a or 1 |
| self.colorSwatch:SetVertexColor(r, g, b, a) |
| end, |
| ["SetHasAlpha"] = function(self, HasAlpha) |
| self.HasAlpha = HasAlpha |
| end, |
| ["SetDisabled"] = function(self, disabled) |
| self.disabled = disabled |
| if self.disabled then |
| self.text:SetTextColor(0.5,0.5,0.5) |
| self.frame:Disable() |
| self.text:SetTextColor(0.5, 0.5, 0.5) |
| else |
| self.text:SetTextColor(1,1,1) |
| self.frame:Enable() |
| self.text:SetTextColor(1, 1, 1) |
| end |
| end |
| } |
| local function Constructor() |
| local frame = CreateFrame("Button",nil,UIParent) |
| local self = {} |
| self.type = Type |
| --[[----------------------------------------------------------------------------- |
| Constructor |
| -------------------------------------------------------------------------------]] |
| local function Constructor() |
| local frame = CreateFrame("Button", nil, UIParent) |
| frame:Hide() |
| self.OnRelease = OnRelease |
| self.OnAcquire = OnAcquire |
| self.SetLabel = SetLabel |
| self.SetColor = SetColor |
| self.SetDisabled = SetDisabled |
| self.SetHasAlpha = SetHasAlpha |
| self.frame = frame |
| frame.obj = self |
| local text = frame:CreateFontString(nil,"OVERLAY","GameFontHighlight") |
| self.text = text |
| text:SetJustifyH("LEFT") |
| text:SetTextColor(1,1,1) |
| frame:SetHeight(24) |
| frame:SetWidth(200) |
| text:SetHeight(24) |
| frame:SetScript("OnClick", ColorSwatch_OnClick) |
| frame:SetScript("OnEnter",Control_OnEnter) |
| frame:SetScript("OnLeave",Control_OnLeave) |
| local colorSwatch = frame:CreateTexture(nil, "OVERLAY") |
| self.colorSwatch = colorSwatch |
| colorSwatch:SetWidth(19) |
| colorSwatch:SetHeight(19) |
| colorSwatch:SetTexture("Interface\\ChatFrame\\ChatFrameColorSwatch") |
| local texture = frame:CreateTexture(nil, "BACKGROUND") |
| colorSwatch.texture = texture |
| texture:SetWidth(16) |
| texture:SetHeight(16) |
| texture:SetTexture(1,1,1) |
| texture:Show() |
| local checkers = frame:CreateTexture(nil, "BACKGROUND") |
| colorSwatch.checkers = checkers |
| checkers:SetTexture("Tileset\\Generic\\Checkers") |
| checkers:SetDesaturated(true) |
| checkers:SetVertexColor(1,1,1,0.75) |
| checkers:SetTexCoord(.25,0,0.5,.25) |
| checkers:SetWidth(14) |
| checkers:SetHeight(14) |
| checkers:Show() |
| local highlight = frame:CreateTexture(nil, "BACKGROUND") |
| self.highlight = highlight |
| highlight:SetTexture("Interface\\QuestFrame\\UI-QuestTitleHighlight") |
| highlight:SetBlendMode("ADD") |
| highlight:SetAllPoints(frame) |
| highlight:Hide() |
| texture:SetPoint("CENTER", colorSwatch, "CENTER") |
| checkers:SetPoint("CENTER", colorSwatch, "CENTER") |
| colorSwatch:SetPoint("LEFT", frame, "LEFT", 0, 0) |
| text:SetPoint("LEFT",colorSwatch,"RIGHT",2,0) |
| text:SetPoint("RIGHT",frame,"RIGHT") |
| frame:EnableMouse(true) |
| frame:SetScript("OnEnter", Control_OnEnter) |
| frame:SetScript("OnLeave", Control_OnLeave) |
| frame:SetScript("OnClick", ColorSwatch_OnClick) |
| AceGUI:RegisterAsWidget(self) |
| return self |
| local colorSwatch = frame:CreateTexture(nil, "OVERLAY") |
| colorSwatch:SetWidth(19) |
| colorSwatch:SetHeight(19) |
| colorSwatch:SetTexture("Interface\\ChatFrame\\ChatFrameColorSwatch") |
| colorSwatch:SetPoint("LEFT") |
| local texture = frame:CreateTexture(nil, "BACKGROUND") |
| texture:SetWidth(16) |
| texture:SetHeight(16) |
| texture:SetTexture(1, 1, 1) |
| texture:SetPoint("CENTER", colorSwatch) |
| texture:Show() |
| local checkers = frame:CreateTexture(nil, "BACKGROUND") |
| checkers:SetWidth(14) |
| checkers:SetHeight(14) |
| checkers:SetTexture("Tileset\\Generic\\Checkers") |
| checkers:SetTexCoord(.25, 0, 0.5, .25) |
| checkers:SetDesaturated(true) |
| checkers:SetVertexColor(1, 1, 1, 0.75) |
| checkers:SetPoint("CENTER", colorSwatch) |
| checkers:Show() |
| local text = frame:CreateFontString(nil,"OVERLAY","GameFontHighlight") |
| text:SetHeight(24) |
| text:SetJustifyH("LEFT") |
| text:SetTextColor(1, 1, 1) |
| text:SetPoint("LEFT", colorSwatch, "RIGHT", 2, 0) |
| text:SetPoint("RIGHT") |
| --local highlight = frame:CreateTexture(nil, "HIGHLIGHT") |
| --highlight:SetTexture("Interface\\QuestFrame\\UI-QuestTitleHighlight") |
| --highlight:SetBlendMode("ADD") |
| --highlight:SetAllPoints(frame) |
| local widget = { |
| colorSwatch = colorSwatch, |
| text = text, |
| frame = frame, |
| type = Type |
| } |
| for method, func in pairs(methods) do |
| widget[method] = func |
| end |
| AceGUI:RegisterWidgetType(Type,Constructor,Version) |
| return AceGUI:RegisterAsWidget(widget) |
| end |
| AceGUI:RegisterWidgetType(Type, Constructor, Version) |
AceGUI-3.0/widgets/AceGUIWidget-InteractiveLabel.lua
1,188 → 1,101
| local AceGUI = LibStub("AceGUI-3.0") |
| --[[----------------------------------------------------------------------------- |
| InteractiveLabel Widget |
| -------------------------------------------------------------------------------]] |
| local Type, Version = "InteractiveLabel", 20 |
| local AceGUI = LibStub and LibStub("AceGUI-3.0", true) |
| if not AceGUI or (AceGUI:GetWidgetVersion(Type) or 0) >= Version then return end |
| -------------------------- |
| -- Label -- |
| -------------------------- |
| do |
| local Type = "InteractiveLabel" |
| local Version = 3 |
| local function OnAcquire(self) |
| self:SetHeight(18) |
| self:SetWidth(200) |
| self:SetText("") |
| self:SetImage(nil) |
| self:SetColor() |
| self:SetFontObject() |
| -- Lua APIs |
| local select, pairs = select, pairs |
| -- WoW APIs |
| local CreateFrame, UIParent = CreateFrame, UIParent |
| -- Global vars/functions that we don't upvalue since they might get hooked, or upgraded |
| -- List them here for Mikk's FindGlobals script |
| -- GLOBALS: GameFontHighlightSmall |
| --[[----------------------------------------------------------------------------- |
| Scripts |
| -------------------------------------------------------------------------------]] |
| local function Control_OnEnter(frame) |
| frame.obj:Fire("OnEnter") |
| end |
| local function Control_OnLeave(frame) |
| frame.obj:Fire("OnLeave") |
| end |
| local function Label_OnClick(frame, button) |
| frame.obj:Fire("OnClick", button) |
| AceGUI:ClearFocus() |
| end |
| --[[----------------------------------------------------------------------------- |
| Methods |
| -------------------------------------------------------------------------------]] |
| local methods = { |
| ["OnAcquire"] = function(self) |
| self:LabelOnAcquire() |
| self:SetHighlight() |
| self:SetHighlightTexCoord() |
| end |
| local function OnRelease(self) |
| self.frame:ClearAllPoints() |
| self.frame:Hide() |
| end |
| local function UpdateImageAnchor(self) |
| local width = self.frame.width or self.frame:GetWidth() or 0 |
| local image = self.image |
| local label = self.label |
| local frame = self.frame |
| local height |
| label:ClearAllPoints() |
| image:ClearAllPoints() |
| if self.imageshown then |
| local imagewidth = image:GetWidth() |
| if (width - imagewidth) < 200 or (label:GetText() or "") == "" then |
| --image goes on top centered when less than 200 width for the text, or if there is no text |
| image:SetPoint("TOP",frame,"TOP",0,0) |
| label:SetPoint("TOP",image,"BOTTOM",0,0) |
| label:SetPoint("LEFT",frame,"LEFT",0,0) |
| label:SetWidth(width) |
| height = image:GetHeight() + label:GetHeight() |
| else |
| --image on the left |
| image:SetPoint("TOPLEFT",frame,"TOPLEFT",0,0) |
| label:SetPoint("TOPLEFT",image,"TOPRIGHT",0,0) |
| label:SetWidth(width - imagewidth) |
| height = math.max(image:GetHeight(), label:GetHeight()) |
| end |
| else |
| --no image shown |
| label:SetPoint("TOPLEFT",frame,"TOPLEFT",0,0) |
| label:SetWidth(width) |
| height = self.label:GetHeight() |
| end |
| self.resizing = true |
| self.frame:SetHeight(height) |
| self.frame.height = height |
| self.resizing = nil |
| end |
| local function SetText(self, text) |
| self.label:SetText(text or "") |
| UpdateImageAnchor(self) |
| end |
| local function SetColor(self, r, g, b) |
| if not (r and g and b) then |
| r, g, b = 1, 1, 1 |
| end |
| self.label:SetVertexColor(r, g, b) |
| end |
| local function OnWidthSet(self, width) |
| if self.resizing then return end |
| UpdateImageAnchor(self) |
| end |
| local function SetImage(self, path, ...) |
| local image = self.image |
| image:SetTexture(path) |
| if image:GetTexture() then |
| self.imageshown = true |
| local n = select('#', ...) |
| if n == 4 or n == 8 then |
| image:SetTexCoord(...) |
| end |
| else |
| self.imageshown = nil |
| end |
| UpdateImageAnchor(self) |
| end |
| local function SetFont(self, font, height, flags) |
| self.label:SetFont(font, height, flags) |
| end |
| local function SetFontObject(self, font) |
| self.label:SetFontObject(font or GameFontHighlightSmall) |
| end |
| local function SetImageSize(self, width, height) |
| self.image:SetWidth(width) |
| self.image:SetHeight(height) |
| UpdateImageAnchor(self) |
| end |
| local function SetHighlight(self, ...) |
| self:SetDisabled(false) |
| end, |
| -- ["OnRelease"] = nil, |
| ["SetHighlight"] = function(self, ...) |
| self.highlight:SetTexture(...) |
| end |
| local function SetHighlightTexCoord(self, ...) |
| if select('#', ...) >= 1 then |
| end, |
| ["SetHighlightTexCoord"] = function(self, ...) |
| local c = select("#", ...) |
| if c == 4 or c == 8 then |
| self.highlight:SetTexCoord(...) |
| else |
| self.highlight:SetTexCoord(0, 1, 0, 1) |
| end |
| end, |
| ["SetDisabled"] = function(self,disabled) |
| self.disabled = disabled |
| if disabled then |
| self.frame:EnableMouse(false) |
| self.label:SetTextColor(0.5, 0.5, 0.5) |
| else |
| self.frame:EnableMouse(true) |
| self.label:SetTextColor(1, 1, 1) |
| end |
| end |
| local function OnEnter(this) |
| this.obj.highlight:Show() |
| this.obj:Fire("OnEnter") |
| end |
| local function OnLeave(this) |
| this.obj.highlight:Hide() |
| this.obj:Fire("OnLeave") |
| end |
| local function OnClick(this, ...) |
| this.obj:Fire("OnClick", ...) |
| AceGUI:ClearFocus() |
| end |
| } |
| local function Constructor() |
| local frame = CreateFrame("Frame",nil,UIParent) |
| local self = {} |
| self.type = Type |
| frame:EnableMouse(true) |
| frame:SetScript("OnEnter", OnEnter) |
| frame:SetScript("OnLeave", OnLeave) |
| frame:SetScript("OnMouseDown", OnClick) |
| self.OnRelease = OnRelease |
| self.OnAcquire = OnAcquire |
| self.SetText = SetText |
| self.SetColor = SetColor |
| self.frame = frame |
| self.OnWidthSet = OnWidthSet |
| self.SetImage = SetImage |
| self.SetImageSize = SetImageSize |
| self.SetFont = SetFont |
| self.SetFontObject = SetFontObject |
| self.SetHighlight = SetHighlight |
| self.SetHighlightTexCoord = SetHighlightTexCoord |
| frame.obj = self |
| frame:SetHeight(18) |
| frame:SetWidth(200) |
| local label = frame:CreateFontString(nil,"BACKGROUND","GameFontHighlightSmall") |
| label:SetPoint("TOPLEFT",frame,"TOPLEFT",0,0) |
| label:SetWidth(200) |
| label:SetJustifyH("LEFT") |
| label:SetJustifyV("TOP") |
| self.label = label |
| local highlight = frame:CreateTexture(nil, "OVERLAY") |
| highlight:SetTexture(nil) |
| highlight:SetAllPoints() |
| highlight:SetBlendMode("ADD") |
| highlight:Hide() |
| self.highlight = highlight |
| local image = frame:CreateTexture(nil,"BACKGROUND") |
| self.image = image |
| AceGUI:RegisterAsWidget(self) |
| return self |
| --[[----------------------------------------------------------------------------- |
| Constructor |
| -------------------------------------------------------------------------------]] |
| local function Constructor() |
| -- create a Label type that we will hijack |
| local label = AceGUI:Create("Label") |
| local frame = label.frame |
| frame:EnableMouse(true) |
| frame:SetScript("OnEnter", Control_OnEnter) |
| frame:SetScript("OnLeave", Control_OnLeave) |
| frame:SetScript("OnMouseDown", Label_OnClick) |
| local highlight = frame:CreateTexture(nil, "HIGHLIGHT") |
| highlight:SetTexture(nil) |
| highlight:SetAllPoints() |
| highlight:SetBlendMode("ADD") |
| label.highlight = highlight |
| label.type = Type |
| label.LabelOnAcquire = label.OnAcquire |
| for method, func in pairs(methods) do |
| label[method] = func |
| end |
| AceGUI:RegisterWidgetType(Type,Constructor,Version) |
| return label |
| end |
| AceGUI:RegisterWidgetType(Type, Constructor, Version) |
AceGUI-3.0/widgets/AceGUIWidget-Label.lua
1,145 → 1,162
| local AceGUI = LibStub("AceGUI-3.0") |
| --[[----------------------------------------------------------------------------- |
| Label Widget |
| Displays text and optionally an icon. |
| -------------------------------------------------------------------------------]] |
| local Type, Version = "Label", 21 |
| local AceGUI = LibStub and LibStub("AceGUI-3.0", true) |
| if not AceGUI or (AceGUI:GetWidgetVersion(Type) or 0) >= Version then return end |
| -------------------------- |
| -- Label -- |
| -------------------------- |
| do |
| local Type = "Label" |
| local Version = 10 |
| -- Lua APIs |
| local max, select, pairs = math.max, select, pairs |
| -- WoW APIs |
| local CreateFrame, UIParent = CreateFrame, UIParent |
| -- Global vars/functions that we don't upvalue since they might get hooked, or upgraded |
| -- List them here for Mikk's FindGlobals script |
| -- GLOBALS: GameFontHighlightSmall |
| --[[----------------------------------------------------------------------------- |
| Support functions |
| -------------------------------------------------------------------------------]] |
| local function UpdateImageAnchor(self) |
| if self.resizing then return end |
| local frame = self.frame |
| local width = frame.width or frame:GetWidth() or 0 |
| local image = self.image |
| local label = self.label |
| local height |
| label:ClearAllPoints() |
| image:ClearAllPoints() |
| if self.imageshown then |
| local imagewidth = image:GetWidth() |
| if (width - imagewidth) < 200 or (label:GetText() or "") == "" then |
| -- image goes on top centered when less than 200 width for the text, or if there is no text |
| image:SetPoint("TOP") |
| label:SetPoint("TOP", image, "BOTTOM") |
| label:SetPoint("LEFT") |
| label:SetWidth(width) |
| height = image:GetHeight() + label:GetHeight() |
| else |
| -- image on the left |
| image:SetPoint("TOPLEFT") |
| label:SetPoint("TOPLEFT", image, "TOPRIGHT", 4, 0) |
| label:SetWidth(width - imagewidth - 4) |
| height = max(image:GetHeight(), label:GetHeight()) |
| end |
| else |
| -- no image shown |
| label:SetPoint("TOPLEFT") |
| label:SetWidth(width) |
| height = label:GetHeight() |
| end |
| local function OnAcquire(self) |
| self:SetHeight(18) |
| self.resizing = true |
| frame:SetHeight(height) |
| frame.height = height |
| self.resizing = nil |
| end |
| --[[----------------------------------------------------------------------------- |
| Methods |
| -------------------------------------------------------------------------------]] |
| local methods = { |
| ["OnAcquire"] = function(self) |
| -- set the flag to stop constant size updates |
| self.resizing = true |
| -- height is set dynamically by the text and image size |
| self:SetWidth(200) |
| self:SetText("") |
| self:SetText() |
| self:SetImage(nil) |
| self:SetImageSize(16, 16) |
| self:SetColor() |
| self:SetFontObject() |
| end |
| local function OnRelease(self) |
| self.frame:ClearAllPoints() |
| self.frame:Hide() |
| end |
| local function UpdateImageAnchor(self) |
| local width = self.frame.width or self.frame:GetWidth() or 0 |
| local image = self.image |
| local label = self.label |
| local frame = self.frame |
| local height |
| label:ClearAllPoints() |
| image:ClearAllPoints() |
| if self.imageshown then |
| local imagewidth = image:GetWidth() |
| if (width - imagewidth) < 200 or (label:GetText() or "") == "" then |
| --image goes on top centered when less than 200 width for the text, or if there is no text |
| image:SetPoint("TOP",frame,"TOP",0,0) |
| label:SetPoint("TOP",image,"BOTTOM",0,0) |
| label:SetPoint("LEFT",frame,"LEFT",0,0) |
| label:SetWidth(width) |
| height = image:GetHeight() + label:GetHeight() |
| else |
| --image on the left |
| image:SetPoint("TOPLEFT",frame,"TOPLEFT",0,0) |
| label:SetPoint("TOPLEFT",image,"TOPRIGHT",0,0) |
| label:SetWidth(width - imagewidth) |
| height = math.max(image:GetHeight(), label:GetHeight()) |
| end |
| else |
| --no image shown |
| label:SetPoint("TOPLEFT",frame,"TOPLEFT",0,0) |
| label:SetWidth(width) |
| height = self.label:GetHeight() |
| end |
| self.resizing = true |
| self.frame:SetHeight(height) |
| self.frame.height = height |
| -- reset the flag |
| self.resizing = nil |
| end |
| local function SetText(self, text) |
| self.label:SetText(text or "") |
| -- run the update explicitly |
| UpdateImageAnchor(self) |
| end |
| local function SetColor(self, r, g, b) |
| end, |
| -- ["OnRelease"] = nil, |
| ["OnWidthSet"] = function(self, width) |
| UpdateImageAnchor(self) |
| end, |
| ["SetText"] = function(self, text) |
| self.label:SetText(text) |
| UpdateImageAnchor(self) |
| end, |
| ["SetColor"] = function(self, r, g, b) |
| if not (r and g and b) then |
| r, g, b = 1, 1, 1 |
| end |
| self.label:SetVertexColor(r, g, b) |
| end |
| local function OnWidthSet(self, width) |
| if self.resizing then return end |
| UpdateImageAnchor(self) |
| end |
| local function SetImage(self, path, ...) |
| end, |
| ["SetImage"] = function(self, path, ...) |
| local image = self.image |
| image:SetTexture(path) |
| if image:GetTexture() then |
| self.imageshown = true |
| local n = select('#', ...) |
| local n = select("#", ...) |
| if n == 4 or n == 8 then |
| image:SetTexCoord(...) |
| else |
| image:SetTexCoord(0, 1, 0, 1) |
| end |
| else |
| self.imageshown = nil |
| end |
| UpdateImageAnchor(self) |
| end |
| local function SetFont(self, font, height, flags) |
| end, |
| ["SetFont"] = function(self, font, height, flags) |
| self.label:SetFont(font, height, flags) |
| end |
| local function SetFontObject(self, font) |
| self.label:SetFontObject(font or GameFontHighlightSmall) |
| end |
| local function SetImageSize(self, width, height) |
| end, |
| ["SetFontObject"] = function(self, font) |
| self:SetFont((font or GameFontHighlightSmall):GetFont()) |
| end, |
| ["SetImageSize"] = function(self, width, height) |
| self.image:SetWidth(width) |
| self.image:SetHeight(height) |
| UpdateImageAnchor(self) |
| end, |
| } |
| --[[----------------------------------------------------------------------------- |
| Constructor |
| -------------------------------------------------------------------------------]] |
| local function Constructor() |
| local frame = CreateFrame("Frame", nil, UIParent) |
| frame:Hide() |
| local label = frame:CreateFontString(nil, "BACKGROUND", "GameFontHighlightSmall") |
| label:SetJustifyH("LEFT") |
| label:SetJustifyV("TOP") |
| local image = frame:CreateTexture(nil, "BACKGROUND") |
| -- create widget |
| local widget = { |
| label = label, |
| image = image, |
| frame = frame, |
| type = Type |
| } |
| for method, func in pairs(methods) do |
| widget[method] = func |
| end |
| local function Constructor() |
| local frame = CreateFrame("Frame",nil,UIParent) |
| local self = {} |
| self.type = Type |
| self.OnRelease = OnRelease |
| self.OnAcquire = OnAcquire |
| self.SetText = SetText |
| self.SetColor = SetColor |
| self.frame = frame |
| self.OnWidthSet = OnWidthSet |
| self.SetImage = SetImage |
| self.SetImageSize = SetImageSize |
| self.SetFont = SetFont |
| self.SetFontObject = SetFontObject |
| frame.obj = self |
| frame:SetHeight(18) |
| frame:SetWidth(200) |
| local label = frame:CreateFontString(nil,"BACKGROUND","GameFontHighlightSmall") |
| label:SetPoint("TOPLEFT",frame,"TOPLEFT",0,0) |
| label:SetWidth(200) |
| label:SetJustifyH("LEFT") |
| label:SetJustifyV("TOP") |
| self.label = label |
| local image = frame:CreateTexture(nil,"BACKGROUND") |
| self.image = image |
| AceGUI:RegisterAsWidget(self) |
| return self |
| end |
| AceGUI:RegisterWidgetType(Type,Constructor,Version) |
| return AceGUI:RegisterAsWidget(widget) |
| end |
| AceGUI:RegisterWidgetType(Type, Constructor, Version) |
AceGUI-3.0/widgets/AceGUIWidget-MultiLineEditBox.lua
1,318 → 1,283
| local Type, Version = "MultiLineEditBox", 22 |
| local AceGUI = LibStub and LibStub("AceGUI-3.0", true) |
| if not AceGUI or (AceGUI:GetWidgetVersion(Type) or 0) >= Version then return end |
| --[[ |
| --Multiline Editbox Widget, Originally by bam |
| -- Lua APIs |
| local pairs = pairs |
| --]] |
| local assert, error, ipairs, next, pairs, select, tonumber, tostring, type, unpack, pcall, xpcall = |
| assert, error, ipairs, next, pairs, select, tonumber, tostring, type, unpack, pcall, xpcall |
| local getmetatable, setmetatable, rawequal, rawget, rawset, getfenv, setfenv, loadstring, debugstack = |
| getmetatable, setmetatable, rawequal, rawget, rawset, getfenv, setfenv, loadstring, debugstack |
| local math, string, table = math, string, table |
| local find, format, gmatch, gsub, tolower, match, toupper, join, split, trim = |
| string.find, string.format, string.gmatch, string.gsub, string.lower, string.match, string.upper, string.join, string.split, string.trim |
| local concat, insert, maxn, remove, sort = table.concat, table.insert, table.maxn, table.remove, table.sort |
| local max, min, abs, ceil, floor = math.max, math.min, math.abs, math.ceil, math.floor |
| -- WoW APIs |
| local GetCursorInfo, GetSpellName, ClearCursor = GetCursorInfo, GetSpellName, ClearCursor |
| local CreateFrame, UIParent = CreateFrame, UIParent |
| local _G = _G |
| local LibStub = assert(LibStub) |
| -- Global vars/functions that we don't upvalue since they might get hooked, or upgraded |
| -- List them here for Mikk's FindGlobals script |
| -- GLOBALS: ACCEPT, ChatFontNormal |
| local ChatFontNormal = ChatFontNormal |
| local ClearCursor = ClearCursor |
| local CreateFrame = CreateFrame |
| local GetCursorInfo = GetCursorInfo |
| local GetSpellName = GetSpellName |
| local UIParent = UIParent |
| local UISpecialFrames = UISpecialFrames |
| --[[----------------------------------------------------------------------------- |
| Scripts |
| -------------------------------------------------------------------------------]] |
| local function OnClick(self) -- Button |
| self = self.obj |
| self.editBox:ClearFocus() |
| if not self:Fire("OnEnterPressed", self.editBox:GetText()) then |
| self.button:Disable() |
| end |
| end |
| -- No global variables after this! |
| local function OnCursorChanged(self, _, y, _, cursorHeight) -- EditBox |
| self, y = self.obj.scrollFrame, -y |
| local offset = self:GetVerticalScroll() |
| if y < offset then |
| self:SetVerticalScroll(y) |
| else |
| y = y + cursorHeight - self:GetHeight() |
| if y > offset then |
| self:SetVerticalScroll(y) |
| end |
| end |
| end |
| local _G = getfenv() |
| local function OnEditFocusLost(self) -- EditBox |
| self:HighlightText(0, 0) |
| end |
| local AceGUI = LibStub("AceGUI-3.0") |
| local function OnEnter(self) -- EditBox / ScrollFrame |
| self = self.obj |
| if not self.entered then |
| self.entered = true |
| self:Fire("OnEnter") |
| end |
| end |
| local Version = 10 |
| --------------------- |
| -- Common Elements -- |
| --------------------- |
| local function OnLeave(self) -- EditBox / ScrollFrame |
| self = self.obj |
| if self.entered then |
| self.entered = nil |
| self:Fire("OnLeave") |
| end |
| end |
| local FrameBackdrop = { |
| bgFile="Interface\\DialogFrame\\UI-DialogBox-Background", |
| edgeFile="Interface\\DialogFrame\\UI-DialogBox-Border", |
| tile = true, tileSize = 32, edgeSize = 32, |
| insets = { left = 8, right = 8, top = 8, bottom = 8 } |
| } |
| local function OnMouseUp(self) -- ScrollFrame |
| self = self.obj.editBox |
| self:SetFocus() |
| self:SetCursorPosition(self:GetNumLetters()) |
| end |
| local PaneBackdrop = { |
| local function OnReceiveDrag(self) -- EditBox / ScrollFrame |
| local type, id, info = GetCursorInfo() |
| if type == "spell" then |
| info, id = GetSpellName(id, info) |
| if id and id:match("%d") then |
| info = info .. "(" .. id .. ")" |
| end |
| elseif type ~= "item" then |
| return |
| end |
| ClearCursor() |
| self = self.obj |
| local editBox = self.editBox |
| if not editBox:HasFocus() then |
| editBox:SetFocus() |
| editBox:SetCursorPosition(editBox:GetNumLetters()) |
| end |
| editBox:Insert(info) |
| self.button:Enable() |
| end |
| bgFile = "Interface\\ChatFrame\\ChatFrameBackground", |
| edgeFile = "Interface\\Tooltips\\UI-Tooltip-Border", |
| tile = true, tileSize = 16, edgeSize = 16, |
| insets = { left = 3, right = 3, top = 5, bottom = 3 } |
| } |
| local function OnSizeChanged(self, width, height) -- ScrollFrame |
| self.obj.editBox:SetWidth(width) |
| end |
| local ControlBackdrop = { |
| bgFile = "Interface\\Tooltips\\UI-Tooltip-Background", |
| edgeFile = "Interface\\Tooltips\\UI-Tooltip-Border", |
| tile = true, tileSize = 16, edgeSize = 16, |
| insets = { left = 3, right = 3, top = 3, bottom = 3 } |
| } |
| local function OnTextChanged(self, userInput) -- EditBox |
| if userInput then |
| self = self.obj |
| self:Fire("OnTextChanged", self.editBox:GetText()) |
| self.button:Enable() |
| end |
| end |
| -------------------------- |
| -- Edit box -- |
| -------------------------- |
| --[[ |
| Events : |
| OnTextChanged |
| OnEnterPressed |
| local function OnTextSet(self) -- EditBox |
| self:HighlightText(0, 0) |
| self:SetCursorPosition(self:GetNumLetters()) |
| self:SetCursorPosition(0) |
| self.obj.button:Disable() |
| end |
| ]] |
| do |
| local Type = "MultiLineEditBox" |
| local function OnVerticalScroll(self, offset) -- ScrollFrame |
| local editBox = self.obj.editBox |
| editBox:SetHitRectInsets(0, 0, offset, editBox:GetHeight() - offset - self:GetHeight()) |
| end |
| local MultiLineEditBox = {} |
| --[[----------------------------------------------------------------------------- |
| Methods |
| -------------------------------------------------------------------------------]] |
| local methods = { |
| ["GetText"] = function(self) |
| return self.editBox:GetText() |
| end, |
| local function EditBox_OnEnterPressed(this) |
| local self = this.obj |
| local value = this:GetText() |
| local cancel = self:Fire("OnEnterPressed",value) |
| if not cancel then |
| self.button:Disable() |
| end |
| end |
| local function Button_OnClick(this) |
| local editbox = this.obj.editbox |
| editbox:ClearFocus() |
| EditBox_OnEnterPressed(editbox) |
| end |
| local function EditBox_OnReceiveDrag(this) |
| local self = this.obj |
| local type, id, info = GetCursorInfo() |
| if type == "item" then |
| self:SetText(info) |
| self:Fire("OnEnterPressed",info) |
| ClearCursor() |
| elseif type == "spell" then |
| local name, rank = GetSpellName(id, info) |
| if rank and rank:match("%d") then |
| name = name.."("..rank..")" |
| end |
| self:SetText(name) |
| self:Fire("OnEnterPressed",name) |
| ClearCursor() |
| end |
| --self.button:Disable() |
| AceGUI:ClearFocus() |
| end |
| function MultiLineEditBox:OnAcquire() |
| self:SetWidth(200) |
| self:SetHeight(116) |
| self:SetNumLines(4) |
| ["OnAcquire"] = function(self) |
| self.editBox:SetText("") |
| self:SetDisabled(false) |
| self:ShowButton(true) |
| end |
| function MultiLineEditBox:OnRelease() |
| self:SetWidth(200) |
| self:SetNumLines() |
| self.entered = nil |
| self:SetMaxLetters(0) |
| end, |
| ["OnRelease"] = function(self) |
| self.frame:ClearAllPoints() |
| self.frame:Hide() |
| self:SetDisabled(false) |
| end |
| function MultiLineEditBox:SetDisabled(disabled) |
| self.disabled = disabled |
| end, |
| ["SetDisabled"] = function(self, disabled) |
| local editBox = self.editBox |
| if disabled then |
| self.editbox:EnableMouse(false) |
| self.scrollframe:EnableMouse(false) |
| self.editbox:ClearFocus() |
| self.editbox:SetTextColor(0.5, 0.5, 0.5) |
| self.label:SetTextColor(0.5,0.5,0.5) |
| editBox:ClearFocus() |
| editBox:EnableMouse(false) |
| editBox:SetTextColor(0.5, 0.5, 0.5) |
| self.label:SetTextColor(0.5, 0.5, 0.5) |
| self.scrollFrame:EnableMouse(false) |
| self.button:Disable() |
| else |
| self.editbox:EnableMouse(true) |
| self.scrollframe:EnableMouse(true) |
| self.editbox:SetTextColor(1, 1, 1) |
| self.label:SetTextColor(1,.82,0) |
| editBox:EnableMouse(true) |
| editBox:SetTextColor(1, 1, 1) |
| self.label:SetTextColor(1, 0.82, 0) |
| self.scrollFrame:EnableMouse(true) |
| end |
| end |
| end, |
| function MultiLineEditBox:SetText(text) |
| text = text or "" |
| local editbox = self.editbox |
| local oldText = editbox:GetText() |
| local dummy = format(" %s", text) |
| self.lasttext = dummy -- prevents OnTextChanged from firing |
| editbox:SetText(dummy) |
| editbox:HighlightText(0, 1) |
| self.lasttext = oldText |
| editbox:Insert("") |
| end |
| function MultiLineEditBox:SetLabel(text) |
| if (text or "") == "" then |
| self.backdrop:SetPoint("TOPLEFT",self.frame,"TOPLEFT",0,0) |
| self.label:Hide() |
| self.label:SetText("") |
| else |
| self.backdrop:SetPoint("TOPLEFT",self.frame,"TOPLEFT",0,-20) |
| self.label:Show() |
| ["SetLabel"] = function(self, text) |
| if text and text ~= "" then |
| self.label:SetText(text) |
| if self.labelHeight ~= 10 then |
| self.labelHeight = 10 |
| self.scrollBar:SetPoint("TOP", self.label, "BOTTOM", 0, -19) |
| self:SetHeight(self.frame.height + 10) |
| self.label:Show() |
| end |
| elseif self.labelHeight ~= 0 then |
| self.labelHeight = 0 |
| self.label:Hide() |
| self.scrollBar:SetPoint("TOP", self.frame, "TOP", 0, -23) |
| self:SetHeight(self.frame.height - 10) |
| end |
| end |
| function MultiLineEditBox:SetNumLines(number) |
| number = number or 4 |
| self:SetHeight(60 + (14*number)) |
| end |
| end, |
| function MultiLineEditBox:GetText() |
| return self.editbox:GetText() |
| end |
| function MultiLineEditBox:ShowButton(show) |
| if show then |
| self.backdrop:SetPoint("BOTTOMRIGHT",self.frame,"BOTTOMRIGHT",0,22) |
| self.button:Show() |
| else |
| self.backdrop:SetPoint("BOTTOMRIGHT",self.frame,"BOTTOMRIGHT",0,0) |
| self.button:Hide() |
| ["SetNumLines"] = function(self, value) |
| if not value or value < 4 then |
| value = 4 |
| end |
| self:SetHeight(value * 14 + 41 + self.labelHeight) |
| end, |
| ["SetText"] = function(self, text) |
| self.editBox:SetText(text) |
| end, |
| ["SetMaxLetters"] = function (self, num) |
| self.editBox:SetMaxLetters(num or 0) |
| end |
| } |
| local function Constructor() |
| local frame = CreateFrame("Frame", nil, UIParent) |
| local backdrop = CreateFrame("Frame", nil, frame) |
| local self = {} |
| for k, v in pairs(MultiLineEditBox) do self[k] = v end |
| self.type = Type |
| self.frame = frame |
| self.backdrop = backdrop |
| frame.obj = self |
| --[[----------------------------------------------------------------------------- |
| Constructor |
| -------------------------------------------------------------------------------]] |
| local backdrop = { |
| bgFile = [[Interface\Tooltips\UI-Tooltip-Background]], |
| edgeFile = [[Interface\Tooltips\UI-Tooltip-Border]], edgeSize = 16, |
| insets = { left = 4, right = 3, top = 4, bottom = 3 } |
| } |
| backdrop:SetBackdrop(ControlBackdrop) |
| backdrop:SetBackdropColor(0, 0, 0) |
| backdrop:SetBackdropBorderColor(0.4, 0.4, 0.4) |
| local function Constructor() |
| local frame = CreateFrame("Frame", nil, UIParent) |
| frame:Hide() |
| backdrop:SetPoint("TOPLEFT",frame,"TOPLEFT",0, -20) |
| backdrop:SetPoint("BOTTOMRIGHT",frame,"BOTTOMRIGHT",0,22) |
| local scrollframe = CreateFrame("ScrollFrame", format("%s@%s@%s", Type, "ScrollFrame", tostring(self)), backdrop, "UIPanelScrollFrameTemplate") |
| scrollframe:SetPoint("TOPLEFT", 5, -6) |
| scrollframe:SetPoint("BOTTOMRIGHT", -28, 6) |
| scrollframe.obj = self |
| self.scrollframe = scrollframe |
| --local scrollchild = CreateFrame("Frame", nil, scrollframe) |
| --scrollframe:SetScrollChild(scrollchild) |
| --scrollchild:SetHeight(2) |
| --scrollchild:SetWidth(2) |
| local label = frame:CreateFontString(nil,"OVERLAY","GameFontNormalSmall") |
| label:SetPoint("TOPLEFT",frame,"TOPLEFT",0,-2) |
| label:SetPoint("TOPRIGHT",frame,"TOPRIGHT",0,-2) |
| label:SetJustifyH("LEFT") |
| label:SetHeight(18) |
| self.label = label |
| local editbox = CreateFrame("EditBox", nil, scrollframe) |
| self.editbox = editbox |
| editbox.obj = self |
| editbox:SetPoint("TOPLEFT") |
| editbox:SetPoint("BOTTOMLEFT") |
| editbox:SetHeight(50) |
| editbox:SetWidth(50) |
| editbox:SetMultiLine(true) |
| -- editbox:SetMaxLetters(7500) |
| editbox:SetTextInsets(5, 5, 3, 3) |
| editbox:EnableMouse(true) |
| editbox:SetAutoFocus(false) |
| editbox:SetFontObject(ChatFontNormal) |
| scrollframe:SetScrollChild(editbox) |
| local widgetNum = AceGUI:GetNextWidgetNum(Type) |
| local button = CreateFrame("Button",nil,scrollframe,"UIPanelButtonTemplate") |
| button:SetWidth(80) |
| button:SetHeight(20) |
| button:SetPoint("BOTTOMLEFT",frame,"BOTTOMLEFT",0,2) |
| button:SetText(ACCEPT) |
| button:SetScript("OnClick", Button_OnClick) |
| button:SetFrameLevel(editbox:GetFrameLevel() + 1) |
| button:Disable() |
| button:Hide() |
| self.button = button |
| button.obj = self |
| scrollframe:EnableMouse(true) |
| scrollframe:SetScript("OnMouseUp", function() editbox:SetFocus() end) |
| scrollframe:SetScript("OnEnter", function(this) this.obj:Fire("OnEnter") end) |
| scrollframe:SetScript("OnLeave", function(this) this.obj:Fire("OnLeave") end) |
| editbox:SetScript("OnEnter", function(this) this.obj:Fire("OnEnter") end) |
| editbox:SetScript("OnLeave", function(this) this.obj:Fire("OnLeave") end) |
| local function FixSize() |
| --scrollchild:SetHeight(scrollframe:GetHeight()) |
| --scrollchild:SetWidth(scrollframe:GetWidth()) |
| editbox:SetWidth(scrollframe:GetWidth()) |
| end |
| scrollframe:SetScript("OnShow", FixSize) |
| scrollframe:SetScript("OnSizeChanged", FixSize) |
| local label = frame:CreateFontString(nil, "OVERLAY", "GameFontNormalSmall") |
| label:SetPoint("TOPLEFT", frame, "TOPLEFT", 0, -4) |
| label:SetPoint("TOPRIGHT", frame, "TOPRIGHT", 0, -4) |
| label:SetJustifyH("LEFT") |
| label:SetText(ACCEPT) |
| label:SetHeight(10) |
| local button = CreateFrame("Button", ("%s%dButton"):format(Type, widgetNum), frame, "UIPanelButtonTemplate2") |
| button:SetPoint("BOTTOMLEFT", frame, "BOTTOMLEFT", 0, 4) |
| button:SetHeight(22) |
| button:SetWidth(label:GetStringWidth() + 24) |
| button:SetText(ACCEPT) |
| button:SetScript("OnClick", OnClick) |
| button:Disable() |
| editbox:SetScript("OnEscapePressed", editbox.ClearFocus) |
| editbox:SetScript("OnTextChanged", function(_, ...) |
| scrollframe:UpdateScrollChildRect() |
| local value = editbox:GetText() |
| if value ~= self.lasttext then |
| self:Fire("OnTextChanged", value) |
| self.lasttext = value |
| self.button:Enable() |
| end |
| end) |
| editbox:SetScript("OnReceiveDrag", EditBox_OnReceiveDrag) |
| editbox:SetScript("OnMouseDown", EditBox_OnReceiveDrag) |
| do |
| local cursorOffset, cursorHeight |
| local idleTime |
| local function FixScroll(_, elapsed) |
| if cursorOffset and cursorHeight then |
| idleTime = 0 |
| local height = scrollframe:GetHeight() |
| local range = scrollframe:GetVerticalScrollRange() |
| local scroll = scrollframe:GetVerticalScroll() |
| local size = height + range |
| cursorOffset = -cursorOffset |
| while cursorOffset < scroll do |
| scroll = scroll - (height / 2) |
| if scroll < 0 then scroll = 0 end |
| scrollframe:SetVerticalScroll(scroll) |
| end |
| while cursorOffset + cursorHeight > scroll + height and scroll < range do |
| scroll = scroll + (height / 2) |
| if scroll > range then scroll = range end |
| scrollframe:SetVerticalScroll(scroll) |
| end |
| elseif not idleTime or idleTime > 2 then |
| frame:SetScript("OnUpdate", nil) |
| idleTime = nil |
| else |
| idleTime = idleTime + elapsed |
| end |
| cursorOffset = nil |
| end |
| editbox:SetScript("OnCursorChanged", function(_, x, y, w, h) |
| cursorOffset, cursorHeight = y, h |
| if not idleTime then |
| frame:SetScript("OnUpdate", FixScroll) |
| end |
| end) |
| end |
| AceGUI:RegisterAsWidget(self) |
| return self |
| end |
| local text = button:GetFontString() |
| text:ClearAllPoints() |
| text:SetPoint("TOPLEFT", button, "TOPLEFT", 5, -5) |
| text:SetPoint("BOTTOMRIGHT", button, "BOTTOMRIGHT", -5, 1) |
| text:SetJustifyV("MIDDLE") |
| AceGUI:RegisterWidgetType(Type, Constructor, Version) |
| end |
| local scrollBG = CreateFrame("Frame", nil, frame) |
| scrollBG:SetBackdrop(backdrop) |
| scrollBG:SetBackdropColor(0, 0, 0) |
| scrollBG:SetBackdropBorderColor(0.4, 0.4, 0.4) |
| local scrollFrame = CreateFrame("ScrollFrame", ("%s%dScrollFrame"):format(Type, widgetNum), frame, "UIPanelScrollFrameTemplate") |
| local scrollBar = _G[scrollFrame:GetName() .. "ScrollBar"] |
| scrollBar:ClearAllPoints() |
| scrollBar:SetPoint("TOP", label, "BOTTOM", 0, -19) |
| scrollBar:SetPoint("BOTTOM", button, "TOP", 0, 18) |
| scrollBar:SetPoint("RIGHT", frame, "RIGHT") |
| scrollBG:SetPoint("TOPRIGHT", scrollBar, "TOPLEFT", 0, 19) |
| scrollBG:SetPoint("BOTTOMLEFT", button, "TOPLEFT") |
| scrollFrame:SetPoint("TOPLEFT", scrollBG, "TOPLEFT", 5, -6) |
| scrollFrame:SetPoint("BOTTOMRIGHT", scrollBG, "BOTTOMRIGHT", -4, 4) |
| scrollFrame:SetScript("OnEnter", OnEnter) |
| scrollFrame:SetScript("OnLeave", OnLeave) |
| scrollFrame:SetScript("OnMouseUp", OnMouseUp) |
| scrollFrame:SetScript("OnReceiveDrag", OnReceiveDrag) |
| scrollFrame:SetScript("OnSizeChanged", OnSizeChanged) |
| scrollFrame:HookScript("OnVerticalScroll", OnVerticalScroll) |
| local editBox = CreateFrame("EditBox", nil, scrollFrame) |
| editBox:SetAllPoints() |
| editBox:SetFontObject(ChatFontNormal) |
| editBox:SetMultiLine(true) |
| editBox:EnableMouse(true) |
| editBox:SetAutoFocus(false) |
| editBox:SetCountInvisibleLetters(false) |
| editBox:SetScript("OnCursorChanged", OnCursorChanged) |
| editBox:SetScript("OnEditFocusLost", OnEditFocusLost) |
| editBox:SetScript("OnEnter", OnEnter) |
| editBox:SetScript("OnEscapePressed", editBox.ClearFocus) |
| editBox:SetScript("OnLeave", OnLeave) |
| editBox:SetScript("OnMouseDown", OnReceiveDrag) |
| editBox:SetScript("OnReceiveDrag", OnReceiveDrag) |
| editBox:SetScript("OnTextChanged", OnTextChanged) |
| editBox:SetScript("OnTextSet", OnTextSet) |
| scrollFrame:SetScrollChild(editBox) |
| local widget = { |
| button = button, |
| editBox = editBox, |
| frame = frame, |
| label = label, |
| labelHeight = 10, |
| scrollBar = scrollBar, |
| scrollFrame = scrollFrame, |
| type = Type |
| } |
| for method, func in pairs(methods) do |
| widget[method] = func |
| end |
| button.obj, editBox.obj, scrollFrame.obj = widget, widget, widget |
| AceGUI:RegisterAsWidget(widget) |
| return widget |
| end |
| AceGUI:RegisterWidgetType(Type, Constructor, Version) |
AceGUI-3.0/widgets/AceGUIWidget-Slider.lua
1,125 → 1,178
| local AceGUI = LibStub("AceGUI-3.0") |
| --[[----------------------------------------------------------------------------- |
| Slider Widget |
| Graphical Slider, like, for Range values. |
| -------------------------------------------------------------------------------]] |
| local Type, Version = "Slider", 20 |
| local AceGUI = LibStub and LibStub("AceGUI-3.0", true) |
| if not AceGUI or (AceGUI:GetWidgetVersion(Type) or 0) >= Version then return end |
| -------------------------- |
| -- Slider -- |
| -------------------------- |
| do |
| local Type = "Slider" |
| local Version = 7 |
| local function OnAcquire(self) |
| self:SetWidth(200) |
| self:SetHeight(44) |
| self:SetDisabled(false) |
| self:SetIsPercent(nil) |
| self:SetSliderValues(0,100,1) |
| self:SetValue(0) |
| -- Lua APIs |
| local min, max, floor = math.min, math.max, math.floor |
| local tonumber, pairs = tonumber, pairs |
| -- WoW APIs |
| local PlaySound = PlaySound |
| local CreateFrame, UIParent = CreateFrame, UIParent |
| -- Global vars/functions that we don't upvalue since they might get hooked, or upgraded |
| -- List them here for Mikk's FindGlobals script |
| -- GLOBALS: GameFontHighlightSmall |
| --[[----------------------------------------------------------------------------- |
| Support functions |
| -------------------------------------------------------------------------------]] |
| local function UpdateText(self) |
| local value = self.value or 0 |
| if self.ispercent then |
| self.editbox:SetText(("%s%%"):format(floor(value * 1000 + 0.5) / 10)) |
| else |
| self.editbox:SetText(floor(value * 100 + 0.5) / 100) |
| end |
| local function OnRelease(self) |
| self.frame:ClearAllPoints() |
| self.frame:Hide() |
| self.slider:EnableMouseWheel(false) |
| self:SetDisabled(false) |
| end |
| local function UpdateLabels(self) |
| local min, max = (self.min or 0), (self.max or 100) |
| if self.ispercent then |
| self.lowtext:SetFormattedText("%s%%", (min * 100)) |
| self.hightext:SetFormattedText("%s%%", (max * 100)) |
| else |
| self.lowtext:SetText(min) |
| self.hightext:SetText(max) |
| end |
| end |
| local function Control_OnEnter(this) |
| this.obj:Fire("OnEnter") |
| end |
| local function Control_OnLeave(this) |
| this.obj:Fire("OnLeave") |
| end |
| local function UpdateText(self) |
| local value = self.value or 0 |
| if self.ispercent then |
| self.editbox:SetText(("%s%%"):format(math.floor(value*1000+0.5)/10)) |
| else |
| self.editbox:SetText(math.floor(value*100+0.5)/100) |
| --[[----------------------------------------------------------------------------- |
| Scripts |
| -------------------------------------------------------------------------------]] |
| local function Control_OnEnter(frame) |
| frame.obj:Fire("OnEnter") |
| end |
| local function Control_OnLeave(frame) |
| frame.obj:Fire("OnLeave") |
| end |
| local function Frame_OnMouseDown(frame) |
| frame.obj.slider:EnableMouseWheel(true) |
| AceGUI:ClearFocus() |
| end |
| local function Slider_OnValueChanged(frame) |
| local self = frame.obj |
| if not frame.setup then |
| local newvalue = frame:GetValue() |
| if newvalue ~= self.value and not self.disabled then |
| self.value = newvalue |
| self:Fire("OnValueChanged", newvalue) |
| end |
| if self.value then |
| UpdateText(self) |
| end |
| end |
| local function UpdateLabels(self) |
| local min, max = (self.min or 0), (self.max or 100) |
| if self.ispercent then |
| self.lowtext:SetFormattedText("%s%%",(min * 100)) |
| self.hightext:SetFormattedText("%s%%",(max * 100)) |
| end |
| local function Slider_OnMouseUp(frame) |
| local self = frame.obj |
| self:Fire("OnMouseUp", self.value) |
| end |
| local function Slider_OnMouseWheel(frame, v) |
| local self = frame.obj |
| if not self.disabled then |
| local value = self.value |
| if v > 0 then |
| value = min(value + (self.step or 1), self.max) |
| else |
| self.lowtext:SetText(min) |
| self.hightext:SetText(max) |
| value = max(value - (self.step or 1), self.min) |
| end |
| self.slider:SetValue(value) |
| end |
| local function Slider_OnValueChanged(this) |
| local self = this.obj |
| if not this.setup then |
| local newvalue |
| newvalue = this:GetValue() |
| if newvalue ~= self.value and not self.disabled then |
| self.value = newvalue |
| self:Fire("OnValueChanged", newvalue) |
| end |
| if self.value then |
| local value = self.value |
| UpdateText(self) |
| end |
| end |
| end |
| local function EditBox_OnEscapePressed(frame) |
| frame:ClearFocus() |
| end |
| local function EditBox_OnEnterPressed(frame) |
| local self = frame.obj |
| local value = frame:GetText() |
| if self.ispercent then |
| value = value:gsub('%%', '') |
| value = tonumber(value) / 100 |
| else |
| value = tonumber(value) |
| end |
| local function Slider_OnMouseUp(this) |
| local self = this.obj |
| self:Fire("OnMouseUp",this:GetValue()) |
| if value then |
| PlaySound("igMainMenuOptionCheckBoxOn") |
| self.slider:SetValue(value) |
| self:Fire("OnMouseUp", value) |
| end |
| local function Slider_OnMouseWheel(this, v) |
| local self = this.obj |
| if not self.disabled then |
| local value = self.value |
| if v > 0 then |
| value = math.min(value + (self.step or 1),self.max) |
| else |
| value = math.max(value - (self.step or 1), self.min) |
| end |
| self.slider:SetValue(value) |
| end |
| end |
| local function SetDisabled(self, disabled) |
| end |
| local function EditBox_OnEnter(frame) |
| frame:SetBackdropBorderColor(0.5, 0.5, 0.5, 1) |
| end |
| local function EditBox_OnLeave(frame) |
| frame:SetBackdropBorderColor(0.3, 0.3, 0.3, 0.8) |
| end |
| --[[----------------------------------------------------------------------------- |
| Methods |
| -------------------------------------------------------------------------------]] |
| local methods = { |
| ["OnAcquire"] = function(self) |
| self:SetWidth(200) |
| self:SetHeight(44) |
| self:SetDisabled(false) |
| self:SetIsPercent(nil) |
| self:SetSliderValues(0,100,1) |
| self:SetValue(0) |
| self.slider:EnableMouseWheel(false) |
| end, |
| -- ["OnRelease"] = nil, |
| ["SetDisabled"] = function(self, disabled) |
| self.disabled = disabled |
| if disabled then |
| self.slider:EnableMouse(false) |
| self.label:SetTextColor(.5,.5,.5) |
| self.hightext:SetTextColor(.5,.5,.5) |
| self.lowtext:SetTextColor(.5,.5,.5) |
| --self.valuetext:SetTextColor(.5,.5,.5) |
| self.editbox:SetTextColor(.5,.5,.5) |
| self.label:SetTextColor(.5, .5, .5) |
| self.hightext:SetTextColor(.5, .5, .5) |
| self.lowtext:SetTextColor(.5, .5, .5) |
| --self.valuetext:SetTextColor(.5, .5, .5) |
| self.editbox:SetTextColor(.5, .5, .5) |
| self.editbox:EnableMouse(false) |
| self.editbox:ClearFocus() |
| else |
| self.slider:EnableMouse(true) |
| self.label:SetTextColor(1,.82,0) |
| self.hightext:SetTextColor(1,1,1) |
| self.lowtext:SetTextColor(1,1,1) |
| --self.valuetext:SetTextColor(1,1,1) |
| self.editbox:SetTextColor(1,1,1) |
| self.label:SetTextColor(1, .82, 0) |
| self.hightext:SetTextColor(1, 1, 1) |
| self.lowtext:SetTextColor(1, 1, 1) |
| --self.valuetext:SetTextColor(1, 1, 1) |
| self.editbox:SetTextColor(1, 1, 1) |
| self.editbox:EnableMouse(true) |
| end |
| end |
| local function SetValue(self, value) |
| end, |
| ["SetValue"] = function(self, value) |
| self.slider.setup = true |
| self.slider:SetValue(value) |
| self.value = value |
| UpdateText(self) |
| self.slider.setup = nil |
| end |
| local function SetLabel(self, text) |
| end, |
| ["GetValue"] = function(self) |
| return self.value |
| end, |
| ["SetLabel"] = function(self, text) |
| self.label:SetText(text) |
| end |
| local function SetSliderValues(self, min, max, step) |
| end, |
| ["SetSliderValues"] = function(self, min, max, step) |
| local frame = self.slider |
| frame.setup = true |
| self.min = min |
128,128 → 181,101
| frame:SetMinMaxValues(min or 0,max or 100) |
| UpdateLabels(self) |
| frame:SetValueStep(step or 1) |
| if self.value then |
| frame:SetValue(self.value) |
| end |
| frame.setup = nil |
| end |
| local function EditBox_OnEscapePressed(this) |
| this:ClearFocus() |
| end |
| local function EditBox_OnEnterPressed(this) |
| local self = this.obj |
| local value = this:GetText() |
| if self.ispercent then |
| value = value:gsub('%%','') |
| value = tonumber(value) / 100 |
| else |
| value = tonumber(value) |
| end |
| if value then |
| self:Fire("OnMouseUp",value) |
| end |
| end |
| local function SetIsPercent(self, value) |
| end, |
| ["SetIsPercent"] = function(self, value) |
| self.ispercent = value |
| UpdateLabels(self) |
| UpdateText(self) |
| end |
| local function FrameOnMouseDown(this) |
| this.obj.slider:EnableMouseWheel(true) |
| AceGUI:ClearFocus() |
| end |
| local SliderBackdrop = { |
| bgFile = "Interface\\Buttons\\UI-SliderBar-Background", |
| edgeFile = "Interface\\Buttons\\UI-SliderBar-Border", |
| tile = true, tileSize = 8, edgeSize = 8, |
| insets = { left = 3, right = 3, top = 6, bottom = 6 } |
| } |
| local function Constructor() |
| local frame = CreateFrame("Frame",nil,UIParent) |
| local self = {} |
| self.type = Type |
| } |
| self.OnRelease = OnRelease |
| self.OnAcquire = OnAcquire |
| self.frame = frame |
| frame.obj = self |
| self.SetDisabled = SetDisabled |
| self.SetValue = SetValue |
| self.SetSliderValues = SetSliderValues |
| self.SetLabel = SetLabel |
| self.SetIsPercent = SetIsPercent |
| self.alignoffset = 25 |
| frame:EnableMouse(true) |
| frame:SetScript("OnMouseDown",FrameOnMouseDown) |
| self.slider = CreateFrame("Slider",nil,frame) |
| local slider = self.slider |
| slider:SetScript("OnEnter",Control_OnEnter) |
| slider:SetScript("OnLeave",Control_OnLeave) |
| slider:SetScript("OnMouseUp", Slider_OnMouseUp) |
| slider.obj = self |
| slider:SetOrientation("HORIZONTAL") |
| slider:SetHeight(15) |
| slider:SetHitRectInsets(0,0,-10,0) |
| slider:SetBackdrop(SliderBackdrop) |
| --slider:EnableMouseWheel(true) |
| slider:SetScript("OnMouseWheel", Slider_OnMouseWheel) |
| local label = frame:CreateFontString(nil,"OVERLAY","GameFontNormal") |
| label:SetPoint("TOPLEFT",frame,"TOPLEFT",0,0) |
| label:SetPoint("TOPRIGHT",frame,"TOPRIGHT",0,0) |
| label:SetJustifyH("CENTER") |
| label:SetHeight(15) |
| self.label = label |
| self.lowtext = slider:CreateFontString(nil,"ARTWORK","GameFontHighlightSmall") |
| self.lowtext:SetPoint("TOPLEFT",slider,"BOTTOMLEFT",2,3) |
| self.hightext = slider:CreateFontString(nil,"ARTWORK","GameFontHighlightSmall") |
| self.hightext:SetPoint("TOPRIGHT",slider,"BOTTOMRIGHT",-2,3) |
| local editbox = CreateFrame("EditBox",nil,frame) |
| editbox:SetAutoFocus(false) |
| editbox:SetFontObject(GameFontHighlightSmall) |
| editbox:SetPoint("TOP",slider,"BOTTOM",0,0) |
| editbox:SetHeight(14) |
| editbox:SetWidth(70) |
| editbox:SetJustifyH("CENTER") |
| editbox:EnableMouse(true) |
| editbox:SetScript("OnEscapePressed",EditBox_OnEscapePressed) |
| editbox:SetScript("OnEnterPressed",EditBox_OnEnterPressed) |
| self.editbox = editbox |
| editbox.obj = self |
| local bg = editbox:CreateTexture(nil,"BACKGROUND") |
| editbox.bg = bg |
| bg:SetTexture("Interface\\ChatFrame\\ChatFrameBackground") |
| bg:SetVertexColor(0,0,0,0.25) |
| bg:SetAllPoints(editbox) |
| slider:SetThumbTexture("Interface\\Buttons\\UI-SliderBar-Button-Horizontal") |
| frame:SetWidth(200) |
| frame:SetHeight(44) |
| slider:SetPoint("TOP",label,"BOTTOM",0,0) |
| slider:SetPoint("LEFT",frame,"LEFT",3,0) |
| slider:SetPoint("RIGHT",frame,"RIGHT",-3,0) |
| --[[----------------------------------------------------------------------------- |
| Constructor |
| -------------------------------------------------------------------------------]] |
| local SliderBackdrop = { |
| bgFile = "Interface\\Buttons\\UI-SliderBar-Background", |
| edgeFile = "Interface\\Buttons\\UI-SliderBar-Border", |
| tile = true, tileSize = 8, edgeSize = 8, |
| insets = { left = 3, right = 3, top = 6, bottom = 6 } |
| } |
| slider:SetValue(self.value or 0) |
| slider:SetScript("OnValueChanged",Slider_OnValueChanged) |
| AceGUI:RegisterAsWidget(self) |
| return self |
| local ManualBackdrop = { |
| bgFile = "Interface\\ChatFrame\\ChatFrameBackground", |
| edgeFile = "Interface\\ChatFrame\\ChatFrameBackground", |
| tile = true, edgeSize = 1, tileSize = 5, |
| } |
| local function Constructor() |
| local frame = CreateFrame("Frame", nil, UIParent) |
| frame:EnableMouse(true) |
| frame:SetScript("OnMouseDown", Frame_OnMouseDown) |
| local label = frame:CreateFontString(nil, "OVERLAY", "GameFontNormal") |
| label:SetPoint("TOPLEFT") |
| label:SetPoint("TOPRIGHT") |
| label:SetJustifyH("CENTER") |
| label:SetHeight(15) |
| local slider = CreateFrame("Slider", nil, frame) |
| slider:SetOrientation("HORIZONTAL") |
| slider:SetHeight(15) |
| slider:SetHitRectInsets(0, 0, -10, 0) |
| slider:SetBackdrop(SliderBackdrop) |
| slider:SetThumbTexture("Interface\\Buttons\\UI-SliderBar-Button-Horizontal") |
| slider:SetPoint("TOP", label, "BOTTOM") |
| slider:SetPoint("LEFT", 3, 0) |
| slider:SetPoint("RIGHT", -3, 0) |
| slider:SetValue(0) |
| slider:SetScript("OnValueChanged",Slider_OnValueChanged) |
| slider:SetScript("OnEnter", Control_OnEnter) |
| slider:SetScript("OnLeave", Control_OnLeave) |
| slider:SetScript("OnMouseUp", Slider_OnMouseUp) |
| slider:SetScript("OnMouseWheel", Slider_OnMouseWheel) |
| local lowtext = slider:CreateFontString(nil, "ARTWORK", "GameFontHighlightSmall") |
| lowtext:SetPoint("TOPLEFT", slider, "BOTTOMLEFT", 2, 3) |
| local hightext = slider:CreateFontString(nil, "ARTWORK", "GameFontHighlightSmall") |
| hightext:SetPoint("TOPRIGHT", slider, "BOTTOMRIGHT", -2, 3) |
| local editbox = CreateFrame("EditBox", nil, frame) |
| editbox:SetAutoFocus(false) |
| editbox:SetFontObject(GameFontHighlightSmall) |
| editbox:SetPoint("TOP", slider, "BOTTOM") |
| editbox:SetHeight(14) |
| editbox:SetWidth(70) |
| editbox:SetJustifyH("CENTER") |
| editbox:EnableMouse(true) |
| editbox:SetBackdrop(ManualBackdrop) |
| editbox:SetBackdropColor(0, 0, 0, 0.5) |
| editbox:SetBackdropBorderColor(0.3, 0.3, 0.30, 0.80) |
| editbox:SetScript("OnEnter", EditBox_OnEnter) |
| editbox:SetScript("OnLeave", EditBox_OnLeave) |
| editbox:SetScript("OnEnterPressed", EditBox_OnEnterPressed) |
| editbox:SetScript("OnEscapePressed", EditBox_OnEscapePressed) |
| local widget = { |
| label = label, |
| slider = slider, |
| lowtext = lowtext, |
| hightext = hightext, |
| editbox = editbox, |
| alignoffset = 25, |
| frame = frame, |
| type = Type |
| } |
| for method, func in pairs(methods) do |
| widget[method] = func |
| end |
| AceGUI:RegisterWidgetType(Type,Constructor,Version) |
| slider.obj, editbox.obj = widget, widget |
| return AceGUI:RegisterAsWidget(widget) |
| end |
| AceGUI:RegisterWidgetType(Type,Constructor,Version) |
AceGUI-3.0/widgets/AceGUIContainer-TabGroup.lua
New file
0,0 → 1,348
| --[[----------------------------------------------------------------------------- |
| TabGroup Container |
| Container that uses tabs on top to switch between groups. |
| -------------------------------------------------------------------------------]] |
| local Type, Version = "TabGroup", 30 |
| local AceGUI = LibStub and LibStub("AceGUI-3.0", true) |
| if not AceGUI or (AceGUI:GetWidgetVersion(Type) or 0) >= Version then return end |
| -- Lua APIs |
| local pairs, ipairs, assert, type, wipe = pairs, ipairs, assert, type, wipe |
| -- WoW APIs |
| local PlaySound = PlaySound |
| local CreateFrame, UIParent = CreateFrame, UIParent |
| local _G = _G |
| -- Global vars/functions that we don't upvalue since they might get hooked, or upgraded |
| -- List them here for Mikk's FindGlobals script |
| -- GLOBALS: PanelTemplates_TabResize, PanelTemplates_SetDisabledTabState, PanelTemplates_SelectTab, PanelTemplates_DeselectTab |
| -- local upvalue storage used by BuildTabs |
| local widths = {} |
| local rowwidths = {} |
| local rowends = {} |
| --[[----------------------------------------------------------------------------- |
| Support functions |
| -------------------------------------------------------------------------------]] |
| local function UpdateTabLook(frame) |
| if frame.disabled then |
| PanelTemplates_SetDisabledTabState(frame) |
| elseif frame.selected then |
| PanelTemplates_SelectTab(frame) |
| else |
| PanelTemplates_DeselectTab(frame) |
| end |
| end |
| local function Tab_SetText(frame, text) |
| frame:_SetText(text) |
| local width = frame.obj.frame.width or frame.obj.frame:GetWidth() or 0 |
| PanelTemplates_TabResize(frame, 0, nil, width) |
| end |
| local function Tab_SetSelected(frame, selected) |
| frame.selected = selected |
| UpdateTabLook(frame) |
| end |
| local function Tab_SetDisabled(frame, disabled) |
| frame.disabled = disabled |
| UpdateTabLook(frame) |
| end |
| local function BuildTabsOnUpdate(frame) |
| local self = frame.obj |
| self:BuildTabs() |
| frame:SetScript("OnUpdate", nil) |
| end |
| --[[----------------------------------------------------------------------------- |
| Scripts |
| -------------------------------------------------------------------------------]] |
| local function Tab_OnClick(frame) |
| if not (frame.selected or frame.disabled) then |
| PlaySound("igCharacterInfoTab") |
| frame.obj:SelectTab(frame.value) |
| end |
| end |
| local function Tab_OnEnter(frame) |
| local self = frame.obj |
| self:Fire("OnTabEnter", self.tabs[frame.id].value, frame) |
| end |
| local function Tab_OnLeave(frame) |
| local self = frame.obj |
| self:Fire("OnTabLeave", self.tabs[frame.id].value, frame) |
| end |
| local function Tab_OnShow(frame) |
| _G[frame:GetName().."HighlightTexture"]:SetWidth(frame:GetTextWidth() + 30) |
| end |
| --[[----------------------------------------------------------------------------- |
| Methods |
| -------------------------------------------------------------------------------]] |
| local methods = { |
| ["OnAcquire"] = function(self) |
| self:SetTitle() |
| end, |
| ["OnRelease"] = function(self) |
| self.status = nil |
| for k in pairs(self.localstatus) do |
| self.localstatus[k] = nil |
| end |
| self.tablist = nil |
| for _, tab in pairs(self.tabs) do |
| tab:Hide() |
| end |
| end, |
| ["CreateTab"] = function(self, id) |
| local tabname = ("AceGUITabGroup%dTab%d"):format(self.num, id) |
| local tab = CreateFrame("Button", tabname, self.border, "OptionsFrameTabButtonTemplate") |
| tab.obj = self |
| tab.id = id |
| tab.text = _G[tabname .. "Text"] |
| tab.text:ClearAllPoints() |
| tab.text:SetPoint("LEFT", 14, -3) |
| tab.text:SetPoint("RIGHT", -12, -3) |
| tab:SetScript("OnClick", Tab_OnClick) |
| tab:SetScript("OnEnter", Tab_OnEnter) |
| tab:SetScript("OnLeave", Tab_OnLeave) |
| tab:SetScript("OnShow", Tab_OnShow) |
| tab._SetText = tab.SetText |
| tab.SetText = Tab_SetText |
| tab.SetSelected = Tab_SetSelected |
| tab.SetDisabled = Tab_SetDisabled |
| return tab |
| end, |
| ["SetTitle"] = function(self, text) |
| self.titletext:SetText(text or "") |
| if text and text ~= "" then |
| self.alignoffset = 25 |
| else |
| self.alignoffset = 18 |
| end |
| self:BuildTabs() |
| end, |
| ["SetStatusTable"] = function(self, status) |
| assert(type(status) == "table") |
| self.status = status |
| end, |
| ["SelectTab"] = function(self, value) |
| local status = self.status or self.localstatus |
| local found |
| for i, v in ipairs(self.tabs) do |
| if v.value == value then |
| v:SetSelected(true) |
| found = true |
| else |
| v:SetSelected(false) |
| end |
| end |
| status.selected = value |
| if found then |
| self:Fire("OnGroupSelected",value) |
| end |
| end, |
| ["SetTabs"] = function(self, tabs) |
| self.tablist = tabs |
| self:BuildTabs() |
| end, |
| ["BuildTabs"] = function(self) |
| local hastitle = (self.titletext:GetText() and self.titletext:GetText() ~= "") |
| local status = self.status or self.localstatus |
| local tablist = self.tablist |
| local tabs = self.tabs |
| if not tablist then return end |
| local width = self.frame.width or self.frame:GetWidth() or 0 |
| wipe(widths) |
| wipe(rowwidths) |
| wipe(rowends) |
| --Place Text into tabs and get thier initial width |
| for i, v in ipairs(tablist) do |
| local tab = tabs[i] |
| if not tab then |
| tab = self:CreateTab(i) |
| tabs[i] = tab |
| end |
| tab:Show() |
| tab:SetText(v.text) |
| tab:SetDisabled(v.disabled) |
| tab.value = v.value |
| widths[i] = tab:GetWidth() - 6 --tabs are anchored 10 pixels from the right side of the previous one to reduce spacing, but add a fixed 4px padding for the text |
| end |
| for i = (#tablist)+1, #tabs, 1 do |
| tabs[i]:Hide() |
| end |
| --First pass, find the minimum number of rows needed to hold all tabs and the initial tab layout |
| local numtabs = #tablist |
| local numrows = 1 |
| local usedwidth = 0 |
| for i = 1, #tablist do |
| --If this is not the first tab of a row and there isn't room for it |
| if usedwidth ~= 0 and (width - usedwidth - widths[i]) < 0 then |
| rowwidths[numrows] = usedwidth + 10 --first tab in each row takes up an extra 10px |
| rowends[numrows] = i - 1 |
| numrows = numrows + 1 |
| usedwidth = 0 |
| end |
| usedwidth = usedwidth + widths[i] |
| end |
| rowwidths[numrows] = usedwidth + 10 --first tab in each row takes up an extra 10px |
| rowends[numrows] = #tablist |
| --Fix for single tabs being left on the last row, move a tab from the row above if applicable |
| if numrows > 1 then |
| --if the last row has only one tab |
| if rowends[numrows-1] == numtabs-1 then |
| --if there are more than 2 tabs in the 2nd last row |
| if (numrows == 2 and rowends[numrows-1] > 2) or (rowends[numrows] - rowends[numrows-1] > 2) then |
| --move 1 tab from the second last row to the last, if there is enough space |
| if (rowwidths[numrows] + widths[numtabs-1]) <= width then |
| rowends[numrows-1] = rowends[numrows-1] - 1 |
| rowwidths[numrows] = rowwidths[numrows] + widths[numtabs-1] |
| rowwidths[numrows-1] = rowwidths[numrows-1] - widths[numtabs-1] |
| end |
| end |
| end |
| end |
| --anchor the rows as defined and resize tabs to fill thier row |
| local starttab = 1 |
| for row, endtab in ipairs(rowends) do |
| local first = true |
| for tabno = starttab, endtab do |
| local tab = tabs[tabno] |
| tab:ClearAllPoints() |
| if first then |
| tab:SetPoint("TOPLEFT", self.frame, "TOPLEFT", 0, -(hastitle and 14 or 7)-(row-1)*20 ) |
| first = false |
| else |
| tab:SetPoint("LEFT", tabs[tabno-1], "RIGHT", -10, 0) |
| end |
| end |
| -- equal padding for each tab to fill the available width, |
| -- if the used space is above 75% already |
| local padding = 0 |
| if not (numrows == 1 and rowwidths[1] < width*0.75) then |
| padding = (width - rowwidths[row]) / (endtab - starttab+1) |
| end |
| for i = starttab, endtab do |
| PanelTemplates_TabResize(tabs[i], padding + 4, nil, width) |
| end |
| starttab = endtab + 1 |
| end |
| self.borderoffset = (hastitle and 17 or 10)+((numrows)*20) |
| self.border:SetPoint("TOPLEFT", 1, -self.borderoffset) |
| end, |
| ["OnWidthSet"] = function(self, width) |
| local content = self.content |
| local contentwidth = width - 60 |
| if contentwidth < 0 then |
| contentwidth = 0 |
| end |
| content:SetWidth(contentwidth) |
| content.width = contentwidth |
| self:BuildTabs(self) |
| self.frame:SetScript("OnUpdate", BuildTabsOnUpdate) |
| end, |
| ["OnHeightSet"] = function(self, height) |
| local content = self.content |
| local contentheight = height - (self.borderoffset + 23) |
| if contentheight < 0 then |
| contentheight = 0 |
| end |
| content:SetHeight(contentheight) |
| content.height = contentheight |
| end, |
| ["LayoutFinished"] = function(self, width, height) |
| if self.noAutoHeight then return end |
| self:SetHeight((height or 0) + (self.borderoffset + 23)) |
| end |
| } |
| --[[----------------------------------------------------------------------------- |
| Constructor |
| -------------------------------------------------------------------------------]] |
| local PaneBackdrop = { |
| bgFile = "Interface\\ChatFrame\\ChatFrameBackground", |
| edgeFile = "Interface\\Tooltips\\UI-Tooltip-Border", |
| tile = true, tileSize = 16, edgeSize = 16, |
| insets = { left = 3, right = 3, top = 5, bottom = 3 } |
| } |
| local function Constructor() |
| local num = AceGUI:GetNextWidgetNum(Type) |
| local frame = CreateFrame("Frame",nil,UIParent) |
| frame:SetHeight(100) |
| frame:SetWidth(100) |
| frame:SetFrameStrata("FULLSCREEN_DIALOG") |
| local titletext = frame:CreateFontString(nil,"OVERLAY","GameFontNormal") |
| titletext:SetPoint("TOPLEFT", 14, 0) |
| titletext:SetPoint("TOPRIGHT", -14, 0) |
| titletext:SetJustifyH("LEFT") |
| titletext:SetHeight(18) |
| titletext:SetText("") |
| local border = CreateFrame("Frame", nil, frame) |
| border:SetPoint("TOPLEFT", 1, -27) |
| border:SetPoint("BOTTOMRIGHT", -1, 3) |
| border:SetBackdrop(PaneBackdrop) |
| border:SetBackdropColor(0.1, 0.1, 0.1, 0.5) |
| border:SetBackdropBorderColor(0.4, 0.4, 0.4) |
| local content = CreateFrame("Frame", nil, border) |
| content:SetPoint("TOPLEFT", 10, -7) |
| content:SetPoint("BOTTOMRIGHT", -10, 7) |
| local widget = { |
| num = num, |
| frame = frame, |
| localstatus = {}, |
| alignoffset = 18, |
| titletext = titletext, |
| border = border, |
| borderoffset = 27, |
| tabs = {}, |
| content = content, |
| type = Type |
| } |
| for method, func in pairs(methods) do |
| widget[method] = func |
| end |
| return AceGUI:RegisterAsContainer(widget) |
| end |
| AceGUI:RegisterWidgetType(Type, Constructor, Version) |
AceGUI-3.0/widgets/AceGUIWidget-Keybinding.lua
1,119 → 1,118
| local AceGUI = LibStub("AceGUI-3.0") |
| --[[----------------------------------------------------------------------------- |
| Keybinding Widget |
| Set Keybindings in the Config UI. |
| -------------------------------------------------------------------------------]] |
| local Type, Version = "Keybinding", 21 |
| local AceGUI = LibStub and LibStub("AceGUI-3.0", true) |
| if not AceGUI or (AceGUI:GetWidgetVersion(Type) or 0) >= Version then return end |
| -------------------------- |
| -- Keybinding -- |
| -------------------------- |
| -- Lua APIs |
| local pairs = pairs |
| do |
| local Type = "Keybinding" |
| local Version = 12 |
| -- WoW APIs |
| local IsShiftKeyDown, IsControlKeyDown, IsAltKeyDown = IsShiftKeyDown, IsControlKeyDown, IsAltKeyDown |
| local CreateFrame, UIParent = CreateFrame, UIParent |
| local ControlBackdrop = { |
| bgFile = "Interface\\Tooltips\\UI-Tooltip-Background", |
| edgeFile = "Interface\\Tooltips\\UI-Tooltip-Border", |
| tile = true, tileSize = 16, edgeSize = 16, |
| insets = { left = 3, right = 3, top = 3, bottom = 3 } |
| } |
| -- Global vars/functions that we don't upvalue since they might get hooked, or upgraded |
| -- List them here for Mikk's FindGlobals script |
| -- GLOBALS: NOT_BOUND |
| local function Control_OnEnter(this) |
| this.obj:Fire("OnEnter") |
| end |
| --[[----------------------------------------------------------------------------- |
| Scripts |
| -------------------------------------------------------------------------------]] |
| local function Control_OnLeave(this) |
| this.obj:Fire("OnLeave") |
| end |
| local function keybindingMsgFixWidth(this) |
| this:SetWidth(this.msg:GetWidth()+10) |
| this:SetScript("OnUpdate",nil) |
| end |
| local function Control_OnEnter(frame) |
| frame.obj:Fire("OnEnter") |
| end |
| local function Keybinding_OnClick(this, button) |
| if button == "LeftButton" or button == "RightButton" then |
| local self = this.obj |
| if self.waitingForKey then |
| this:EnableKeyboard(false) |
| self.msgframe:Hide() |
| this:UnlockHighlight() |
| self.waitingForKey = nil |
| else |
| this:EnableKeyboard(true) |
| self.msgframe:Show() |
| this:LockHighlight() |
| self.waitingForKey = true |
| end |
| local function Control_OnLeave(frame) |
| frame.obj:Fire("OnLeave") |
| end |
| local function Keybinding_OnClick(frame, button) |
| if button == "LeftButton" or button == "RightButton" then |
| local self = frame.obj |
| if self.waitingForKey then |
| frame:EnableKeyboard(false) |
| self.msgframe:Hide() |
| frame:UnlockHighlight() |
| self.waitingForKey = nil |
| else |
| frame:EnableKeyboard(true) |
| self.msgframe:Show() |
| frame:LockHighlight() |
| self.waitingForKey = true |
| end |
| AceGUI:ClearFocus() |
| end |
| AceGUI:ClearFocus() |
| end |
| local ignoreKeys = nil |
| local function Keybinding_OnKeyDown(this, key) |
| local self = this.obj |
| if self.waitingForKey then |
| local keyPressed = key |
| if keyPressed == "ESCAPE" then |
| keyPressed = "" |
| else |
| if not ignoreKeys then |
| ignoreKeys = { |
| ["BUTTON1"] = true, ["BUTTON2"] = true, |
| ["UNKNOWN"] = true, |
| ["LSHIFT"] = true, ["LCTRL"] = true, ["LALT"] = true, |
| ["RSHIFT"] = true, ["RCTRL"] = true, ["RALT"] = true, |
| } |
| end |
| if ignoreKeys[keyPressed] then return end |
| if IsShiftKeyDown() then |
| keyPressed = "SHIFT-"..keyPressed |
| end |
| if IsControlKeyDown() then |
| keyPressed = "CTRL-"..keyPressed |
| end |
| if IsAltKeyDown() then |
| keyPressed = "ALT-"..keyPressed |
| end |
| local ignoreKeys = { |
| ["BUTTON1"] = true, ["BUTTON2"] = true, |
| ["UNKNOWN"] = true, |
| ["LSHIFT"] = true, ["LCTRL"] = true, ["LALT"] = true, |
| ["RSHIFT"] = true, ["RCTRL"] = true, ["RALT"] = true, |
| } |
| local function Keybinding_OnKeyDown(frame, key) |
| local self = frame.obj |
| if self.waitingForKey then |
| local keyPressed = key |
| if keyPressed == "ESCAPE" then |
| keyPressed = "" |
| else |
| if ignoreKeys[keyPressed] then return end |
| if IsShiftKeyDown() then |
| keyPressed = "SHIFT-"..keyPressed |
| end |
| this:EnableKeyboard(false) |
| self.msgframe:Hide() |
| this:UnlockHighlight() |
| self.waitingForKey = nil |
| if not self.disabled then |
| self:SetKey(keyPressed) |
| self:Fire("OnKeyChanged",keyPressed) |
| if IsControlKeyDown() then |
| keyPressed = "CTRL-"..keyPressed |
| end |
| if IsAltKeyDown() then |
| keyPressed = "ALT-"..keyPressed |
| end |
| end |
| end |
| local function Keybinding_OnMouseDown(this, button) |
| if button == "LeftButton" or button == "RightButton" then |
| return |
| elseif button == "MiddleButton" then |
| button = "BUTTON3" |
| elseif button == "Button4" then |
| button = "BUTTON4" |
| elseif button == "Button5" then |
| button = "BUTTON5" |
| frame:EnableKeyboard(false) |
| self.msgframe:Hide() |
| frame:UnlockHighlight() |
| self.waitingForKey = nil |
| if not self.disabled then |
| self:SetKey(keyPressed) |
| self:Fire("OnKeyChanged", keyPressed) |
| end |
| Keybinding_OnKeyDown(this, button) |
| end |
| local function OnAcquire(self) |
| end |
| local function Keybinding_OnMouseDown(frame, button) |
| if button == "LeftButton" or button == "RightButton" then |
| return |
| elseif button == "MiddleButton" then |
| button = "BUTTON3" |
| elseif button == "Button4" then |
| button = "BUTTON4" |
| elseif button == "Button5" then |
| button = "BUTTON5" |
| end |
| Keybinding_OnKeyDown(frame, button) |
| end |
| --[[----------------------------------------------------------------------------- |
| Methods |
| -------------------------------------------------------------------------------]] |
| local methods = { |
| ["OnAcquire"] = function(self) |
| self:SetWidth(200) |
| self:SetHeight(44) |
| self:SetLabel("") |
| self:SetKey("") |
| end |
| local function OnRelease(self) |
| self.frame:ClearAllPoints() |
| self.frame:Hide() |
| self.waitingForKey = nil |
| self.msgframe:Hide() |
| end |
| local function SetDisabled(self, disabled) |
| self:SetDisabled(false) |
| end, |
| -- ["OnRelease"] = nil, |
| ["SetDisabled"] = function(self, disabled) |
| self.disabled = disabled |
| if disabled then |
| self.button:Disable() |
122,9 → 121,9
| self.button:Enable() |
| self.label:SetTextColor(1,1,1) |
| end |
| end |
| local function SetKey(self, key) |
| end, |
| ["SetKey"] = function(self, key) |
| if (key or "") == "" then |
| self.button:SetText(NOT_BOUND) |
| self.button:SetNormalFontObject("GameFontNormal") |
132,9 → 131,17
| self.button:SetText(key) |
| self.button:SetNormalFontObject("GameFontHighlight") |
| end |
| end |
| local function SetLabel(self, label) |
| end, |
| ["GetKey"] = function(self) |
| local key = self.button:GetText() |
| if key == NOT_BOUND then |
| key = nil |
| end |
| return key |
| end, |
| ["SetLabel"] = function(self, label) |
| self.label:SetText(label or "") |
| if (label or "") == "" then |
| self.alignoffset = nil |
143,77 → 150,81
| self.alignoffset = 30 |
| self:SetHeight(44) |
| end |
| end |
| end, |
| } |
| local function Constructor() |
| local num = AceGUI:GetNextWidgetNum(Type) |
| local frame = CreateFrame("Frame",nil,UIParent) |
| local button = CreateFrame("Button","AceGUI-3.0 KeybindingButton"..num,frame,"UIPanelButtonTemplate2") |
| local self = {} |
| self.type = Type |
| self.num = num |
| --[[----------------------------------------------------------------------------- |
| Constructor |
| -------------------------------------------------------------------------------]] |
| local text = button:GetFontString() |
| text:SetPoint("LEFT",button,"LEFT",7,0) |
| text:SetPoint("RIGHT",button,"RIGHT",-7,0) |
| button:SetScript("OnClick",Keybinding_OnClick) |
| button:SetScript("OnKeyDown",Keybinding_OnKeyDown) |
| button:SetScript("OnEnter",Control_OnEnter) |
| button:SetScript("OnLeave",Control_OnLeave) |
| button:SetScript("OnMouseDown",Keybinding_OnMouseDown) |
| button:RegisterForClicks("AnyDown") |
| button:EnableMouse() |
| button:SetHeight(24) |
| button:SetWidth(200) |
| button:SetPoint("BOTTOMLEFT", frame, "BOTTOMLEFT",0,0) |
| button:SetPoint("BOTTOMRIGHT",frame,"BOTTOMRIGHT",0,0) |
| frame:SetWidth(200) |
| frame:SetHeight(44) |
| self.alignoffset = 30 |
| self.button = button |
| local label = frame:CreateFontString(nil,"OVERLAY","GameFontHighlight") |
| label:SetPoint("TOPLEFT",frame,"TOPLEFT",0,0) |
| label:SetPoint("TOPRIGHT",frame,"TOPRIGHT",0,0) |
| label:SetJustifyH("CENTER") |
| label:SetHeight(18) |
| self.label = label |
| local msgframe = CreateFrame("Frame",nil,UIParent) |
| msgframe:SetHeight(30) |
| msgframe:SetBackdrop(ControlBackdrop) |
| msgframe:SetBackdropColor(0,0,0) |
| msgframe:SetFrameStrata("FULLSCREEN_DIALOG") |
| msgframe:SetFrameLevel(1000) |
| self.msgframe = msgframe |
| local msg = msgframe:CreateFontString(nil,"OVERLAY","GameFontNormal") |
| msg:SetText("Press a key to bind, ESC to clear the binding or click the button again to cancel") |
| msgframe.msg = msg |
| msg:SetPoint("TOPLEFT",msgframe,"TOPLEFT",5,-5) |
| msgframe:SetScript("OnUpdate", keybindingMsgFixWidth) |
| msgframe:SetPoint("BOTTOM",button,"TOP",0,0) |
| msgframe:Hide() |
| self.OnRelease = OnRelease |
| self.OnAcquire = OnAcquire |
| self.SetLabel = SetLabel |
| self.SetDisabled = SetDisabled |
| self.SetKey = SetKey |
| self.frame = frame |
| frame.obj = self |
| button.obj = self |
| local ControlBackdrop = { |
| bgFile = "Interface\\Tooltips\\UI-Tooltip-Background", |
| edgeFile = "Interface\\Tooltips\\UI-Tooltip-Border", |
| tile = true, tileSize = 16, edgeSize = 16, |
| insets = { left = 3, right = 3, top = 3, bottom = 3 } |
| } |
| AceGUI:RegisterAsWidget(self) |
| return self |
| local function keybindingMsgFixWidth(frame) |
| frame:SetWidth(frame.msg:GetWidth() + 10) |
| frame:SetScript("OnUpdate", nil) |
| end |
| local function Constructor() |
| local name = "AceGUI30KeybindingButton" .. AceGUI:GetNextWidgetNum(Type) |
| local frame = CreateFrame("Frame", nil, UIParent) |
| local button = CreateFrame("Button", name, frame, "UIPanelButtonTemplate2") |
| button:EnableMouse(true) |
| button:RegisterForClicks("AnyDown") |
| button:SetScript("OnEnter", Control_OnEnter) |
| button:SetScript("OnLeave", Control_OnLeave) |
| button:SetScript("OnClick", Keybinding_OnClick) |
| button:SetScript("OnKeyDown", Keybinding_OnKeyDown) |
| button:SetScript("OnMouseDown", Keybinding_OnMouseDown) |
| button:SetPoint("BOTTOMLEFT") |
| button:SetPoint("BOTTOMRIGHT") |
| button:SetHeight(24) |
| local text = button:GetFontString() |
| text:SetPoint("LEFT", 7, 0) |
| text:SetPoint("RIGHT", -7, 0) |
| local label = frame:CreateFontString(nil, "OVERLAY", "GameFontHighlight") |
| label:SetPoint("TOPLEFT") |
| label:SetPoint("TOPRIGHT") |
| label:SetJustifyH("CENTER") |
| label:SetHeight(18) |
| local msgframe = CreateFrame("Frame", nil, UIParent) |
| msgframe:SetHeight(30) |
| msgframe:SetBackdrop(ControlBackdrop) |
| msgframe:SetBackdropColor(0,0,0) |
| msgframe:SetFrameStrata("FULLSCREEN_DIALOG") |
| msgframe:SetFrameLevel(1000) |
| local msg = msgframe:CreateFontString(nil, "OVERLAY", "GameFontNormal") |
| msg:SetText("Press a key to bind, ESC to clear the binding or click the button again to cancel.") |
| msgframe.msg = msg |
| msg:SetPoint("TOPLEFT", 5, -5) |
| msgframe:SetScript("OnUpdate", keybindingMsgFixWidth) |
| msgframe:SetPoint("BOTTOM", button, "TOP") |
| msgframe:Hide() |
| local widget = { |
| button = button, |
| label = label, |
| msgframe = msgframe, |
| frame = frame, |
| alignoffset = 30, |
| type = Type |
| } |
| for method, func in pairs(methods) do |
| widget[method] = func |
| end |
| AceGUI:RegisterWidgetType(Type,Constructor,Version) |
| button.obj = widget |
| return AceGUI:RegisterAsWidget(widget) |
| end |
| AceGUI:RegisterWidgetType(Type, Constructor, Version) |
AceGUI-3.0/widgets/AceGUIWidget-CheckBox.lua
1,143 → 1,176
| local AceGUI = LibStub("AceGUI-3.0") |
| --[[----------------------------------------------------------------------------- |
| Checkbox Widget |
| -------------------------------------------------------------------------------]] |
| local Type, Version = "CheckBox", 21 |
| local AceGUI = LibStub and LibStub("AceGUI-3.0", true) |
| if not AceGUI or (AceGUI:GetWidgetVersion(Type) or 0) >= Version then return end |
| -------------------------- |
| -- Check Box -- |
| -------------------------- |
| --[[ |
| Events : |
| OnValueChanged |
| -- Lua APIs |
| local select, pairs = select, pairs |
| ]] |
| do |
| local Type = "CheckBox" |
| local Version = 5 |
| local function OnAcquire(self) |
| self:SetValue(false) |
| self.tristate = nil |
| self:SetHeight(24) |
| self:SetWidth(200) |
| -- WoW APIs |
| local PlaySound = PlaySound |
| local CreateFrame, UIParent = CreateFrame, UIParent |
| -- Global vars/functions that we don't upvalue since they might get hooked, or upgraded |
| -- List them here for Mikk's FindGlobals script |
| -- GLOBALS: SetDesaturation, GameFontHighlight |
| --[[----------------------------------------------------------------------------- |
| Support functions |
| -------------------------------------------------------------------------------]] |
| local function AlignImage(self) |
| local img = self.image:GetTexture() |
| self.text:ClearAllPoints() |
| if not img then |
| self.text:SetPoint("LEFT", self.checkbg, "RIGHT") |
| self.text:SetPoint("RIGHT") |
| else |
| self.text:SetPoint("LEFT", self.image,"RIGHT", 1, 0) |
| self.text:SetPoint("RIGHT") |
| end |
| local function OnRelease(self) |
| self.frame:ClearAllPoints() |
| self.frame:Hide() |
| self.check:Hide() |
| self.highlight:Hide() |
| self.down = nil |
| self.checked = nil |
| self:SetType() |
| self:SetDisabled(false) |
| end |
| local function CheckBox_OnEnter(this) |
| local self = this.obj |
| if not self.disabled then |
| self.highlight:Show() |
| end |
| --[[----------------------------------------------------------------------------- |
| Scripts |
| -------------------------------------------------------------------------------]] |
| local function Control_OnEnter(frame) |
| frame.obj:Fire("OnEnter") |
| end |
| local function Control_OnLeave(frame) |
| frame.obj:Fire("OnLeave") |
| end |
| local function CheckBox_OnMouseDown(frame) |
| local self = frame.obj |
| if not self.disabled then |
| if self.image:GetTexture() then |
| self.text:SetPoint("LEFT", self.image,"RIGHT", 2, -1) |
| else |
| self.text:SetPoint("LEFT", self.checkbg, "RIGHT", 1, -1) |
| end |
| self:Fire("OnEnter") |
| end |
| local function CheckBox_OnLeave(this) |
| local self = this.obj |
| if not self.down then |
| self.highlight:Hide() |
| AceGUI:ClearFocus() |
| end |
| local function CheckBox_OnMouseUp(frame) |
| local self = frame.obj |
| if not self.disabled then |
| self:ToggleChecked() |
| if self.checked then |
| PlaySound("igMainMenuOptionCheckBoxOn") |
| else -- for both nil and false (tristate) |
| PlaySound("igMainMenuOptionCheckBoxOff") |
| end |
| self:Fire("OnLeave") |
| self:Fire("OnValueChanged", self.checked) |
| AlignImage(self) |
| end |
| local function CheckBox_OnMouseUp(this) |
| local self = this.obj |
| if not self.disabled then |
| self:ToggleChecked() |
| self:Fire("OnValueChanged",self.checked) |
| self.text:SetPoint("LEFT",self.check,"RIGHT",0,0) |
| end |
| --[[----------------------------------------------------------------------------- |
| Methods |
| -------------------------------------------------------------------------------]] |
| local methods = { |
| ["OnAcquire"] = function(self) |
| self:SetType() |
| self:SetValue(false) |
| self:SetTriState(nil) |
| -- height is calculated from the width and required space for the description |
| self:SetWidth(200) |
| self:SetImage() |
| self:SetDisabled(nil) |
| self:SetDescription(nil) |
| end, |
| -- ["OnRelease"] = nil, |
| ["OnWidthSet"] = function(self, width) |
| if self.desc then |
| self.desc:SetWidth(width - 30) |
| if self.desc:GetText() and self.desc:GetText() ~= "" then |
| self:SetHeight(28 + self.desc:GetHeight()) |
| end |
| end |
| self.down = nil |
| end |
| local function CheckBox_OnMouseDown(this) |
| local self = this.obj |
| if not self.disabled then |
| self.text:SetPoint("LEFT",self.check,"RIGHT",1,-1) |
| self.down = true |
| end |
| AceGUI:ClearFocus() |
| end |
| end, |
| local function SetDisabled(self,disabled) |
| ["SetDisabled"] = function(self, disabled) |
| self.disabled = disabled |
| if disabled then |
| self.text:SetTextColor(0.5,0.5,0.5) |
| self.frame:Disable() |
| self.text:SetTextColor(0.5, 0.5, 0.5) |
| SetDesaturation(self.check, true) |
| else |
| self.text:SetTextColor(1,1,1) |
| self.frame:Enable() |
| self.text:SetTextColor(1, 1, 1) |
| if self.tristate and self.checked == nil then |
| SetDesaturation(self.check, true) |
| else |
| SetDesaturation(self.check, false) |
| end |
| end |
| end |
| local function SetValue(self,value) |
| end, |
| ["SetValue"] = function(self,value) |
| local check = self.check |
| self.checked = value |
| if value then |
| SetDesaturation(self.check, false) |
| check:SetWidth(24) |
| check:SetHeight(24) |
| self.check:Show() |
| else |
| --Nil is the unknown tristate value |
| if self.tristate and value == nil then |
| SetDesaturation(self.check, true) |
| check:SetWidth(20) |
| check:SetHeight(20) |
| self.check:Show() |
| else |
| SetDesaturation(self.check, false) |
| check:SetWidth(24) |
| check:SetHeight(24) |
| self.check:Hide() |
| end |
| end |
| end |
| local function SetTriState(self, enabled) |
| self:SetDisabled(self.disabled) |
| end, |
| ["GetValue"] = function(self) |
| return self.checked |
| end, |
| ["SetTriState"] = function(self, enabled) |
| self.tristate = enabled |
| self:SetValue(self:GetValue()) |
| end |
| local function GetValue(self) |
| return self.checked |
| end |
| local function SetType(self, type) |
| end, |
| ["SetType"] = function(self, type) |
| local checkbg = self.checkbg |
| local check = self.check |
| local highlight = self.highlight |
| local size |
| if type == "radio" then |
| size = 16 |
| checkbg:SetTexture("Interface\\Buttons\\UI-RadioButton") |
| checkbg:SetTexCoord(0,0.25,0,1) |
| checkbg:SetTexCoord(0, 0.25, 0, 1) |
| check:SetTexture("Interface\\Buttons\\UI-RadioButton") |
| check:SetTexCoord(0.5,0.75,0,1) |
| check:SetTexCoord(0.25, 0.5, 0, 1) |
| check:SetBlendMode("ADD") |
| highlight:SetTexture("Interface\\Buttons\\UI-RadioButton") |
| highlight:SetTexCoord(0.5,0.75,0,1) |
| highlight:SetTexCoord(0.5, 0.75, 0, 1) |
| else |
| size = 24 |
| checkbg:SetTexture("Interface\\Buttons\\UI-CheckBox-Up") |
| checkbg:SetTexCoord(0,1,0,1) |
| checkbg:SetTexCoord(0, 1, 0, 1) |
| check:SetTexture("Interface\\Buttons\\UI-CheckBox-Check") |
| check:SetTexCoord(0,1,0,1) |
| check:SetTexCoord(0, 1, 0, 1) |
| check:SetBlendMode("BLEND") |
| highlight:SetTexture("Interface\\Buttons\\UI-CheckBox-Highlight") |
| highlight:SetTexCoord(0,1,0,1) |
| highlight:SetTexCoord(0, 1, 0, 1) |
| end |
| end |
| local function ToggleChecked(self) |
| checkbg:SetHeight(size) |
| checkbg:SetWidth(size) |
| end, |
| ["ToggleChecked"] = function(self) |
| local value = self:GetValue() |
| if self.tristate then |
| --cycle in true, nil, false order |
151,69 → 184,106
| else |
| self:SetValue(not self:GetValue()) |
| end |
| end |
| local function SetLabel(self, label) |
| end, |
| ["SetLabel"] = function(self, label) |
| self.text:SetText(label) |
| end |
| local function Constructor() |
| local frame = CreateFrame("Button",nil,UIParent) |
| local self = {} |
| self.type = Type |
| end, |
| self.OnRelease = OnRelease |
| self.OnAcquire = OnAcquire |
| self.SetValue = SetValue |
| self.GetValue = GetValue |
| self.SetDisabled = SetDisabled |
| self.SetType = SetType |
| self.ToggleChecked = ToggleChecked |
| self.SetLabel = SetLabel |
| self.SetTriState = SetTriState |
| self.frame = frame |
| frame.obj = self |
| ["SetDescription"] = function(self, desc) |
| if desc then |
| if not self.desc then |
| local desc = self.frame:CreateFontString(nil, "OVERLAY", "GameFontHighlightSmall") |
| desc:ClearAllPoints() |
| desc:SetPoint("TOPLEFT", self.checkbg, "TOPRIGHT", 5, -21) |
| desc:SetWidth(self.frame.width - 30) |
| desc:SetJustifyH("LEFT") |
| desc:SetJustifyV("TOP") |
| self.desc = desc |
| end |
| self.desc:Show() |
| --self.text:SetFontObject(GameFontNormal) |
| self.desc:SetText(desc) |
| self:SetHeight(28 + self.desc:GetHeight()) |
| else |
| if self.desc then |
| self.desc:SetText("") |
| self.desc:Hide() |
| end |
| --self.text:SetFontObject(GameFontHighlight) |
| self:SetHeight(24) |
| end |
| end, |
| local text = frame:CreateFontString(nil,"OVERLAY","GameFontHighlight") |
| self.text = text |
| frame:SetScript("OnEnter",CheckBox_OnEnter) |
| frame:SetScript("OnLeave",CheckBox_OnLeave) |
| frame:SetScript("OnMouseUp",CheckBox_OnMouseUp) |
| frame:SetScript("OnMouseDown",CheckBox_OnMouseDown) |
| frame:EnableMouse() |
| local checkbg = frame:CreateTexture(nil,"ARTWORK") |
| self.checkbg = checkbg |
| checkbg:SetWidth(24) |
| checkbg:SetHeight(24) |
| checkbg:SetPoint("LEFT",frame,"LEFT",0,0) |
| checkbg:SetTexture("Interface\\Buttons\\UI-CheckBox-Up") |
| local check = frame:CreateTexture(nil,"OVERLAY") |
| self.check = check |
| check:SetWidth(24) |
| check:SetHeight(24) |
| check:SetPoint("CENTER",checkbg,"CENTER",0,0) |
| check:SetTexture("Interface\\Buttons\\UI-CheckBox-Check") |
| local highlight = frame:CreateTexture(nil, "BACKGROUND") |
| self.highlight = highlight |
| highlight:SetTexture("Interface\\Buttons\\UI-CheckBox-Highlight") |
| highlight:SetBlendMode("ADD") |
| highlight:SetAllPoints(checkbg) |
| highlight:Hide() |
| ["SetImage"] = function(self, path, ...) |
| local image = self.image |
| image:SetTexture(path) |
| text:SetJustifyH("LEFT") |
| frame:SetHeight(24) |
| frame:SetWidth(200) |
| text:SetHeight(18) |
| text:SetPoint("LEFT",check,"RIGHT",0,0) |
| text:SetPoint("RIGHT",frame,"RIGHT",0,0) |
| if image:GetTexture() then |
| local n = select("#", ...) |
| if n == 4 or n == 8 then |
| image:SetTexCoord(...) |
| else |
| image:SetTexCoord(0, 1, 0, 1) |
| end |
| end |
| AlignImage(self) |
| end |
| } |
| AceGUI:RegisterAsWidget(self) |
| return self |
| --[[----------------------------------------------------------------------------- |
| Constructor |
| -------------------------------------------------------------------------------]] |
| local function Constructor() |
| local frame = CreateFrame("Button", nil, UIParent) |
| frame:Hide() |
| frame:EnableMouse(true) |
| frame:SetScript("OnEnter", Control_OnEnter) |
| frame:SetScript("OnLeave", Control_OnLeave) |
| frame:SetScript("OnMouseDown", CheckBox_OnMouseDown) |
| frame:SetScript("OnMouseUp", CheckBox_OnMouseUp) |
| local checkbg = frame:CreateTexture(nil, "ARTWORK") |
| checkbg:SetWidth(24) |
| checkbg:SetHeight(24) |
| checkbg:SetPoint("TOPLEFT") |
| checkbg:SetTexture("Interface\\Buttons\\UI-CheckBox-Up") |
| local check = frame:CreateTexture(nil, "OVERLAY") |
| check:SetAllPoints(checkbg) |
| check:SetTexture("Interface\\Buttons\\UI-CheckBox-Check") |
| local text = frame:CreateFontString(nil, "OVERLAY", "GameFontHighlight") |
| text:SetJustifyH("LEFT") |
| text:SetHeight(18) |
| text:SetPoint("LEFT", checkbg, "RIGHT") |
| text:SetPoint("RIGHT") |
| local highlight = frame:CreateTexture(nil, "HIGHLIGHT") |
| highlight:SetTexture("Interface\\Buttons\\UI-CheckBox-Highlight") |
| highlight:SetBlendMode("ADD") |
| highlight:SetAllPoints(checkbg) |
| local image = frame:CreateTexture(nil, "OVERLAY") |
| image:SetHeight(16) |
| image:SetWidth(16) |
| image:SetPoint("LEFT", checkbg, "RIGHT", 1, 0) |
| local widget = { |
| checkbg = checkbg, |
| check = check, |
| text = text, |
| highlight = highlight, |
| image = image, |
| frame = frame, |
| type = Type |
| } |
| for method, func in pairs(methods) do |
| widget[method] = func |
| end |
| AceGUI:RegisterWidgetType(Type,Constructor,Version) |
| return AceGUI:RegisterAsWidget(widget) |
| end |
| AceGUI:RegisterWidgetType(Type, Constructor, Version) |
AceGUI-3.0/widgets/AceGUIWidget-Icon.lua
1,126 → 1,144
| local AceGUI = LibStub("AceGUI-3.0") |
| --[[----------------------------------------------------------------------------- |
| Icon Widget |
| -------------------------------------------------------------------------------]] |
| local Type, Version = "Icon", 20 |
| local AceGUI = LibStub and LibStub("AceGUI-3.0", true) |
| if not AceGUI or (AceGUI:GetWidgetVersion(Type) or 0) >= Version then return end |
| -------------------------- |
| -- Label -- |
| -------------------------- |
| do |
| local Type = "Icon" |
| local Version = 9 |
| local function OnAcquire(self) |
| -- Lua APIs |
| local select, pairs, print = select, pairs, print |
| -- WoW APIs |
| local CreateFrame, UIParent, GetBuildInfo = CreateFrame, UIParent, GetBuildInfo |
| --[[----------------------------------------------------------------------------- |
| Scripts |
| -------------------------------------------------------------------------------]] |
| local function Control_OnEnter(frame) |
| frame.obj:Fire("OnEnter") |
| end |
| local function Control_OnLeave(frame) |
| frame.obj:Fire("OnLeave") |
| end |
| local function Button_OnClick(frame, button) |
| frame.obj:Fire("OnClick", button) |
| AceGUI:ClearFocus() |
| end |
| --[[----------------------------------------------------------------------------- |
| Methods |
| -------------------------------------------------------------------------------]] |
| local methods = { |
| ["OnAcquire"] = function(self) |
| self:SetHeight(110) |
| self:SetWidth(110) |
| self:SetLabel("") |
| self:SetLabel() |
| self:SetImage(nil) |
| self:SetImageSize(64, 64) |
| end |
| local function OnRelease(self) |
| self.frame:ClearAllPoints() |
| self.frame:Hide() |
| end |
| local function SetLabel(self, text) |
| self:SetDisabled(false) |
| end, |
| -- ["OnRelease"] = nil, |
| ["SetLabel"] = function(self, text) |
| if text and text ~= "" then |
| self.label:Show() |
| self.label:SetText(text) |
| self.frame:SetHeight(self.image:GetHeight() + 25) |
| self:SetHeight(self.image:GetHeight() + 25) |
| else |
| self.label:Hide() |
| self.frame:SetHeight(self.image:GetHeight() + 10) |
| self:SetHeight(self.image:GetHeight() + 10) |
| end |
| end |
| local function SetImage(self, path, ...) |
| end, |
| ["SetImage"] = function(self, path, ...) |
| local image = self.image |
| image:SetTexture(path) |
| if image:GetTexture() then |
| self.imageshown = true |
| local n = select('#', ...) |
| local n = select("#", ...) |
| if n == 4 or n == 8 then |
| image:SetTexCoord(...) |
| else |
| image:SetTexCoord(0, 1, 0, 1) |
| end |
| else |
| self.imageshown = nil |
| end |
| end |
| local function SetImageSize(self, width, height) |
| end, |
| ["SetImageSize"] = function(self, width, height) |
| self.image:SetWidth(width) |
| self.image:SetHeight(height) |
| --self.frame:SetWidth(width + 30) |
| if self.label:IsShown() then |
| self.frame:SetHeight(height + 25) |
| self:SetHeight(height + 25) |
| else |
| self.frame:SetHeight(height + 10) |
| self:SetHeight(height + 10) |
| end |
| end, |
| ["SetDisabled"] = function(self, disabled) |
| self.disabled = disabled |
| if disabled then |
| self.frame:Disable() |
| self.label:SetTextColor(0.5, 0.5, 0.5) |
| self.image:SetVertexColor(0.5, 0.5, 0.5, 0.5) |
| else |
| self.frame:Enable() |
| self.label:SetTextColor(1, 1, 1) |
| self.image:SetVertexColor(1, 1, 1) |
| end |
| end |
| local function OnClick(this, button) |
| this.obj:Fire("OnClick", button) |
| AceGUI:ClearFocus() |
| } |
| --[[----------------------------------------------------------------------------- |
| Constructor |
| -------------------------------------------------------------------------------]] |
| local function Constructor() |
| local frame = CreateFrame("Button", nil, UIParent) |
| frame:Hide() |
| frame:EnableMouse(true) |
| frame:SetScript("OnEnter", Control_OnEnter) |
| frame:SetScript("OnLeave", Control_OnLeave) |
| frame:SetScript("OnClick", Button_OnClick) |
| local label = frame:CreateFontString(nil, "BACKGROUND", "GameFontHighlight") |
| label:SetPoint("BOTTOMLEFT") |
| label:SetPoint("BOTTOMRIGHT") |
| label:SetJustifyH("CENTER") |
| label:SetJustifyV("TOP") |
| label:SetHeight(18) |
| local image = frame:CreateTexture(nil, "BACKGROUND") |
| image:SetWidth(64) |
| image:SetHeight(64) |
| image:SetPoint("TOP", 0, -5) |
| local highlight = frame:CreateTexture(nil, "HIGHLIGHT") |
| highlight:SetAllPoints(image) |
| highlight:SetTexture("Interface\\PaperDollInfoFrame\\UI-Character-Tab-Highlight") |
| highlight:SetTexCoord(0, 1, 0.23, 0.77) |
| highlight:SetBlendMode("ADD") |
| local widget = { |
| label = label, |
| image = image, |
| frame = frame, |
| type = Type |
| } |
| for method, func in pairs(methods) do |
| widget[method] = func |
| end |
| local function OnEnter(this) |
| this.obj.highlight:Show() |
| this.obj:Fire("OnEnter") |
| -- SetText is deprecated, but keep it around for a while. (say, to WoW 4.0) |
| if (select(4, GetBuildInfo()) < 40000) then |
| widget.SetText = widget.SetLabel |
| else |
| widget.SetText = function(self, ...) print("AceGUI-3.0-Icon: SetText is deprecated! Use SetLabel instead!"); self:SetLabel(...) end |
| end |
| local function OnLeave(this) |
| this.obj.highlight:Hide() |
| this.obj:Fire("OnLeave") |
| end |
| local function Constructor() |
| local frame = CreateFrame("Button",nil,UIParent) |
| local self = {} |
| self.type = Type |
| self.OnRelease = OnRelease |
| self.OnAcquire = OnAcquire |
| self.SetLabel = SetLabel |
| self.frame = frame |
| self.SetImage = SetImage |
| self.SetImageSize = SetImageSize |
| -- SetText should be deprecated along the way |
| self.SetText = SetLabel |
| frame.obj = self |
| frame:SetHeight(110) |
| frame:SetWidth(110) |
| frame:EnableMouse(true) |
| frame:SetScript("OnClick", OnClick) |
| frame:SetScript("OnLeave", OnLeave) |
| frame:SetScript("OnEnter", OnEnter) |
| local label = frame:CreateFontString(nil,"BACKGROUND","GameFontHighlight") |
| label:SetPoint("BOTTOMLEFT",frame,"BOTTOMLEFT",0,0) |
| label:SetPoint("BOTTOMRIGHT",frame,"BOTTOMRIGHT",0,0) |
| label:SetJustifyH("CENTER") |
| label:SetJustifyV("TOP") |
| label:SetHeight(18) |
| self.label = label |
| local image = frame:CreateTexture(nil,"BACKGROUND") |
| self.image = image |
| image:SetWidth(64) |
| image:SetHeight(64) |
| image:SetPoint("TOP",frame,"TOP",0,-5) |
| local highlight = frame:CreateTexture(nil,"OVERLAY") |
| self.highlight = highlight |
| highlight:SetAllPoints(image) |
| highlight:SetTexture("Interface\\PaperDollInfoFrame\\UI-Character-Tab-Highlight") |
| highlight:SetTexCoord(0,1,0.23,0.77) |
| highlight:SetBlendMode("ADD") |
| highlight:Hide() |
| AceGUI:RegisterAsWidget(self) |
| return self |
| end |
| AceGUI:RegisterWidgetType(Type,Constructor,Version) |
| return AceGUI:RegisterAsWidget(widget) |
| end |
| AceGUI:RegisterWidgetType(Type, Constructor, Version) |
AceGUI-3.0/widgets/AceGUIContainer-BlizOptionsGroup.lua
New file
0,0 → 1,133
| --[[----------------------------------------------------------------------------- |
| BlizOptionsGroup Container |
| Simple container widget for the integration of AceGUI into the Blizzard Interface Options |
| -------------------------------------------------------------------------------]] |
| local Type, Version = "BlizOptionsGroup", 20 |
| local AceGUI = LibStub and LibStub("AceGUI-3.0", true) |
| if not AceGUI or (AceGUI:GetWidgetVersion(Type) or 0) >= Version then return end |
| -- Lua APIs |
| local pairs = pairs |
| -- WoW APIs |
| local CreateFrame = CreateFrame |
| --[[----------------------------------------------------------------------------- |
| Scripts |
| -------------------------------------------------------------------------------]] |
| local function OnShow(frame) |
| frame.obj:Fire("OnShow") |
| end |
| local function OnHide(frame) |
| frame.obj:Fire("OnHide") |
| end |
| --[[----------------------------------------------------------------------------- |
| Support functions |
| -------------------------------------------------------------------------------]] |
| local function okay(frame) |
| frame.obj:Fire("okay") |
| end |
| local function cancel(frame) |
| frame.obj:Fire("cancel") |
| end |
| local function defaults(frame) |
| frame.obj:Fire("defaults") |
| end |
| --[[----------------------------------------------------------------------------- |
| Methods |
| -------------------------------------------------------------------------------]] |
| local methods = { |
| ["OnAcquire"] = function(self) |
| self:SetName() |
| self:SetTitle() |
| end, |
| -- ["OnRelease"] = nil, |
| ["OnWidthSet"] = function(self, width) |
| local content = self.content |
| local contentwidth = width - 63 |
| if contentwidth < 0 then |
| contentwidth = 0 |
| end |
| content:SetWidth(contentwidth) |
| content.width = contentwidth |
| end, |
| ["OnHeightSet"] = function(self, height) |
| local content = self.content |
| local contentheight = height - 26 |
| if contentheight < 0 then |
| contentheight = 0 |
| end |
| content:SetHeight(contentheight) |
| content.height = contentheight |
| end, |
| ["SetName"] = function(self, name, parent) |
| self.frame.name = name |
| self.frame.parent = parent |
| end, |
| ["SetTitle"] = function(self, title) |
| local content = self.content |
| content:ClearAllPoints() |
| if not title or title == "" then |
| content:SetPoint("TOPLEFT", 10, -10) |
| self.label:SetText("") |
| else |
| content:SetPoint("TOPLEFT", 10, -40) |
| self.label:SetText(title) |
| end |
| content:SetPoint("BOTTOMRIGHT", -10, 10) |
| end |
| } |
| --[[----------------------------------------------------------------------------- |
| Constructor |
| -------------------------------------------------------------------------------]] |
| local function Constructor() |
| local frame = CreateFrame("Frame") |
| frame:Hide() |
| -- support functions for the Blizzard Interface Options |
| frame.okay = okay |
| frame.cancel = cancel |
| frame.defaults = defaults |
| frame:SetScript("OnHide", OnHide) |
| frame:SetScript("OnShow", OnShow) |
| local label = frame:CreateFontString(nil, "OVERLAY", "GameFontNormalLarge") |
| label:SetPoint("TOPLEFT", 10, -15) |
| label:SetPoint("BOTTOMRIGHT", frame, "TOPRIGHT", 10, -45) |
| label:SetJustifyH("LEFT") |
| label:SetJustifyV("TOP") |
| --Container Support |
| local content = CreateFrame("Frame", nil, frame) |
| content:SetPoint("TOPLEFT", 10, -10) |
| content:SetPoint("BOTTOMRIGHT", -10, 10) |
| local widget = { |
| label = label, |
| frame = frame, |
| content = content, |
| type = Type |
| } |
| for method, func in pairs(methods) do |
| widget[method] = func |
| end |
| return AceGUI:RegisterAsContainer(widget) |
| end |
| AceGUI:RegisterWidgetType(Type, Constructor, Version) |
AceGUI-3.0/widgets/AceGUIContainer-Frame.lua
New file
0,0 → 1,298
| --[[----------------------------------------------------------------------------- |
| Frame Container |
| -------------------------------------------------------------------------------]] |
| local Type, Version = "Frame", 21 |
| local AceGUI = LibStub and LibStub("AceGUI-3.0", true) |
| if not AceGUI or (AceGUI:GetWidgetVersion(Type) or 0) >= Version then return end |
| -- Lua APIs |
| local pairs, assert, type = pairs, assert, type |
| local wipe = table.wipe |
| -- WoW APIs |
| local PlaySound = PlaySound |
| local CreateFrame, UIParent = CreateFrame, UIParent |
| -- Global vars/functions that we don't upvalue since they might get hooked, or upgraded |
| -- List them here for Mikk's FindGlobals script |
| -- GLOBALS: CLOSE |
| --[[----------------------------------------------------------------------------- |
| Scripts |
| -------------------------------------------------------------------------------]] |
| local function Button_OnClick(frame) |
| PlaySound("gsTitleOptionExit") |
| frame.obj:Hide() |
| end |
| local function Frame_OnClose(frame) |
| frame.obj:Fire("OnClose") |
| end |
| local function Frame_OnMouseDown(frame) |
| AceGUI:ClearFocus() |
| end |
| local function Title_OnMouseDown(frame) |
| frame:GetParent():StartMoving() |
| AceGUI:ClearFocus() |
| end |
| local function MoverSizer_OnMouseUp(mover) |
| local frame = mover:GetParent() |
| frame:StopMovingOrSizing() |
| local self = frame.obj |
| local status = self.status or self.localstatus |
| status.width = frame:GetWidth() |
| status.height = frame:GetHeight() |
| status.top = frame:GetTop() |
| status.left = frame:GetLeft() |
| end |
| local function SizerSE_OnMouseDown(frame) |
| frame:GetParent():StartSizing("BOTTOMRIGHT") |
| AceGUI:ClearFocus() |
| end |
| local function SizerS_OnMouseDown(frame) |
| frame:GetParent():StartSizing("BOTTOM") |
| AceGUI:ClearFocus() |
| end |
| local function SizerE_OnMouseDown(frame) |
| frame:GetParent():StartSizing("RIGHT") |
| AceGUI:ClearFocus() |
| end |
| local function StatusBar_OnEnter(frame) |
| frame.obj:Fire("OnEnterStatusBar") |
| end |
| local function StatusBar_OnLeave(frame) |
| frame.obj:Fire("OnLeaveStatusBar") |
| end |
| --[[----------------------------------------------------------------------------- |
| Methods |
| -------------------------------------------------------------------------------]] |
| local methods = { |
| ["OnAcquire"] = function(self) |
| self.frame:SetParent(UIParent) |
| self.frame:SetFrameStrata("FULLSCREEN_DIALOG") |
| self:SetTitle() |
| self:SetStatusText() |
| self:ApplyStatus() |
| self:Show() |
| end, |
| ["OnRelease"] = function(self) |
| self.status = nil |
| wipe(self.localstatus) |
| end, |
| ["OnWidthSet"] = function(self, width) |
| local content = self.content |
| local contentwidth = width - 34 |
| if contentwidth < 0 then |
| contentwidth = 0 |
| end |
| content:SetWidth(contentwidth) |
| content.width = contentwidth |
| end, |
| ["OnHeightSet"] = function(self, height) |
| local content = self.content |
| local contentheight = height - 57 |
| if contentheight < 0 then |
| contentheight = 0 |
| end |
| content:SetHeight(contentheight) |
| content.height = contentheight |
| end, |
| ["SetTitle"] = function(self, title) |
| self.titletext:SetText(title) |
| end, |
| ["SetStatusText"] = function(self, text) |
| self.statustext:SetText(text) |
| end, |
| ["Hide"] = function(self) |
| self.frame:Hide() |
| end, |
| ["Show"] = function(self) |
| self.frame:Show() |
| end, |
| -- called to set an external table to store status in |
| ["SetStatusTable"] = function(self, status) |
| assert(type(status) == "table") |
| self.status = status |
| self:ApplyStatus() |
| end, |
| ["ApplyStatus"] = function(self) |
| local status = self.status or self.localstatus |
| local frame = self.frame |
| self:SetWidth(status.width or 700) |
| self:SetHeight(status.height or 500) |
| frame:ClearAllPoints() |
| if status.top and status.left then |
| frame:SetPoint("TOP", UIParent, "BOTTOM", 0, status.top) |
| frame:SetPoint("LEFT", UIParent, "LEFT", status.left, 0) |
| else |
| frame:SetPoint("CENTER") |
| end |
| end |
| } |
| --[[----------------------------------------------------------------------------- |
| Constructor |
| -------------------------------------------------------------------------------]] |
| local FrameBackdrop = { |
| bgFile = "Interface\\DialogFrame\\UI-DialogBox-Background", |
| edgeFile = "Interface\\DialogFrame\\UI-DialogBox-Border", |
| tile = true, tileSize = 32, edgeSize = 32, |
| insets = { left = 8, right = 8, top = 8, bottom = 8 } |
| } |
| local PaneBackdrop = { |
| bgFile = "Interface\\ChatFrame\\ChatFrameBackground", |
| edgeFile = "Interface\\Tooltips\\UI-Tooltip-Border", |
| tile = true, tileSize = 16, edgeSize = 16, |
| insets = { left = 3, right = 3, top = 5, bottom = 3 } |
| } |
| local function Constructor() |
| local frame = CreateFrame("Frame", nil, UIParent) |
| frame:Hide() |
| frame:EnableMouse(true) |
| frame:SetMovable(true) |
| frame:SetResizable(true) |
| frame:SetFrameStrata("FULLSCREEN_DIALOG") |
| frame:SetBackdrop(FrameBackdrop) |
| frame:SetBackdropColor(0, 0, 0, 1) |
| frame:SetMinResize(400, 200) |
| frame:SetToplevel(true) |
| frame:SetScript("OnHide", Frame_OnClose) |
| frame:SetScript("OnMouseDown", Frame_OnMouseDown) |
| local closebutton = CreateFrame("Button", nil, frame, "UIPanelButtonTemplate") |
| closebutton:SetScript("OnClick", Button_OnClick) |
| closebutton:SetPoint("BOTTOMRIGHT", -27, 17) |
| closebutton:SetHeight(20) |
| closebutton:SetWidth(100) |
| closebutton:SetText(CLOSE) |
| local statusbg = CreateFrame("Button", nil, frame) |
| statusbg:SetPoint("BOTTOMLEFT", 15, 15) |
| statusbg:SetPoint("BOTTOMRIGHT", -132, 15) |
| statusbg:SetHeight(24) |
| statusbg:SetBackdrop(PaneBackdrop) |
| statusbg:SetBackdropColor(0.1,0.1,0.1) |
| statusbg:SetBackdropBorderColor(0.4,0.4,0.4) |
| statusbg:SetScript("OnEnter", StatusBar_OnEnter) |
| statusbg:SetScript("OnLeave", StatusBar_OnLeave) |
| local statustext = statusbg:CreateFontString(nil, "OVERLAY", "GameFontNormal") |
| statustext:SetPoint("TOPLEFT", 7, -2) |
| statustext:SetPoint("BOTTOMRIGHT", -7, 2) |
| statustext:SetHeight(20) |
| statustext:SetJustifyH("LEFT") |
| statustext:SetText("") |
| local titlebg = frame:CreateTexture(nil, "OVERLAY") |
| titlebg:SetTexture("Interface\\DialogFrame\\UI-DialogBox-Header") |
| titlebg:SetTexCoord(0.31, 0.67, 0, 0.63) |
| titlebg:SetPoint("TOP", 0, 12) |
| titlebg:SetWidth(100) |
| titlebg:SetHeight(40) |
| local title = CreateFrame("Frame", nil, frame) |
| title:EnableMouse(true) |
| title:SetScript("OnMouseDown", Title_OnMouseDown) |
| title:SetScript("OnMouseUp", MoverSizer_OnMouseUp) |
| title:SetAllPoints(titlebg) |
| local titletext = title:CreateFontString(nil, "OVERLAY", "GameFontNormal") |
| titletext:SetPoint("TOP", titlebg, "TOP", 0, -14) |
| local titlebg_l = frame:CreateTexture(nil, "OVERLAY") |
| titlebg_l:SetTexture("Interface\\DialogFrame\\UI-DialogBox-Header") |
| titlebg_l:SetTexCoord(0.21, 0.31, 0, 0.63) |
| titlebg_l:SetPoint("RIGHT", titlebg, "LEFT") |
| titlebg_l:SetWidth(30) |
| titlebg_l:SetHeight(40) |
| local titlebg_r = frame:CreateTexture(nil, "OVERLAY") |
| titlebg_r:SetTexture("Interface\\DialogFrame\\UI-DialogBox-Header") |
| titlebg_r:SetTexCoord(0.67, 0.77, 0, 0.63) |
| titlebg_r:SetPoint("LEFT", titlebg, "RIGHT") |
| titlebg_r:SetWidth(30) |
| titlebg_r:SetHeight(40) |
| local sizer_se = CreateFrame("Frame", nil, frame) |
| sizer_se:SetPoint("BOTTOMRIGHT") |
| sizer_se:SetWidth(25) |
| sizer_se:SetHeight(25) |
| sizer_se:EnableMouse() |
| sizer_se:SetScript("OnMouseDown",SizerSE_OnMouseDown) |
| sizer_se:SetScript("OnMouseUp", MoverSizer_OnMouseUp) |
| local line1 = sizer_se:CreateTexture(nil, "BACKGROUND") |
| line1:SetWidth(14) |
| line1:SetHeight(14) |
| line1:SetPoint("BOTTOMRIGHT", -8, 8) |
| line1:SetTexture("Interface\\Tooltips\\UI-Tooltip-Border") |
| local x = 0.1 * 14/17 |
| line1:SetTexCoord(0.05 - x, 0.5, 0.05, 0.5 + x, 0.05, 0.5 - x, 0.5 + x, 0.5) |
| local line2 = sizer_se:CreateTexture(nil, "BACKGROUND") |
| line2:SetWidth(8) |
| line2:SetHeight(8) |
| line2:SetPoint("BOTTOMRIGHT", -8, 8) |
| line2:SetTexture("Interface\\Tooltips\\UI-Tooltip-Border") |
| local x = 0.1 * 8/17 |
| line2:SetTexCoord(0.05 - x, 0.5, 0.05, 0.5 + x, 0.05, 0.5 - x, 0.5 + x, 0.5) |
| local sizer_s = CreateFrame("Frame", nil, frame) |
| sizer_s:SetPoint("BOTTOMRIGHT", -25, 0) |
| sizer_s:SetPoint("BOTTOMLEFT") |
| sizer_s:SetHeight(25) |
| sizer_s:EnableMouse(true) |
| sizer_s:SetScript("OnMouseDown", SizerS_OnMouseDown) |
| sizer_s:SetScript("OnMouseUp", MoverSizer_OnMouseUp) |
| local sizer_e = CreateFrame("Frame", nil, frame) |
| sizer_e:SetPoint("BOTTOMRIGHT", 0, 25) |
| sizer_e:SetPoint("TOPRIGHT") |
| sizer_e:SetWidth(25) |
| sizer_e:EnableMouse(true) |
| sizer_e:SetScript("OnMouseDown", SizerE_OnMouseDown) |
| sizer_e:SetScript("OnMouseUp", MoverSizer_OnMouseUp) |
| --Container Support |
| local content = CreateFrame("Frame", nil, frame) |
| content:SetPoint("TOPLEFT", 17, -27) |
| content:SetPoint("BOTTOMRIGHT", -17, 40) |
| local widget = { |
| localstatus = {}, |
| titletext = titletext, |
| statustext = statustext, |
| content = content, |
| frame = frame, |
| type = Type |
| } |
| for method, func in pairs(methods) do |
| widget[method] = func |
| end |
| closebutton.obj, statusbg.obj = widget, widget |
| return AceGUI:RegisterAsContainer(widget) |
| end |
| AceGUI:RegisterWidgetType(Type, Constructor, Version) |
AceGUI-3.0/widgets/AceGUIContainer-InlineGroup.lua
New file
0,0 → 1,102
| --[[----------------------------------------------------------------------------- |
| InlineGroup Container |
| Simple container widget that creates a visible "box" with an optional title. |
| -------------------------------------------------------------------------------]] |
| local Type, Version = "InlineGroup", 20 |
| local AceGUI = LibStub and LibStub("AceGUI-3.0", true) |
| if not AceGUI or (AceGUI:GetWidgetVersion(Type) or 0) >= Version then return end |
| -- Lua APIs |
| local pairs = pairs |
| -- WoW APIs |
| local CreateFrame, UIParent = CreateFrame, UIParent |
| --[[----------------------------------------------------------------------------- |
| Methods |
| -------------------------------------------------------------------------------]] |
| local methods = { |
| ["OnAcquire"] = function(self) |
| self:SetWidth(300) |
| self:SetHeight(100) |
| end, |
| -- ["OnRelease"] = nil, |
| ["SetTitle"] = function(self,title) |
| self.titletext:SetText(title) |
| end, |
| ["LayoutFinished"] = function(self, width, height) |
| if self.noAutoHeight then return end |
| self:SetHeight((height or 0) + 40) |
| end, |
| ["OnWidthSet"] = function(self, width) |
| local content = self.content |
| local contentwidth = width - 20 |
| if contentwidth < 0 then |
| contentwidth = 0 |
| end |
| content:SetWidth(contentwidth) |
| content.width = contentwidth |
| end, |
| ["OnHeightSet"] = function(self, height) |
| local content = self.content |
| local contentheight = height - 20 |
| if contentheight < 0 then |
| contentheight = 0 |
| end |
| content:SetHeight(contentheight) |
| content.height = contentheight |
| end |
| } |
| --[[----------------------------------------------------------------------------- |
| Constructor |
| -------------------------------------------------------------------------------]] |
| local PaneBackdrop = { |
| bgFile = "Interface\\ChatFrame\\ChatFrameBackground", |
| edgeFile = "Interface\\Tooltips\\UI-Tooltip-Border", |
| tile = true, tileSize = 16, edgeSize = 16, |
| insets = { left = 3, right = 3, top = 5, bottom = 3 } |
| } |
| local function Constructor() |
| local frame = CreateFrame("Frame", nil, UIParent) |
| frame:SetFrameStrata("FULLSCREEN_DIALOG") |
| local titletext = frame:CreateFontString(nil, "OVERLAY", "GameFontNormal") |
| titletext:SetPoint("TOPLEFT", 14, 0) |
| titletext:SetPoint("TOPRIGHT", -14, 0) |
| titletext:SetJustifyH("LEFT") |
| titletext:SetHeight(18) |
| local border = CreateFrame("Frame", nil, frame) |
| border:SetPoint("TOPLEFT", 0, -17) |
| border:SetPoint("BOTTOMRIGHT", -1, 3) |
| border:SetBackdrop(PaneBackdrop) |
| border:SetBackdropColor(0.1, 0.1, 0.1, 0.5) |
| border:SetBackdropBorderColor(0.4, 0.4, 0.4) |
| --Container Support |
| local content = CreateFrame("Frame", nil, border) |
| content:SetPoint("TOPLEFT", 10, -10) |
| content:SetPoint("BOTTOMRIGHT", -10, 10) |
| local widget = { |
| frame = frame, |
| content = content, |
| titletext = titletext, |
| type = Type |
| } |
| for method, func in pairs(methods) do |
| widget[method] = func |
| end |
| return AceGUI:RegisterAsContainer(widget) |
| end |
| AceGUI:RegisterWidgetType(Type, Constructor, Version) |
AceGUI-3.0/widgets/AceGUIWidget-DropDown.lua
1,8 → 1,20
| --[[ $Id: AceGUIWidget-DropDown.lua 793 2009-04-07 09:26:44Z nevcairiel $ ]]-- |
| --[[ $Id: AceGUIWidget-DropDown.lua 916 2010-03-15 12:24:36Z nevcairiel $ ]]-- |
| local AceGUI = LibStub("AceGUI-3.0") |
| -- Lua APIs |
| local min, max, floor = math.min, math.max, math.floor |
| local select, pairs, ipairs = select, pairs, ipairs |
| local tsort = table.sort |
| local AceGUI = LibStub("AceGUI-3.0") |
| -- WoW APIs |
| local PlaySound = PlaySound |
| local UIParent, CreateFrame = UIParent, CreateFrame |
| local _G = _G |
| -- Global vars/functions that we don't upvalue since they might get hooked, or upgraded |
| -- List them here for Mikk's FindGlobals script |
| -- GLOBALS: CLOSE |
| local function fixlevels(parent,...) |
| local i = 1 |
| local child = select(i, ...) |
27,12 → 39,12
| do |
| local widgetType = "Dropdown-Pullout" |
| local widgetVersion = 2 |
| local widgetVersion = 3 |
| --[[ Static data ]]-- |
| local backdrop = { |
| bgFile = "Interface\\DialogFrame\\UI-DialogBox-Background", |
| bgFile = "Interface\\ChatFrame\\ChatFrameBackground", |
| edgeFile = "Interface\\DialogFrame\\UI-DialogBox-Border", |
| edgeSize = 32, |
| tileSize = 32, |
342,9 → 354,9
| AceGUI:RegisterWidgetType(widgetType, Constructor, widgetVersion) |
| end |
| do |
| do |
| local widgetType = "Dropdown" |
| local widgetVersion = 19 |
| local widgetVersion = 22 |
| --[[ Static data ]]-- |
367,6 → 379,7
| local function Dropdown_TogglePullout(this) |
| local self = this.obj |
| PlaySound("igMainMenuOptionCheckBoxOn") -- missleading name, but the Blizzard code uses this sound |
| if self.open then |
| self.open = nil |
| self.pullout:Close() |
455,6 → 468,7
| self.pullout:Close() |
| end |
| AceGUI:Release(self.pullout) |
| self.pullout = nil |
| self:SetText("") |
| self:SetLabel("") |
462,12 → 476,12
| self:SetMultiselect(false) |
| self.value = nil |
| self.list = nil |
| self.list = nil |
| self.open = nil |
| self.hasClose = nil |
| self.frame:ClearAllPoints() |
| self.frame:Hide() |
| self.frame:Hide() |
| end |
| -- exported |
520,6 → 534,11
| end |
| -- exported |
| local function GetValue(self) |
| return self.value |
| end |
| -- exported |
| local function SetItemValue(self, item, value) |
| if not self.multiselect then return end |
| for i, widget in self.pullout:IterateItems() do |
555,7 → 574,7
| local close = AceGUI:Create("Dropdown-Item-Execute") |
| close:SetText(CLOSE) |
| self.pullout:AddItem(close) |
| self.hasClose = true |
| self.hasClose = true |
| end |
| end |
570,7 → 589,7
| for v in pairs(list) do |
| sortlist[#sortlist + 1] = v |
| end |
| table.sort(sortlist) |
| tsort(sortlist) |
| for i, value in pairs(sortlist) do |
| AddListItem(self, value, list[value]) |
626,6 → 645,7
| self.SetText = SetText |
| self.SetValue = SetValue |
| self.GetValue = GetValue |
| self.SetList = SetList |
| self.SetLabel = SetLabel |
| self.SetDisabled = SetDisabled |
AceGUI-3.0/widgets/AceGUIWidget-EditBox.lua
1,102 → 1,131
| local AceGUI = LibStub("AceGUI-3.0") |
| --[[----------------------------------------------------------------------------- |
| EditBox Widget |
| -------------------------------------------------------------------------------]] |
| local Type, Version = "EditBox", 21 |
| local AceGUI = LibStub and LibStub("AceGUI-3.0", true) |
| if not AceGUI or (AceGUI:GetWidgetVersion(Type) or 0) >= Version then return end |
| -------------------------- |
| -- Edit box -- |
| -------------------------- |
| --[[ |
| Events : |
| OnTextChanged |
| OnEnterPressed |
| -- Lua APIs |
| local tostring, pairs = tostring, pairs |
| ]] |
| do |
| local Type = "EditBox" |
| local Version = 11 |
| -- WoW APIs |
| local PlaySound = PlaySound |
| local GetCursorInfo, ClearCursor, GetSpellName = GetCursorInfo, ClearCursor, GetSpellName |
| local CreateFrame, UIParent = CreateFrame, UIParent |
| local _G = _G |
| local function OnAcquire(self) |
| self:SetHeight(26) |
| self:SetWidth(200) |
| self:SetDisabled(false) |
| self:SetLabel() |
| self.showbutton = true |
| end |
| local function OnRelease(self) |
| self.frame:ClearAllPoints() |
| self.frame:Hide() |
| self:SetDisabled(false) |
| end |
| local function Control_OnEnter(this) |
| this.obj:Fire("OnEnter") |
| end |
| local function Control_OnLeave(this) |
| this.obj:Fire("OnLeave") |
| end |
| local function EditBox_OnEscapePressed(this) |
| this:ClearFocus() |
| end |
| local function ShowButton(self) |
| if self.showbutton then |
| self.button:Show() |
| self.editbox:SetTextInsets(0,20,3,3) |
| -- Global vars/functions that we don't upvalue since they might get hooked, or upgraded |
| -- List them here for Mikk's FindGlobals script |
| -- GLOBALS: AceGUIEditBoxInsertLink, ChatFontNormal, OKAY |
| --[[----------------------------------------------------------------------------- |
| Support functions |
| -------------------------------------------------------------------------------]] |
| if not AceGUIEditBoxInsertLink then |
| -- upgradeable hook |
| hooksecurefunc("ChatEdit_InsertLink", function(...) return _G.AceGUIEditBoxInsertLink(...) end) |
| end |
| function _G.AceGUIEditBoxInsertLink(text) |
| for i = 1, AceGUI:GetWidgetCount(Type) do |
| local editbox = _G["AceGUI-3.0EditBox"..i] |
| if editbox and editbox:IsVisible() and editbox:HasFocus() then |
| editbox:Insert(text) |
| return true |
| end |
| end |
| local function HideButton(self) |
| self.button:Hide() |
| self.editbox:SetTextInsets(0,0,3,3) |
| end |
| local function ShowButton(self) |
| if not self.disablebutton then |
| self.button:Show() |
| self.editbox:SetTextInsets(0, 20, 3, 3) |
| end |
| local function EditBox_OnEnterPressed(this) |
| local self = this.obj |
| local value = this:GetText() |
| local cancel = self:Fire("OnEnterPressed",value) |
| if not cancel then |
| HideButton(self) |
| end |
| end |
| local function Button_OnClick(this) |
| local editbox = this.obj.editbox |
| editbox:ClearFocus() |
| EditBox_OnEnterPressed(editbox) |
| end |
| local function EditBox_OnReceiveDrag(this) |
| local self = this.obj |
| local type, id, info = GetCursorInfo() |
| if type == "item" then |
| self:SetText(info) |
| self:Fire("OnEnterPressed",info) |
| ClearCursor() |
| elseif type == "spell" then |
| local name, rank = GetSpellName(id, info) |
| if rank and rank:match("%d") then |
| name = name.."("..rank..")" |
| end |
| self:SetText(name) |
| self:Fire("OnEnterPressed",name) |
| ClearCursor() |
| end |
| end |
| local function HideButton(self) |
| self.button:Hide() |
| self.editbox:SetTextInsets(0, 0, 3, 3) |
| end |
| --[[----------------------------------------------------------------------------- |
| Scripts |
| -------------------------------------------------------------------------------]] |
| local function Control_OnEnter(frame) |
| frame.obj:Fire("OnEnter") |
| end |
| local function Control_OnLeave(frame) |
| frame.obj:Fire("OnLeave") |
| end |
| local function EditBox_OnEscapePressed(frame) |
| AceGUI:ClearFocus() |
| end |
| local function EditBox_OnEnterPressed(frame) |
| local self = frame.obj |
| local value = frame:GetText() |
| local cancel = self:Fire("OnEnterPressed", value) |
| if not cancel then |
| PlaySound("igMainMenuOptionCheckBoxOn") |
| HideButton(self) |
| AceGUI:ClearFocus() |
| end |
| local function EditBox_OnTextChanged(this) |
| local self = this.obj |
| local value = this:GetText() |
| if value ~= self.lasttext then |
| self:Fire("OnTextChanged",value) |
| self.lasttext = value |
| ShowButton(self) |
| end |
| local function EditBox_OnReceiveDrag(frame) |
| local self = frame.obj |
| local type, id, info = GetCursorInfo() |
| if type == "item" then |
| self:SetText(info) |
| self:Fire("OnEnterPressed", info) |
| ClearCursor() |
| elseif type == "spell" then |
| local name, rank = GetSpellName(id, info) |
| if rank and rank:match("%d") then |
| name = name.."("..rank..")" |
| end |
| self:SetText(name) |
| self:Fire("OnEnterPressed", name) |
| ClearCursor() |
| end |
| local function SetDisabled(self, disabled) |
| HideButton(self) |
| AceGUI:ClearFocus() |
| end |
| local function EditBox_OnTextChanged(frame) |
| local self = frame.obj |
| local value = frame:GetText() |
| if tostring(value) ~= tostring(self.lasttext) then |
| self:Fire("OnTextChanged", value) |
| self.lasttext = value |
| ShowButton(self) |
| end |
| end |
| local function Button_OnClick(frame) |
| local editbox = frame.obj.editbox |
| editbox:ClearFocus() |
| EditBox_OnEnterPressed(editbox) |
| end |
| --[[----------------------------------------------------------------------------- |
| Methods |
| -------------------------------------------------------------------------------]] |
| local methods = { |
| ["OnAcquire"] = function(self) |
| -- height is controlled by SetLabel |
| self:SetWidth(200) |
| self:SetDisabled(false) |
| self:SetLabel() |
| self:SetText() |
| self:DisableButton(false) |
| self:SetMaxLetters(0) |
| end, |
| -- ["OnRelease"] = nil, |
| ["SetDisabled"] = function(self, disabled) |
| self.disabled = disabled |
| if disabled then |
| self.editbox:EnableMouse(false) |
108,16 → 137,16
| self.editbox:SetTextColor(1,1,1) |
| self.label:SetTextColor(1,.82,0) |
| end |
| end |
| local function SetText(self, text) |
| end, |
| ["SetText"] = function(self, text) |
| self.lasttext = text or "" |
| self.editbox:SetText(text or "") |
| self.editbox:SetCursorPosition(0) |
| HideButton(self) |
| end |
| local function SetLabel(self, text) |
| end, |
| ["SetLabel"] = function(self, text) |
| if text and text ~= "" then |
| self.label:SetText(text) |
| self.label:Show() |
131,74 → 160,69
| self:SetHeight(26) |
| self.alignoffset = 12 |
| end |
| end, |
| ["DisableButton"] = function(self, disabled) |
| self.disablebutton = disabled |
| end, |
| ["SetMaxLetters"] = function (self, num) |
| self.editbox:SetMaxLetters(num or 0) |
| end |
| } |
| local function Constructor() |
| local num = AceGUI:GetNextWidgetNum(Type) |
| local frame = CreateFrame("Frame",nil,UIParent) |
| local editbox = CreateFrame("EditBox","AceGUI-3.0EditBox"..num,frame,"InputBoxTemplate") |
| local self = {} |
| self.type = Type |
| self.num = num |
| --[[----------------------------------------------------------------------------- |
| Constructor |
| -------------------------------------------------------------------------------]] |
| local function Constructor() |
| local num = AceGUI:GetNextWidgetNum(Type) |
| local frame = CreateFrame("Frame", nil, UIParent) |
| frame:Hide() |
| self.OnRelease = OnRelease |
| self.OnAcquire = OnAcquire |
| local editbox = CreateFrame("EditBox", "AceGUI-3.0EditBox"..num, frame, "InputBoxTemplate") |
| editbox:SetAutoFocus(false) |
| editbox:SetFontObject(ChatFontNormal) |
| editbox:SetScript("OnEnter", Control_OnEnter) |
| editbox:SetScript("OnLeave", Control_OnLeave) |
| editbox:SetScript("OnEscapePressed", EditBox_OnEscapePressed) |
| editbox:SetScript("OnEnterPressed", EditBox_OnEnterPressed) |
| editbox:SetScript("OnTextChanged", EditBox_OnTextChanged) |
| editbox:SetScript("OnReceiveDrag", EditBox_OnReceiveDrag) |
| editbox:SetScript("OnMouseDown", EditBox_OnReceiveDrag) |
| editbox:SetTextInsets(0, 0, 3, 3) |
| editbox:SetMaxLetters(256) |
| editbox:SetPoint("BOTTOMLEFT", 6, 0) |
| editbox:SetPoint("BOTTOMRIGHT") |
| editbox:SetHeight(19) |
| self.SetDisabled = SetDisabled |
| self.SetText = SetText |
| self.SetLabel = SetLabel |
| self.frame = frame |
| frame.obj = self |
| self.editbox = editbox |
| editbox.obj = self |
| self.alignoffset = 30 |
| frame:SetHeight(44) |
| frame:SetWidth(200) |
| local label = frame:CreateFontString(nil, "OVERLAY", "GameFontNormalSmall") |
| label:SetPoint("TOPLEFT", 0, -2) |
| label:SetPoint("TOPRIGHT", 0, -2) |
| label:SetJustifyH("LEFT") |
| label:SetHeight(18) |
| editbox:SetScript("OnEnter",Control_OnEnter) |
| editbox:SetScript("OnLeave",Control_OnLeave) |
| editbox:SetAutoFocus(false) |
| editbox:SetFontObject(ChatFontNormal) |
| editbox:SetScript("OnEscapePressed",EditBox_OnEscapePressed) |
| editbox:SetScript("OnEnterPressed",EditBox_OnEnterPressed) |
| editbox:SetScript("OnTextChanged",EditBox_OnTextChanged) |
| editbox:SetScript("OnReceiveDrag", EditBox_OnReceiveDrag) |
| editbox:SetScript("OnMouseDown", EditBox_OnReceiveDrag) |
| local button = CreateFrame("Button", nil, editbox, "UIPanelButtonTemplate") |
| button:SetWidth(40) |
| button:SetHeight(20) |
| button:SetPoint("RIGHT", -2, 0) |
| button:SetText(OKAY) |
| button:SetScript("OnClick", Button_OnClick) |
| button:Hide() |
| editbox:SetTextInsets(0,0,3,3) |
| editbox:SetMaxLetters(256) |
| editbox:SetPoint("BOTTOMLEFT",frame,"BOTTOMLEFT",6,0) |
| editbox:SetPoint("BOTTOMRIGHT",frame,"BOTTOMRIGHT",0,0) |
| editbox:SetHeight(19) |
| local label = frame:CreateFontString(nil,"OVERLAY","GameFontNormalSmall") |
| label:SetPoint("TOPLEFT",frame,"TOPLEFT",0,-2) |
| label:SetPoint("TOPRIGHT",frame,"TOPRIGHT",0,-2) |
| label:SetJustifyH("LEFT") |
| label:SetHeight(18) |
| self.label = label |
| local button = CreateFrame("Button",nil,editbox,"UIPanelButtonTemplate") |
| button:SetWidth(40) |
| button:SetHeight(20) |
| button:SetPoint("RIGHT",editbox,"RIGHT",-2,0) |
| button:SetText(OKAY) |
| button:SetScript("OnClick", Button_OnClick) |
| button:Hide() |
| self.button = button |
| button.obj = self |
| local widget = { |
| alignoffset = 30, |
| editbox = editbox, |
| label = label, |
| button = button, |
| frame = frame, |
| type = Type |
| } |
| for method, func in pairs(methods) do |
| widget[method] = func |
| end |
| editbox.obj, button.obj = widget, widget |
| AceGUI:RegisterAsWidget(self) |
| return self |
| end |
| AceGUI:RegisterWidgetType(Type,Constructor,Version) |
| return AceGUI:RegisterAsWidget(widget) |
| end |
| AceGUI:RegisterWidgetType(Type, Constructor, Version) |
AceGUI-3.0/widgets/AceGUIWidget-Heading.lua
1,73 → 1,78
| local AceGUI = LibStub("AceGUI-3.0") |
| --[[----------------------------------------------------------------------------- |
| Heading Widget |
| -------------------------------------------------------------------------------]] |
| local Type, Version = "Heading", 20 |
| local AceGUI = LibStub and LibStub("AceGUI-3.0", true) |
| if not AceGUI or (AceGUI:GetWidgetVersion(Type) or 0) >= Version then return end |
| -------------------------- |
| -- Heading -- |
| -------------------------- |
| do |
| local Type = "Heading" |
| local Version = 5 |
| local function OnAcquire(self) |
| self:SetText("") |
| -- Lua APIs |
| local pairs = pairs |
| -- WoW APIs |
| local CreateFrame, UIParent = CreateFrame, UIParent |
| --[[----------------------------------------------------------------------------- |
| Methods |
| -------------------------------------------------------------------------------]] |
| local methods = { |
| ["OnAcquire"] = function(self) |
| self:SetText() |
| self:SetFullWidth() |
| self:SetHeight(18) |
| end |
| local function OnRelease(self) |
| self.frame:ClearAllPoints() |
| self.frame:Hide() |
| end |
| local function SetText(self, text) |
| end, |
| -- ["OnRelease"] = nil, |
| ["SetText"] = function(self, text) |
| self.label:SetText(text or "") |
| if (text or "") == "" then |
| self.left:SetPoint("RIGHT",self.frame,"RIGHT",-3,0) |
| if text and text ~= "" then |
| self.left:SetPoint("RIGHT", self.label, "LEFT", -5, 0) |
| self.right:Show() |
| else |
| self.left:SetPoint("RIGHT", -3, 0) |
| self.right:Hide() |
| else |
| self.left:SetPoint("RIGHT",self.label,"LEFT",-5,0) |
| self.right:Show() |
| end |
| end |
| } |
| local function Constructor() |
| local frame = CreateFrame("Frame",nil,UIParent) |
| local self = {} |
| self.type = Type |
| self.OnRelease = OnRelease |
| self.OnAcquire = OnAcquire |
| self.SetText = SetText |
| self.frame = frame |
| frame.obj = self |
| frame:SetHeight(18) |
| local label = frame:CreateFontString(nil,"BACKGROUND","GameFontNormal") |
| label:SetPoint("TOP",frame,"TOP",0,0) |
| label:SetPoint("BOTTOM",frame,"BOTTOM",0,0) |
| label:SetJustifyH("CENTER") |
| label:SetHeight(18) |
| self.label = label |
| local left = frame:CreateTexture(nil, "BACKGROUND") |
| self.left = left |
| left:SetHeight(8) |
| left:SetPoint("LEFT",frame,"LEFT",3,0) |
| left:SetPoint("RIGHT",label,"LEFT",-5,0) |
| left:SetTexture("Interface\\Tooltips\\UI-Tooltip-Border") |
| left:SetTexCoord(0.81, 0.94, 0.5, 1) |
| --[[----------------------------------------------------------------------------- |
| Constructor |
| -------------------------------------------------------------------------------]] |
| local function Constructor() |
| local frame = CreateFrame("Frame", nil, UIParent) |
| frame:Hide() |
| local right = frame:CreateTexture(nil, "BACKGROUND") |
| self.right = right |
| right:SetHeight(8) |
| right:SetPoint("RIGHT",frame,"RIGHT",-3,0) |
| right:SetPoint("LEFT",label,"RIGHT",5,0) |
| right:SetTexture("Interface\\Tooltips\\UI-Tooltip-Border") |
| right:SetTexCoord(0.81, 0.94, 0.5, 1) |
| AceGUI:RegisterAsWidget(self) |
| return self |
| local label = frame:CreateFontString(nil, "BACKGROUND", "GameFontNormal") |
| label:SetPoint("TOP") |
| label:SetPoint("BOTTOM") |
| label:SetJustifyH("CENTER") |
| local left = frame:CreateTexture(nil, "BACKGROUND") |
| left:SetHeight(8) |
| left:SetPoint("LEFT", 3, 0) |
| left:SetPoint("RIGHT", label, "LEFT", -5, 0) |
| left:SetTexture("Interface\\Tooltips\\UI-Tooltip-Border") |
| left:SetTexCoord(0.81, 0.94, 0.5, 1) |
| local right = frame:CreateTexture(nil, "BACKGROUND") |
| right:SetHeight(8) |
| right:SetPoint("RIGHT", -3, 0) |
| right:SetPoint("LEFT", label, "RIGHT", 5, 0) |
| right:SetTexture("Interface\\Tooltips\\UI-Tooltip-Border") |
| right:SetTexCoord(0.81, 0.94, 0.5, 1) |
| local widget = { |
| label = label, |
| left = left, |
| right = right, |
| frame = frame, |
| type = Type |
| } |
| for method, func in pairs(methods) do |
| widget[method] = func |
| end |
| AceGUI:RegisterWidgetType(Type,Constructor,Version) |
| return AceGUI:RegisterAsWidget(widget) |
| end |
| AceGUI:RegisterWidgetType(Type, Constructor, Version) |
AceAddon-3.0/AceAddon-3.0.lua
28,7 → 28,8
| -- end |
| -- @class file |
| -- @name AceAddon-3.0.lua |
| -- @release $Id: AceAddon-3.0.lua 777 2009-04-04 20:16:09Z nevcairiel $ |
| -- @release $Id: AceAddon-3.0.lua 895 2009-12-06 16:28:55Z nevcairiel $ |
| local MAJOR, MINOR = "AceAddon-3.0", 5 |
| local AceAddon, oldminor = LibStub:NewLibrary(MAJOR, MINOR) |
41,10 → 42,17
| AceAddon.enablequeue = AceAddon.enablequeue or {} -- addons that are initialized and waiting to be enabled |
| AceAddon.embeds = AceAddon.embeds or setmetatable({}, {__index = function(tbl, key) tbl[key] = {} return tbl[key] end }) -- contains a list of libraries embedded in an addon |
| local tinsert, tconcat = table.insert, table.concat |
| local fmt = string.format |
| local pairs, next, type = pairs, next, type |
| -- Lua APIs |
| local tinsert, tconcat, tremove = table.insert, table.concat, table.remove |
| local fmt, tostring = string.format, tostring |
| local select, pairs, next, type, unpack = select, pairs, next, type, unpack |
| local loadstring, assert, error = loadstring, assert, error |
| local setmetatable, getmetatable, rawset, rawget = setmetatable, getmetatable, rawset, rawget |
| -- Global vars/functions that we don't upvalue since they might get hooked, or upgraded |
| -- List them here for Mikk's FindGlobals script |
| -- GLOBALS: LibStub, IsLoggedIn, geterrorhandler |
| --[[ |
| xpcall safecall implementation |
| ]] |
AceConfig-3.0/AceConfigCmd-3.0/AceConfigCmd-3.0.lua
1,7 → 1,7
| --- AceConfigCmd-3.0 handles access to an options table through the "command line" interface via the ChatFrames. |
| -- @class file |
| -- @name AceConfigCmd-3.0 |
| -- @release $Id: AceConfigCmd-3.0.lua 801 2009-04-09 20:34:28Z nevcairiel $ |
| -- @release $Id: AceConfigCmd-3.0.lua 904 2009-12-13 11:56:37Z nevcairiel $ |
| --[[ |
| AceConfigCmd-3.0 |
12,12 → 12,10
| ]] |
| -- TODO: handle disabled / hidden |
| -- TODO: implement handlers for all types |
| -- TODO: plugin args |
| local MAJOR, MINOR = "AceConfigCmd-3.0", 9 |
| local MAJOR, MINOR = "AceConfigCmd-3.0", 12 |
| local AceConfigCmd = LibStub:NewLibrary(MAJOR, MINOR) |
| if not AceConfigCmd then return end |
29,7 → 27,21
| local AceConsole -- LoD |
| local AceConsoleName = "AceConsole-3.0" |
| -- Lua APIs |
| local strsub, strsplit, strlower, strmatch, strtrim = string.sub, string.split, string.lower, string.match, string.trim |
| local format, tonumber, tostring = string.format, tonumber, tostring |
| local tsort, tinsert = table.sort, table.insert |
| local select, pairs, next, type = select, pairs, next, type |
| local error, assert = error, assert |
| -- WoW APIs |
| local _G = _G |
| -- Global vars/functions that we don't upvalue since they might get hooked, or upgraded |
| -- List them here for Mikk's FindGlobals script |
| -- GLOBALS: LibStub, SELECTED_CHAT_FRAME, DEFAULT_CHAT_FRAME |
| local L = setmetatable({}, { -- TODO: replace with proper locale |
| __index = function(self,k) return k end |
| }) |
40,7 → 52,15
| (SELECTED_CHAT_FRAME or DEFAULT_CHAT_FRAME):AddMessage(msg) |
| end |
| -- constants used by getparam() calls below |
| local handlertypes = {["table"]=true} |
| local handlermsg = "expected a table" |
| local functypes = {["function"]=true, ["string"]=true} |
| local funcmsg = "expected function or member name" |
| -- pickfirstset() - picks the first non-nil value and returns it |
| local function pickfirstset(...) |
169,7 → 189,20
| end |
| end |
| local function showhelp(info, inputpos, tab, noHead) |
| local function checkhidden(info, inputpos, tab) |
| if tab.cmdHidden~=nil then |
| return tab.cmdHidden |
| end |
| local hidden = tab.hidden |
| if type(hidden) == "function" or type(hidden) == "string" then |
| info.hidden = hidden |
| hidden = callmethod(info, inputpos, tab, 'hidden') |
| info.hidden = nil |
| end |
| return hidden |
| end |
| local function showhelp(info, inputpos, tab, depth, noHead) |
| if not noHead then |
| print("|cff33ff99"..info.appName.."|r: Arguments to |cffffff78/"..info[0].."|r "..strsub(info.input,1,inputpos-1)..":") |
| end |
179,12 → 212,12
| for k,v in iterateargs(tab) do |
| if not refTbl[k] then -- a plugin overriding something in .args |
| table.insert(sortTbl, k) |
| tinsert(sortTbl, k) |
| refTbl[k] = v |
| end |
| end |
| table.sort(sortTbl, function(one, two) |
| tsort(sortTbl, function(one, two) |
| local o1 = refTbl[one].order or 100 |
| local o2 = refTbl[two].order or 100 |
| if type(o1) == "function" or type(o1) == "string" then |
208,24 → 241,29
| return o1<o2 |
| end) |
| for _,k in ipairs(sortTbl) do |
| for i = 1, #sortTbl do |
| local k = sortTbl[i] |
| local v = refTbl[k] |
| if not pickfirstset(v.cmdHidden, v.hidden, false) then |
| -- recursively show all inline groups |
| local name, desc = v.name, v.desc |
| if type(name) == "function" then |
| name = callfunction(info, v, 'name') |
| if not checkhidden(info, inputpos, v) then |
| if v.type ~= "description" and v.type ~= "header" then |
| -- recursively show all inline groups |
| local name, desc = v.name, v.desc |
| if type(name) == "function" then |
| name = callfunction(info, v, 'name') |
| end |
| if type(desc) == "function" then |
| desc = callfunction(info, v, 'desc') |
| end |
| if v.type == "group" and pickfirstset(v.cmdInline, v.inline, false) then |
| print(" "..(desc or name)..":") |
| local oldhandler,oldhandler_at = getparam(info, inputpos, v, depth, "handler", handlertypes, handlermsg) |
| showhelp(info, inputpos, v, depth, true) |
| info.handler,info.handler_at = oldhandler,oldhandler_at |
| else |
| local key = k:gsub(" ", "_") |
| print(" |cffffff78"..key.."|r - "..(desc or name or "")) |
| end |
| end |
| if type(desc) == "function" then |
| desc = callfunction(info, v, 'desc') |
| end |
| if v.type == "group" and pickfirstset(v.cmdInline, v.inline, false) then |
| print(" "..(desc or name)..":") |
| showhelp(info, inputpos, v, true) |
| elseif v.type ~= "description" and v.type ~= "header" then |
| local key = k:gsub(" ", "_") |
| print(" |cffffff78"..key.."|r - "..(desc or name or "")) |
| end |
| end |
| end |
| end |
289,14 → 327,6
| return s |
| end |
| -- constants used by getparam() calls below |
| local handlertypes = {["table"]=true} |
| local handlermsg = "expected a table" |
| local functypes = {["function"]=true, ["string"]=true} |
| local funcmsg = "expected function or member name" |
| -- handle() - selfrecursing function that processes input->optiontable |
| -- - depth - starts at 0 |
| -- - retfalse - return false rather than produce error if a match is not found (used by inlined groups) |
327,9 → 357,9
| if tab.plugins and type(tab.plugins)~="table" then err(info,inputpos) end |
| -- grab next arg from input |
| local _,nextpos,arg = string.find(info.input, " *([^ ]+) *", inputpos) |
| local _,nextpos,arg = (info.input):find(" *([^ ]+) *", inputpos) |
| if not arg then |
| showhelp(info, inputpos, tab) |
| showhelp(info, inputpos, tab, depth) |
| return |
| end |
| nextpos=nextpos+1 |
525,9 → 555,9
| --parse for =on =off =default in the process |
| --table will be key = true for options that should toggle, key = [on|off|default] for options to be set |
| local sels = {} |
| for v in string.gmatch(str, "[^ ]+") do |
| for v in str:gmatch("[^ ]+") do |
| --parse option=on etc |
| local opt, val = string.match(v,'(.+)=(.+)') |
| local opt, val = v:match('(.+)=(.+)') |
| --get option if toggling |
| if not opt then |
| opt = v |
AceConfig-3.0/AceConfigRegistry-3.0/AceConfigRegistry-3.0.lua
1,13 → 1,15
| --- AceConfigRegistry-3.0 handles central registration of options tables in use by addons and modules. |
| -- Options tables can be registered as raw tables, or as function refs that return a table.\\ |
| -- These functions receive two arguments: "uiType" and "uiName". \\ |
| -- Valid "uiTypes": "cmd", "dropdown", "dialog". This is verified by the library at call time. \\ |
| -- The "uiName" field is expected to contain the full name of the calling addon, including version, e.g. "FooBar-1.0". This is verified by the library at call time.\\ |
| -- :IterateOptionsTables() and :GetOptionsTable() always return a function reference that the requesting config handling addon must call with the above arguments. |
| --- AceConfigRegistry-3.0 handles central registration of options tables in use by addons and modules.\\ |
| -- Options tables can be registered as raw tables, OR as function refs that return a table.\\ |
| -- Such functions receive three arguments: "uiType", "uiName", "appName". \\ |
| -- * Valid **uiTypes**: "cmd", "dropdown", "dialog". This is verified by the library at call time. \\ |
| -- * The **uiName** field is expected to contain the full name of the calling addon, including version, e.g. "FooBar-1.0". This is verified by the library at call time.\\ |
| -- * The **appName** field is the options table name as given at registration time \\ |
| -- |
| -- :IterateOptionsTables() (and :GetOptionsTable() if only given one argument) return a function reference that the requesting config handling addon must call with valid "uiType", "uiName". |
| -- @class file |
| -- @name AceConfigRegistry-3.0 |
| -- @release $Id: AceConfigRegistry-3.0.lua 785 2009-04-05 14:57:29Z nevcairiel $ |
| local MAJOR, MINOR = "AceConfigRegistry-3.0", 9 |
| -- @release $Id: AceConfigRegistry-3.0.lua 921 2010-05-09 15:49:14Z nevcairiel $ |
| local MAJOR, MINOR = "AceConfigRegistry-3.0", 12 |
| local AceConfigRegistry = LibStub:NewLibrary(MAJOR, MINOR) |
| if not AceConfigRegistry then return end |
20,6 → 22,12
| AceConfigRegistry.callbacks = CallbackHandler:New(AceConfigRegistry) |
| end |
| -- Lua APIs |
| local tinsert, tconcat = table.insert, table.concat |
| local strfind, strmatch = string.find, string.match |
| local type, tostring, select, pairs = type, tostring, select, pairs |
| local error, assert = error, assert |
| ----------------------------------------------------------------------- |
| -- Validating options table consistency: |
39,7 → 47,7
| for i=select("#",...),1,-1 do |
| tinsert(t, (select(i, ...))) |
| end |
| error(MAJOR..":ValidateOptionsTable(): "..table.concat(t,".")..msg, errlvl+2) |
| error(MAJOR..":ValidateOptionsTable(): "..tconcat(t,".")..msg, errlvl+2) |
| end |
63,6 → 71,7
| type=isstring, |
| name=isstringfunc, |
| desc=optstringfunc, |
| descStyle=optstring, |
| order=optmethodnumber, |
| validate=optmethodfalse, |
| confirm=optmethodbool, |
118,12 → 127,16
| }, |
| toggle={ |
| tristate=optbool, |
| image=optstringfunc, |
| imageCoords=optmethodtable, |
| }, |
| tristate={ |
| }, |
| range={ |
| min=optnumber, |
| softMin=optnumber, |
| max=optnumber, |
| softMax=optnumber, |
| step=optnumber, |
| bigStep=optnumber, |
| isPercent=optbool, |
230,14 → 243,12
| end |
| end |
| -- ------------------------------------------------------------------- |
| -- :ValidateOptionsTable(options,name,errlvl) |
| -- - options - the table |
| -- - name - (string) name of table, used in error reports |
| -- - errlvl - (optional number) error level offset, default 0 |
| -- |
| -- Validates basic structure and integrity of an options table |
| --- Validates basic structure and integrity of an options table \\ |
| -- Does NOT verify that get/set etc actually exist, since they can be defined at any depth |
| -- @param options The table to be validated |
| -- @param name The name of the table to be validated (shown in any error message) |
| -- @param errlvl (optional number) error level offset, default 0 (=errors point to the function calling :ValidateOptionsTable) |
| function AceConfigRegistry:ValidateOptionsTable(options,name,errlvl) |
| errlvl=(errlvl or 0)+1 |
| name = name or "Optionstable" |
247,7 → 258,7
| validate(options,errlvl,name) |
| end |
| --- Fires a ConfigTableChange callback for those listening in on it, allowing config GUIs to refresh. |
| --- Fires a "ConfigTableChange" callback for those listening in on it, allowing config GUIs to refresh. |
| -- You should call this function if your options table changed from any outside event, like a game event |
| -- or a timer. |
| -- @param appName The application name as given to `:RegisterOptionsTable()` |
274,7 → 285,8
| --- Register an options table with the config registry. |
| -- @param appName The application name as given to `:RegisterOptionsTable()` |
| -- @param options The options table or a function reference that generates it on demand. |
| -- @param options The options table, OR a function reference that generates it on demand. \\ |
| -- See the top of the page for info on arguments passed to such functions. |
| function AceConfigRegistry:RegisterOptionsTable(appName, options) |
| if type(options)=="table" then |
| if options.type~="group" then -- quick sanity checker |
293,7 → 305,7
| AceConfigRegistry.tables[appName] = function(uiType, uiName, errlvl) |
| errlvl=(errlvl or 0)+1 |
| validateGetterArgs(uiType, uiName, errlvl) |
| local tab = assert(options(uiType, uiName)) |
| local tab = assert(options(uiType, uiName, appName)) |
| if not AceConfigRegistry.validated[uiType][appName] then |
| AceConfigRegistry:ValidateOptionsTable(tab, appName, errlvl) -- upgradable |
| AceConfigRegistry.validated[uiType][appName] = true |
311,13 → 323,6
| end |
| --------------------------------------------------------------------- |
| -- :GetOptionsTable(appName) |
| -- - appName - which addon to retreive the options table of |
| -- Optional: |
| -- - uiType - "cmd", "dropdown", "dialog" |
| -- - uiName - e.g. "MyLib-1.0" |
| -- |
| --- Query the registry for a specific options table. |
325,8 → 330,8
| -- can call with (uiType,uiName) to get the table.\\ |
| -- If uiType&uiName are given, the table is returned. |
| -- @param appName The application name as given to `:RegisterOptionsTable()` |
| -- @param uiType The type of UI to get the table for. |
| -- @param uiName The name of the library/addon querying the table. |
| -- @param uiType The type of UI to get the table for, one of "cmd", "dropdown", "dialog" |
| -- @param uiName The name of the library/addon querying for the table, e.g. "MyLib-1.0" |
| function AceConfigRegistry:GetOptionsTable(appName, uiType, uiName) |
| local f = AceConfigRegistry.tables[appName] |
| if not f then |
AceConfig-3.0/AceConfig-3.0.lua
3,7 → 3,7
| -- as well as associate it with a slash command. |
| -- @class file |
| -- @name AceConfig-3.0 |
| -- @release $Id: AceConfig-3.0.lua 802 2009-04-11 12:12:37Z nevcairiel $ |
| -- @release $Id: AceConfig-3.0.lua 877 2009-11-02 15:56:50Z nevcairiel $ |
| --[[ |
| AceConfig-3.0 |
17,12 → 17,13
| if not AceConfig then return end |
| local cfgreg = LibStub("AceConfigRegistry-3.0") |
| local cfgcmd = LibStub("AceConfigCmd-3.0") |
| local cfgdlg = LibStub("AceConfigDialog-3.0") |
| --TODO: local cfgdrp = LibStub("AceConfigDropdown-3.0") |
| -- Lua APIs |
| local pcall, error, type, pairs = pcall, error, type, pairs |
| -- ------------------------------------------------------------------- |
| -- :RegisterOptionsTable(appName, options, slashcmd, persist) |
AceConfig-3.0/AceConfigDialog-3.0/AceConfigDialog-3.0.lua
1,11 → 1,11
| --- AceConfigDialog-3.0 generates AceGUI-3.0 based windows based on option tables. |
| -- @class file |
| -- @name AceConfigDialog-3.0 |
| -- @release $Id: AceConfigDialog-3.0.lua 796 2009-04-07 15:48:54Z nevcairiel $ |
| -- @release $Id: AceConfigDialog-3.0.lua 958 2010-07-03 10:22:29Z nevcairiel $ |
| local LibStub = LibStub |
| local MAJOR, MINOR = "AceConfigDialog-3.0", 34 |
| local AceConfigDialog = LibStub:NewLibrary(MAJOR, MINOR) |
| local MAJOR, MINOR = "AceConfigDialog-3.0", 49 |
| local AceConfigDialog, oldminor = LibStub:NewLibrary(MAJOR, MINOR) |
| if not AceConfigDialog then return end |
15,24 → 15,27
| AceConfigDialog.frame.apps = AceConfigDialog.frame.apps or {} |
| AceConfigDialog.frame.closing = AceConfigDialog.frame.closing or {} |
| AceConfigDialog.frame.closeAllOverride = AceConfigDialog.frame.closeAllOverride or {} |
| local gui = LibStub("AceGUI-3.0") |
| local reg = LibStub("AceConfigRegistry-3.0") |
| local select = select |
| local pairs = pairs |
| local type = type |
| local assert = assert |
| local tinsert = tinsert |
| local tremove = tremove |
| local error = error |
| local table = table |
| local unpack = unpack |
| local string = string |
| local next = next |
| local math = math |
| local _ |
| -- Lua APIs |
| local tconcat, tinsert, tsort, tremove = table.concat, table.insert, table.sort, table.remove |
| local strmatch, format = string.match, string.format |
| local assert, loadstring, error = assert, loadstring, error |
| local pairs, next, select, type, unpack, wipe = pairs, next, select, type, unpack, wipe |
| local rawset, tostring, tonumber = rawset, tostring, tonumber |
| local math_min, math_max, math_floor = math.min, math.max, math.floor |
| -- Global vars/functions that we don't upvalue since they might get hooked, or upgraded |
| -- List them here for Mikk's FindGlobals script |
| -- GLOBALS: NORMAL_FONT_COLOR, GameTooltip, StaticPopupDialogs, ACCEPT, CANCEL, StaticPopup_Show |
| -- GLOBALS: PlaySound, GameFontHighlight, GameFontHighlightSmall, GameFontHighlightLarge |
| -- GLOBALS: CloseSpecialWindows, InterfaceOptions_AddCategory, geterrorhandler |
| local emptyTbl = {} |
| --[[ |
| xpcall safecall implementation |
| ]] |
60,7 → 63,7
| local ARGS = {} |
| for i = 1, argCount do ARGS[i] = "arg"..i end |
| code = code:gsub("ARGS", table.concat(ARGS, ", ")) |
| code = code:gsub("ARGS", tconcat(ARGS, ", ")) |
| return assert(loadstring(code, "safecall Dispatcher["..argCount.."]"))(xpcall, errorhandler) |
| end |
74,7 → 77,7
| end |
| local function safecall(func, ...) |
| return Dispatchers[select('#', ...)](func, ...) |
| return Dispatchers[select("#", ...)](func, ...) |
| end |
| local width_multiplier = 170 |
101,7 → 104,7
| local new, del, copy |
| --newcount, delcount,createdcount,cached = 0,0,0 |
| do |
| local pool = setmetatable({},{__mode='k'}) |
| local pool = setmetatable({},{__mode="k"}) |
| function new() |
| --newcount = newcount + 1 |
| local t = next(pool) |
185,6 → 188,7
| --Is Never a function or method |
| local allIsLiteral = { |
| type = true, |
| descStyle = true, |
| imageWidth = true, |
| imageHeight = true, |
| } |
237,7 → 241,7
| info.handler = handler |
| info.option = option |
| info.type = option.type |
| info.uiType = 'dialog' |
| info.uiType = "dialog" |
| info.uiName = MAJOR |
| local a, b, c ,d |
250,7 → 254,7
| if handler and handler[member] then |
| a,b,c,d = handler[member](handler, info, ...) |
| else |
| error(string.format("Method %s doesn't exist in handler for type %s", member, membername)) |
| error(format("Method %s doesn't exist in handler for type %s", member, membername)) |
| end |
| end |
| del(info) |
371,7 → 375,7
| end |
| end |
| table.sort(keySort, compareOptions) |
| tsort(keySort, compareOptions) |
| del(tempOrders) |
| del(tempNames) |
475,7 → 479,7
| local treevalue |
| local treestatus |
| for n = 1, select('#',...) do |
| for n = 1, select("#",...) do |
| local key = select(n, ...) |
| if group.childGroups == "tab" or group.childGroups == "select" then |
533,10 → 537,13
| local name = GetOptionsMemberValue("name", opt, options, path, appName) |
| local desc = GetOptionsMemberValue("desc", opt, options, path, appName) |
| local usage = GetOptionsMemberValue("usage", opt, options, path, appName) |
| local descStyle = opt.descStyle |
| if descStyle and descStyle ~= "tooltip" then return end |
| GameTooltip:SetText(name, 1, .82, 0, 1) |
| if opt.type == 'multiselect' then |
| if opt.type == "multiselect" then |
| GameTooltip:AddLine(user.text,0.5, 0.5, 0.8, 1) |
| end |
| if type(desc) == "string" then |
555,10 → 562,10
| local function GetFuncName(option) |
| local type = option.type |
| if type == 'execute' then |
| return 'func' |
| if type == "execute" then |
| return "func" |
| else |
| return 'set' |
| return "set" |
| end |
| end |
| local function confirmPopup(appName, rootframe, basepath, info, message, func, ...) |
578,17 → 585,17
| if dialog and oldstrata then |
| dialog:SetFrameStrata(oldstrata) |
| end |
| AceConfigDialog:Open(appName, rootframe, basepath and unpack(basepath)) |
| AceConfigDialog:Open(appName, rootframe, unpack(basepath or emptyTbl)) |
| del(info) |
| end |
| t.OnCancel = function() |
| if dialog and oldstrata then |
| dialog:SetFrameStrata(oldstrata) |
| end |
| AceConfigDialog:Open(appName, rootframe, basepath and unpack(basepath)) |
| AceConfigDialog:Open(appName, rootframe, unpack(basepath or emptyTbl)) |
| del(info) |
| end |
| for i = 1, select('#', ...) do |
| for i = 1, select("#", ...) do |
| t[i] = select(i, ...) or false |
| end |
| t.timeout = 0 |
647,7 → 654,7
| info.handler = handler |
| info.option = option |
| info.type = option.type |
| info.uiType = 'dialog' |
| info.uiType = "dialog" |
| info.uiName = MAJOR |
| local name |
678,7 → 685,7
| success, validated = safecall(handler[validate], handler, info, ...) |
| if not success then validated = false end |
| else |
| error(string.format("Method %s doesn't exist in handler for type execute", validate)) |
| error(format("Method %s doesn't exist in handler for type execute", validate)) |
| end |
| elseif type(validate) == "function" then |
| success, validated = safecall(validate, info, ...) |
691,6 → 698,8
| --validate function returned a message to display |
| if rootframe.SetStatusText then |
| rootframe:SetStatusText(validated) |
| else |
| -- TODO: do something else. |
| end |
| PlaySound("igPlayerInviteDecline") |
| del(info) |
707,6 → 716,8
| rootframe:SetStatusText(name..": Invalid Value") |
| end |
| end |
| else |
| -- TODO: do something else |
| end |
| PlaySound("igPlayerInviteDecline") |
| del(info) |
725,7 → 736,7
| confirm = false |
| end |
| else |
| error(string.format("Method %s doesn't exist in handler for type confirm", confirm)) |
| error(format("Method %s doesn't exist in handler for type confirm", confirm)) |
| end |
| elseif type(confirm) == "function" then |
| success, confirm = safecall(confirm, info, ...) |
754,18 → 765,18
| end |
| end |
| local iscustom = user.rootframe:GetUserData('iscustom') |
| local iscustom = user.rootframe:GetUserData("iscustom") |
| local rootframe |
| if iscustom then |
| rootframe = user.rootframe |
| end |
| local basepath = user.rootframe:GetUserData('basepath') |
| local basepath = user.rootframe:GetUserData("basepath") |
| if type(func) == "string" then |
| if handler and handler[func] then |
| confirmPopup(user.appName, rootframe, basepath, info, confirmText, handler[func], handler, info, ...) |
| else |
| error(string.format("Method %s doesn't exist in handler for type func", func)) |
| error(format("Method %s doesn't exist in handler for type func", func)) |
| end |
| elseif type(func) == "function" then |
| confirmPopup(user.appName, rootframe, basepath, info, confirmText, func, info, ...) |
780,7 → 791,7
| if handler and handler[func] then |
| safecall(handler[func],handler, info, ...) |
| else |
| error(string.format("Method %s doesn't exist in handler for type func", func)) |
| error(format("Method %s doesn't exist in handler for type func", func)) |
| end |
| elseif type(func) == "function" then |
| safecall(func,info, ...) |
788,24 → 799,24
| local iscustom = user.rootframe:GetUserData('iscustom') |
| local basepath = user.rootframe:GetUserData('basepath') |
| local iscustom = user.rootframe:GetUserData("iscustom") |
| local basepath = user.rootframe:GetUserData("basepath") or emptyTbl |
| --full refresh of the frame, some controls dont cause this on all events |
| if option.type == "color" then |
| if event == "OnValueConfirmed" then |
| if iscustom then |
| AceConfigDialog:Open(user.appName, user.rootframe, basepath and unpack(basepath)) |
| AceConfigDialog:Open(user.appName, user.rootframe, unpack(basepath)) |
| else |
| AceConfigDialog:Open(user.appName, basepath and unpack(basepath)) |
| AceConfigDialog:Open(user.appName, unpack(basepath)) |
| end |
| end |
| elseif option.type == "range" then |
| if event == "OnMouseUp" then |
| if iscustom then |
| AceConfigDialog:Open(user.appName, user.rootframe, basepath and unpack(basepath)) |
| AceConfigDialog:Open(user.appName, user.rootframe, unpack(basepath)) |
| else |
| AceConfigDialog:Open(user.appName, basepath and unpack(basepath)) |
| AceConfigDialog:Open(user.appName, unpack(basepath)) |
| end |
| end |
| --multiselects don't cause a refresh on 'OnValueChanged' only 'OnClosed' |
813,9 → 824,9
| user.valuechanged = true |
| else |
| if iscustom then |
| AceConfigDialog:Open(user.appName, user.rootframe, basepath and unpack(basepath)) |
| AceConfigDialog:Open(user.appName, user.rootframe, unpack(basepath)) |
| else |
| AceConfigDialog:Open(user.appName, basepath and unpack(basepath)) |
| AceConfigDialog:Open(user.appName, unpack(basepath)) |
| end |
| end |
824,45 → 835,49
| end |
| local function ActivateSlider(widget, event, value) |
| local option = widget:GetUserData('option') |
| local min, max, step = option.min or 0, option.max or 100, option.step |
| if step then |
| value = math.floor((value - min) / step + 0.5) * step + min |
| else |
| value = math.max(math.min(value,max),min) |
| local option = widget:GetUserData("option") |
| local min, max, step = option.min or (not option.softMin and 0 or nil), option.max or (not option.softMax and 100 or nil), option.step |
| if min then |
| if step then |
| value = math_floor((value - min) / step + 0.5) * step + min |
| end |
| value = math_max(value, min) |
| end |
| if max then |
| value = math_min(value, max) |
| end |
| ActivateControl(widget,event,value) |
| end |
| --called from a checkbox that is part of an internally created multiselect group |
| --this type is safe to refresh on activation of one control |
| local function ActivateMultiControl(widget, event, ...) |
| ActivateControl(widget, event, widget:GetUserData('value'), ...) |
| ActivateControl(widget, event, widget:GetUserData("value"), ...) |
| local user = widget:GetUserDataTable() |
| local iscustom = user.rootframe:GetUserData('iscustom') |
| local basepath = user.rootframe:GetUserData('basepath') |
| local iscustom = user.rootframe:GetUserData("iscustom") |
| local basepath = user.rootframe:GetUserData("basepath") or emptyTbl |
| if iscustom then |
| AceConfigDialog:Open(user.appName, user.rootframe, basepath and unpack(basepath)) |
| AceConfigDialog:Open(user.appName, user.rootframe, unpack(basepath)) |
| else |
| AceConfigDialog:Open(user.appName, basepath and unpack(basepath)) |
| AceConfigDialog:Open(user.appName, unpack(basepath)) |
| end |
| end |
| local function MultiControlOnClosed(widget, event, ...) |
| local user = widget:GetUserDataTable() |
| if user.valuechanged then |
| local iscustom = user.rootframe:GetUserData('iscustom') |
| local basepath = user.rootframe:GetUserData('basepath') |
| local iscustom = user.rootframe:GetUserData("iscustom") |
| local basepath = user.rootframe:GetUserData("basepath") or emptyTbl |
| if iscustom then |
| AceConfigDialog:Open(user.appName, user.rootframe, basepath and unpack(basepath)) |
| AceConfigDialog:Open(user.appName, user.rootframe, unpack(basepath)) |
| else |
| AceConfigDialog:Open(user.appName, basepath and unpack(basepath)) |
| AceConfigDialog:Open(user.appName, unpack(basepath)) |
| end |
| end |
| end |
| local function FrameOnClose(widget, event) |
| local appName = widget:GetUserData('appName') |
| local appName = widget:GetUserData("appName") |
| AceConfigDialog.OpenFrames[appName] = nil |
| gui:Release(widget) |
| end |
961,6 → 976,7
| entry.value = k |
| entry.text = GetOptionsMemberValue("name", v, options, path, appName) |
| entry.icon = GetOptionsMemberValue("icon", v, options, path, appName) |
| entry.iconCoords = GetOptionsMemberValue("iconCoords", v, options, path, appName) |
| entry.disabled = CheckOptionDisabled(v, options, path, appName) |
| if not tree.children then tree.children = new() end |
| tinsert(tree.children,entry) |
1072,7 → 1088,7
| local imageCoords = GetOptionsMemberValue("imageCoords",v, options, path, appName) |
| local image, width, height = GetOptionsMemberValue("image",v, options, path, appName) |
| if type(image) == 'string' then |
| if type(image) == "string" then |
| control = gui:Create("Icon") |
| if not width then |
| width = GetOptionsMemberValue("imageWidth",v, options, path, appName) |
1080,7 → 1096,7
| if not height then |
| height = GetOptionsMemberValue("imageHeight",v, options, path, appName) |
| end |
| if type(imageCoords) == 'table' then |
| if type(imageCoords) == "table" then |
| control:SetImage(image, unpack(imageCoords)) |
| else |
| control:SetImage(image) |
1103,15 → 1119,12
| local controlType = v.dialogControl or v.control or (v.multiline and "MultiLineEditBox") or "EditBox" |
| control = gui:Create(controlType) |
| if not control then |
| error(("Invalid Custom Control Type - %s"):format(tostring(controlType))) |
| geterrorhandler()(("Invalid Custom Control Type - %s"):format(tostring(controlType))) |
| control = gui:Create(v.multiline and "MultiLineEditBox" or "EditBox") |
| end |
| if v.multiline then |
| local lines = 4 |
| if type(v.multiline) == "number" then |
| lines = v.multiline |
| end |
| control:SetHeight(60 + (14*lines)) |
| if v.multiline and control.SetNumLines then |
| control:SetNumLines(tonumber(v.multiline) or 4) |
| end |
| control:SetLabel(name) |
| control:SetCallback("OnEnterPressed",ActivateControl) |
1128,11 → 1141,26
| local value = GetOptionsMemberValue("get",v, options, path, appName) |
| control:SetValue(value) |
| control:SetCallback("OnValueChanged",ActivateControl) |
| if v.descStyle == "inline" then |
| local desc = GetOptionsMemberValue("desc", v, options, path, appName) |
| control:SetDescription(desc) |
| end |
| local image = GetOptionsMemberValue("image", v, options, path, appName) |
| local imageCoords = GetOptionsMemberValue("imageCoords", v, options, path, appName) |
| if type(image) == "string" then |
| if type(imageCoords) == "table" then |
| control:SetImage(image, unpack(imageCoords)) |
| else |
| control:SetImage(image) |
| end |
| end |
| elseif v.type == "range" then |
| control = gui:Create("Slider") |
| control:SetLabel(name) |
| control:SetSliderValues(v.min or 0,v.max or 100, v.bigStep or v.step or 0) |
| control:SetSliderValues(v.softMin or v.min or 0, v.softMax or v.max or 100, v.bigStep or v.step or 0) |
| control:SetIsPercent(v.isPercent) |
| local value = GetOptionsMemberValue("get",v, options, path, appName) |
| if type(value) ~= "number" then |
1147,7 → 1175,8
| local controlType = v.dialogControl or v.control or "Dropdown" |
| control = gui:Create(controlType) |
| if not control then |
| error(("Invalid Custom Control Type - %s"):format(tostring(controlType))) |
| geterrorhandler()(("Invalid Custom Control Type - %s"):format(tostring(controlType))) |
| control = gui:Create("Dropdown") |
| end |
| control:SetLabel(name) |
| control:SetList(values) |
1170,13 → 1199,15
| tinsert(valuesort, value) |
| end |
| end |
| table.sort(valuesort) |
| tsort(valuesort) |
| if controlType then |
| control = gui:Create(controlType) |
| if not control then |
| error(("Invalid Custom Control Type - %s"):format(tostring(controlType))) |
| geterrorhandler()(("Invalid Custom Control Type - %s"):format(tostring(controlType))) |
| end |
| end |
| if control then |
| control:SetMultiselect(true) |
| control:SetLabel(name) |
| control:SetList(values) |
1212,8 → 1243,8
| local text = values[value] |
| local check = gui:Create("CheckBox") |
| check:SetLabel(text) |
| check:SetUserData('value', value) |
| check:SetUserData('text', text) |
| check:SetUserData("value", value) |
| check:SetUserData("text", text) |
| check:SetDisabled(disabled) |
| check:SetTriState(v.tristate) |
| check:SetValue(GetOptionsMemberValue("get",v, options, path, appName, value)) |
1273,14 → 1304,14
| local imageCoords = GetOptionsMemberValue("imageCoords",v, options, path, appName) |
| local image, width, height = GetOptionsMemberValue("image",v, options, path, appName) |
| if type(image) == 'string' then |
| if type(image) == "string" then |
| if not width then |
| width = GetOptionsMemberValue("imageWidth",v, options, path, appName) |
| end |
| if not height then |
| height = GetOptionsMemberValue("imageHeight",v, options, path, appName) |
| end |
| if type(imageCoords) == 'table' then |
| if type(imageCoords) == "table" then |
| control:SetImage(image, unpack(imageCoords)) |
| else |
| control:SetImage(image) |
1331,7 → 1362,7
| end |
| local function BuildPath(path, ...) |
| for i = 1, select('#',...) do |
| for i = 1, select("#",...) do |
| tinsert(path, (select(i,...))) |
| end |
| end |
1350,7 → 1381,7
| feedpath[i] = path[i] |
| end |
| BuildPath(feedpath, string.split("\001", uniquevalue)) |
| BuildPath(feedpath, ("\001"):split(uniquevalue)) |
| local group = options |
| for i = 1, #feedpath do |
| if not group then return end |
1362,9 → 1393,9
| GameTooltip:SetOwner(button, "ANCHOR_NONE") |
| if widget.type == "TabGroup" then |
| GameTooltip:SetPoint("BOTTOM",button,"TOP") |
| GameTooltip:SetPoint("BOTTOM",button,"TOP") |
| else |
| GameTooltip:SetPoint("LEFT",button,"RIGHT") |
| GameTooltip:SetPoint("LEFT",button,"RIGHT") |
| end |
| GameTooltip:SetText(name, 1, .82, 0, 1) |
1390,7 → 1421,7
| feedpath[i] = path[i] |
| end |
| BuildPath(feedpath, string.split("\001", uniquevalue)) |
| BuildPath(feedpath, ("\001"):split(uniquevalue)) |
| local group = options |
| for i = 1, #feedpath do |
1423,7 → 1454,7
| feedpath[i] = path[i] |
| end |
| BuildPath(feedpath, string.split("\001", uniquevalue)) |
| BuildPath(feedpath, ("\001"):split(uniquevalue)) |
| local group = options |
| for i = 1, #feedpath do |
| group = GetSubOption(group, feedpath[i]) |
1459,17 → 1490,13
| local grouptype, parenttype = options.childGroups, "none" |
| --temp path table to pass to callbacks as we traverse the tree |
| local temppath = new() |
| for i = 1, #path do |
| local v = path[i] |
| temppath[i] = v |
| group = GetSubOption(group, v) |
| inline = inline or pickfirstset(v.dialogInline,v.guiInline,v.inline, false) |
| parenttype = grouptype |
| grouptype = group.childGroups |
| end |
| del(temppath) |
| if not parenttype then |
| parenttype = "tree" |
1497,7 → 1524,7
| --Add a scrollframe if we are not going to add a group control, this is the inverse of the conditions for that later on |
| if (not (hasChildGroups and not inline)) or (grouptype ~= "tab" and grouptype ~= "select" and (parenttype == "tree" and not isRoot)) then |
| if container.type ~= "InlineGroup" then |
| if container.type ~= "InlineGroup" and container.type ~= "SimpleGroup" then |
| scroll = gui:Create("ScrollFrame") |
| scroll:SetLayout("flow") |
| scroll.width = "fill" |
1520,7 → 1547,7
| end |
| if hasChildGroups and not inline then |
| local name = GetOptionsMemberValue("name", group, options, path, appName) |
| if grouptype == "tab" then |
| local tab = gui:Create("TabGroup") |
1554,6 → 1581,7
| elseif grouptype == "select" then |
| local select = gui:Create("DropdownGroup") |
| select:SetTitle(name) |
| InjectInfo(select, options, group, path, rootframe, appName) |
| select:SetCallback("OnGroupSelected", GroupSelected) |
| local status = AceConfigDialog:GetStatusTable(appName, path) |
1572,7 → 1600,7
| end |
| if firstgroup then |
| select:SetGroup( (GroupExists(appName, options, path,status.groups.selected) and status.groups.selected) or firstgroup) |
| select:SetGroup((GroupExists(appName, options, path,status.groups.selected) and status.groups.selected) or firstgroup) |
| end |
| select.width = "fill" |
1626,9 → 1654,10
| AceConfigDialog.OpenFrames[appName]:Hide() |
| end |
| if AceConfigDialog.BlizOptions and AceConfigDialog.BlizOptions[appName] then |
| local widget = AceConfigDialog.BlizOptions[appName] |
| if not widget:IsVisible() then |
| widget:ReleaseChildren() |
| for key, widget in pairs(AceConfigDialog.BlizOptions[appName]) do |
| if not widget:IsVisible() then |
| widget:ReleaseChildren() |
| end |
| end |
| end |
| this.closing[appName] = nil |
1636,21 → 1665,25
| if this.closeAll then |
| for k, v in pairs(AceConfigDialog.OpenFrames) do |
| v:Hide() |
| if not this.closeAllOverride[k] then |
| v:Hide() |
| end |
| end |
| this.closeAll = nil |
| wipe(this.closeAllOverride) |
| end |
| for appName in pairs(this.apps) do |
| if AceConfigDialog.OpenFrames[appName] then |
| local user = AceConfigDialog.OpenFrames[appName]:GetUserDataTable() |
| AceConfigDialog:Open(appName, user.basepath and unpack(user.basepath)) |
| AceConfigDialog:Open(appName, unpack(user.basepath or emptyTbl)) |
| end |
| if AceConfigDialog.BlizOptions and AceConfigDialog.BlizOptions[appName] then |
| local widget = AceConfigDialog.BlizOptions[appName] |
| local user = widget:GetUserDataTable() |
| if widget:IsVisible() then |
| AceConfigDialog:Open(widget:GetUserData('appName'), widget, user.basepath and unpack(user.basepath)) |
| for key, widget in pairs(AceConfigDialog.BlizOptions[appName]) do |
| local user = widget:GetUserDataTable() |
| if widget:IsVisible() then |
| AceConfigDialog:Open(widget:GetUserData("appName"), widget, unpack(user.basepath or emptyTbl)) |
| end |
| end |
| end |
| this.apps[appName] = nil |
1658,6 → 1691,11
| this:SetScript("OnUpdate", nil) |
| end |
| -- Upgrade the OnUpdate script as well, if needed. |
| if AceConfigDialog.frame:GetScript("OnUpdate") then |
| AceConfigDialog.frame:SetScript("OnUpdate", RefreshOnUpdate) |
| end |
| --- Close all open options windows |
| function AceConfigDialog:CloseAll() |
| AceConfigDialog.frame.closeAll = true |
1729,7 → 1767,7
| tinsert(path, container) |
| container = nil |
| end |
| for n = 1, select('#',...) do |
| for n = 1, select("#",...) do |
| tinsert(path, (select(n, ...))) |
| end |
1737,10 → 1775,10
| if container then |
| f = container |
| f:ReleaseChildren() |
| f:SetUserData('appName', appName) |
| f:SetUserData('iscustom', true) |
| f:SetUserData("appName", appName) |
| f:SetUserData("iscustom", true) |
| if #path > 0 then |
| f:SetUserData('basepath', copy(path)) |
| f:SetUserData("basepath", copy(path)) |
| end |
| local status = AceConfigDialog:GetStatusTable(appName) |
| if not status.width then |
1752,6 → 1790,9
| if f.SetStatusTable then |
| f:SetStatusTable(status) |
| end |
| if f.SetTitle then |
| f:SetTitle(name or "") |
| end |
| else |
| if not self.OpenFrames[appName] then |
| f = gui:Create("Frame") |
1761,9 → 1802,9
| end |
| f:ReleaseChildren() |
| f:SetCallback("OnClose", FrameOnClose) |
| f:SetUserData('appName', appName) |
| f:SetUserData("appName", appName) |
| if #path > 0 then |
| f:SetUserData('basepath', copy(path)) |
| f:SetUserData("basepath", copy(path)) |
| end |
| f:SetTitle(name or "") |
| local status = AceConfigDialog:GetStatusTable(appName) |
1775,17 → 1816,34
| f:Show() |
| end |
| del(path) |
| if AceConfigDialog.frame.closeAll then |
| -- close all is set, but thats not good, since we're just opening here, so force it |
| AceConfigDialog.frame.closeAllOverride[appName] = true |
| end |
| end |
| AceConfigDialog.BlizOptions = AceConfigDialog.BlizOptions or {} |
| -- convert pre-39 BlizOptions structure to the new format |
| if oldminor and oldminor < 39 and AceConfigDialog.BlizOptions then |
| local old = AceConfigDialog.BlizOptions |
| local new = {} |
| for key, widget in pairs(old) do |
| local appName = widget:GetUserData("appName") |
| if not new[appName] then new[appName] = {} end |
| new[appName][key] = widget |
| end |
| AceConfigDialog.BlizOptions = new |
| else |
| AceConfigDialog.BlizOptions = AceConfigDialog.BlizOptions or {} |
| end |
| local function FeedToBlizPanel(widget, event) |
| local path = widget:GetUserData('path') |
| AceConfigDialog:Open(widget:GetUserData('appName'), widget, path and unpack(path)) |
| local path = widget:GetUserData("path") |
| AceConfigDialog:Open(widget:GetUserData("appName"), widget, unpack(path or emptyTbl)) |
| end |
| local function ClearBlizPanel(widget, event) |
| local appName = widget:GetUserData('appName') |
| local appName = widget:GetUserData("appName") |
| AceConfigDialog.frame.closing[appName] = true |
| AceConfigDialog.frame:SetScript("OnUpdate", RefreshOnUpdate) |
| end |
1811,23 → 1869,27
| local BlizOptions = AceConfigDialog.BlizOptions |
| local key = appName |
| for n = 1, select('#', ...) do |
| key = key..'\001'..select(n, ...) |
| for n = 1, select("#", ...) do |
| key = key.."\001"..select(n, ...) |
| end |
| if not BlizOptions[key] then |
| if not BlizOptions[appName] then |
| BlizOptions[appName] = {} |
| end |
| if not BlizOptions[appName][key] then |
| local group = gui:Create("BlizOptionsGroup") |
| BlizOptions[key] = group |
| BlizOptions[appName][key] = group |
| group:SetName(name or appName, parent) |
| group:SetTitle(name or appName) |
| group:SetUserData('appName', appName) |
| if select('#', ...) > 0 then |
| group:SetUserData("appName", appName) |
| if select("#", ...) > 0 then |
| local path = {} |
| for n = 1, select('#',...) do |
| for n = 1, select("#",...) do |
| tinsert(path, (select(n, ...))) |
| end |
| group:SetUserData('path', path) |
| group:SetUserData("path", path) |
| end |
| group:SetCallback("OnShow", FeedToBlizPanel) |
| group:SetCallback("OnHide", ClearBlizPanel) |
AceDB-3.0/AceDB-3.0.lua
20,6 → 20,9
| -- the profile related APIs are not available. Only `:RegisterDefaults` and `:ResetProfile` are available on child-databases. |
| -- |
| -- For more details on how to use AceDB-3.0, see the [[AceDB-3.0 Tutorial]]. |
| -- |
| -- You may also be interested in [[libdualspec-1-0|LibDualSpec-1.0]] to do profile switching automatically when switching specs. |
| -- |
| -- @usage |
| -- MyAddon = LibStub("AceAddon-3.0"):NewAddon("DBExample") |
| -- |
36,17 → 39,23
| -- end |
| -- @class file |
| -- @name AceDB-3.0.lua |
| -- @release $Id: AceDB-3.0.lua 799 2009-04-09 05:00:05Z kaelten $ |
| local ACEDB_MAJOR, ACEDB_MINOR = "AceDB-3.0", 13 |
| -- @release $Id: AceDB-3.0.lua 940 2010-06-19 08:01:47Z nevcairiel $ |
| local ACEDB_MAJOR, ACEDB_MINOR = "AceDB-3.0", 21 |
| local AceDB, oldminor = LibStub:NewLibrary(ACEDB_MAJOR, ACEDB_MINOR) |
| if not AceDB then return end -- No upgrade needed |
| local type = type |
| local pairs, next = pairs, next |
| local rawget, rawset = rawget, rawset |
| local setmetatable = setmetatable |
| -- Lua APIs |
| local type, pairs, next, error = type, pairs, next, error |
| local setmetatable, getmetatable, rawset, rawget = setmetatable, getmetatable, rawset, rawget |
| -- WoW APIs |
| local _G = _G |
| -- Global vars/functions that we don't upvalue since they might get hooked, or upgraded |
| -- List them here for Mikk's FindGlobals script |
| -- GLOBALS: LibStub |
| AceDB.db_registry = AceDB.db_registry or {} |
| AceDB.frame = AceDB.frame or CreateFrame("Frame") |
126,6 → 135,9
| -- Called to remove all defaults in the default table from the database |
| local function removeDefaults(db, defaults, blocker) |
| -- remove all metatables from the db, so we don't accidentally create new sub-tables through them |
| setmetatable(db, nil) |
| -- loop through the defaults and remove their content |
| for k,v in pairs(defaults) do |
| if k == "*" or k == "**" then |
| if type(v) == "table" then |
140,7 → 152,7
| db[key] = nil |
| end |
| -- if it was specified, only strip ** content, but block values which were set in the key table |
| elseif k == "**" then |
| elseif k == "**" then |
| removeDefaults(value, v, defaults[key]) |
| end |
| end |
166,28 → 178,26
| end |
| end |
| end |
| -- remove all metatables from the db |
| setmetatable(db, nil) |
| end |
| -- This is called when a table section is first accessed, to set up the defaults |
| local function initSection(db, section, svstore, key, defaults) |
| local sv = rawget(db, "sv") |
| local tableCreated |
| if not sv[svstore] then sv[svstore] = {} end |
| if not sv[svstore][key] then |
| sv[svstore][key] = {} |
| tableCreated = true |
| end |
| local tbl = sv[svstore][key] |
| if defaults then |
| copyDefaults(tbl, defaults) |
| end |
| rawset(db, section, tbl) |
| return tableCreated, tbl |
| end |
199,7 → 209,7
| if key then |
| local defaultTbl = rawget(t, "defaults") |
| local defaults = defaultTbl and defaultTbl[section] |
| if section == "profile" then |
| local new = initSection(t, section, "profiles", key, defaults) |
| if new then |
221,7 → 231,7
| initSection(t, section, section, key, defaults) |
| end |
| end |
| return rawget(t, section) |
| end |
| } |
253,18 → 263,29
| -- Actual database initialization function |
| local function initdb(sv, defaults, defaultProfile, olddb, parent) |
| -- Generate the database keys for each section |
| -- Make a container for profile keys |
| if not sv.profileKeys then sv.profileKeys = {} end |
| -- map "true" to our "Default" profile |
| if defaultProfile == true then defaultProfile = "Default" end |
| -- Try to get the profile selected from the char db |
| local profileKey = sv.profileKeys[charKey] or defaultProfile or charKey |
| sv.profileKeys[charKey] = profileKey |
| -- This table contains keys that enable the dynamic creation |
| local profileKey |
| if not parent then |
| -- Make a container for profile keys |
| if not sv.profileKeys then sv.profileKeys = {} end |
| -- Try to get the profile selected from the char db |
| profileKey = sv.profileKeys[charKey] or defaultProfile or charKey |
| -- save the selected profile for later |
| sv.profileKeys[charKey] = profileKey |
| else |
| -- Use the profile of the parents DB |
| profileKey = parent.keys.profile or defaultProfile or charKey |
| -- clear the profileKeys in the DB, namespaces don't need to store them |
| sv.profileKeys = nil |
| end |
| -- This table contains keys that enable the dynamic creation |
| -- of each section of the table. The 'global' and 'profiles' |
| -- have a key of true, since they are handled in a special case |
| local keyTbl= { |
278,27 → 299,27
| ["global"] = true, |
| ["profiles"] = true, |
| } |
| validateDefaults(defaults, keyTbl, 1) |
| -- This allows us to use this function to reset an entire database |
| -- Clear out the old database |
| if olddb then |
| for k,v in pairs(olddb) do if not preserve_keys[k] then olddb[k] = nil end end |
| end |
| -- Give this database the metatable so it initializes dynamically |
| local db = setmetatable(olddb or {}, dbmt) |
| if not rawget(db, "callbacks") then |
| if not rawget(db, "callbacks") then |
| -- try to load CallbackHandler-1.0 if it loaded after our library |
| if not CallbackHandler then CallbackHandler = LibStub:GetLibrary("CallbackHandler-1.0", true) end |
| db.callbacks = CallbackHandler and CallbackHandler:New(db) or CallbackDummy |
| end |
| -- Copy methods locally into the database object, to avoid hitting |
| -- the metatable when calling methods |
| if not parent then |
| for name, func in pairs(DBObjectLib) do |
| db[name] = func |
308,7 → 329,7
| db.RegisterDefaults = DBObjectLib.RegisterDefaults |
| db.ResetProfile = DBObjectLib.ResetProfile |
| end |
| -- Set some properties in the database object |
| db.profiles = sv.profiles |
| db.keys = keyTbl |
316,22 → 337,38
| --db.sv_name = name |
| db.defaults = defaults |
| db.parent = parent |
| -- store the DB in the registry |
| AceDB.db_registry[db] = true |
| return db |
| end |
| -- handle PLAYER_LOGOUT |
| -- strip all defaults from all databases |
| -- and cleans up empty sections |
| local function logoutHandler(frame, event) |
| if event == "PLAYER_LOGOUT" then |
| for db in pairs(AceDB.db_registry) do |
| db.callbacks:Fire("OnDatabaseShutdown", db) |
| for section, key in pairs(db.keys) do |
| if db.defaults and db.defaults[section] and rawget(db, section) then |
| removeDefaults(db[section], db.defaults[section]) |
| db:RegisterDefaults(nil) |
| -- cleanup sections that are empty without defaults |
| local sv = rawget(db, "sv") |
| for section in pairs(db.keys) do |
| if rawget(sv, section) then |
| -- global is special, all other sections have sub-entrys |
| -- also don't delete empty profiles on main dbs, only on namespaces |
| if section ~= "global" and (section ~= "profiles" or rawget(db, "parent")) then |
| for key in pairs(sv[section]) do |
| if not next(sv[section][key]) then |
| sv[section][key] = nil |
| end |
| end |
| end |
| if not next(sv[section]) then |
| sv[section] = nil |
| end |
| end |
| end |
| end |
353,9 → 390,9
| if defaults and type(defaults) ~= "table" then |
| error("Usage: AceDBObject:RegisterDefaults(defaults): 'defaults' - table or nil expected.", 2) |
| end |
| validateDefaults(defaults, self.keys) |
| -- Remove any currently set defaults |
| if self.defaults then |
| for section,key in pairs(self.keys) do |
364,10 → 401,10
| end |
| end |
| end |
| -- Set the DBObject.defaults table |
| self.defaults = defaults |
| -- Copy in any defaults, only touching those sections already created |
| if defaults then |
| for section,key in pairs(self.keys) do |
385,32 → 422,37
| if type(name) ~= "string" then |
| error("Usage: AceDBObject:SetProfile(name): 'name' - string expected.", 2) |
| end |
| -- changing to the same profile, dont do anything |
| if name == self.keys.profile then return end |
| local oldProfile = self.profile |
| local defaults = self.defaults and self.defaults.profile |
| -- Callback: OnProfileShutdown, database |
| self.callbacks:Fire("OnProfileShutdown", self) |
| if oldProfile and defaults then |
| -- Remove the defaults from the old profile |
| removeDefaults(oldProfile, defaults) |
| end |
| self.profile = nil |
| self.keys["profile"] = name |
| self.sv.profileKeys[charKey] = name |
| -- if the storage exists, save the new profile |
| -- this won't exist on namespaces. |
| if self.sv.profileKeys then |
| self.sv.profileKeys[charKey] = name |
| end |
| -- populate to child namespaces |
| if self.children then |
| for _, db in pairs(self.children) do |
| DBObjectLib.SetProfile(db, name) |
| end |
| end |
| -- Callback: OnProfileChanged, database, newProfileKey |
| self.callbacks:Fire("OnProfileChanged", self, name) |
| end |
431,7 → 473,7
| end |
| local curProfile = self.keys.profile |
| local i = 0 |
| for profileKey in pairs(self.profiles) do |
| i = i + 1 |
444,7 → 486,7
| i = i + 1 |
| tbl[i] = curProfile |
| end |
| return tbl, i |
| end |
460,24 → 502,24
| if type(name) ~= "string" then |
| error("Usage: AceDBObject:DeleteProfile(name): 'name' - string expected.", 2) |
| end |
| if self.keys.profile == name then |
| error("Cannot delete the active profile in an AceDBObject.", 2) |
| end |
| if not rawget(self.sv.profiles, name) and not silent then |
| if not rawget(self.profiles, name) and not silent then |
| error("Cannot delete profile '" .. name .. "'. It does not exist.", 2) |
| end |
| self.sv.profiles[name] = nil |
| self.profiles[name] = nil |
| -- populate to child namespaces |
| if self.children then |
| for _, db in pairs(self.children) do |
| DBObjectLib.DeleteProfile(db, name, true) |
| end |
| end |
| -- Callback: OnProfileDeleted, database, profileKey |
| self.callbacks:Fire("OnProfileDeleted", self, name) |
| end |
490,57 → 532,60
| if type(name) ~= "string" then |
| error("Usage: AceDBObject:CopyProfile(name): 'name' - string expected.", 2) |
| end |
| if name == self.keys.profile then |
| error("Cannot have the same source and destination profiles.", 2) |
| end |
| if not rawget(self.sv.profiles, name) and not silent then |
| if not rawget(self.profiles, name) and not silent then |
| error("Cannot copy profile '" .. name .. "'. It does not exist.", 2) |
| end |
| -- Reset the profile before copying |
| DBObjectLib.ResetProfile(self) |
| DBObjectLib.ResetProfile(self, nil, true) |
| local profile = self.profile |
| local source = self.sv.profiles[name] |
| local source = self.profiles[name] |
| copyTable(source, profile) |
| -- populate to child namespaces |
| if self.children then |
| for _, db in pairs(self.children) do |
| DBObjectLib.CopyProfile(db, name, true) |
| end |
| end |
| -- Callback: OnProfileCopied, database, sourceProfileKey |
| self.callbacks:Fire("OnProfileCopied", self, name) |
| end |
| --- Resets the current profile to the default values (if specified). |
| -- @param noChildren if set to true, the reset will not be populated to the child namespaces of this DB object |
| function DBObjectLib:ResetProfile(noChildren) |
| -- @param noCallbacks if set to true, won't fire the OnProfileReset callback |
| function DBObjectLib:ResetProfile(noChildren, noCallbacks) |
| local profile = self.profile |
| for k,v in pairs(profile) do |
| profile[k] = nil |
| end |
| local defaults = self.defaults and self.defaults.profile |
| if defaults then |
| copyDefaults(profile, defaults) |
| end |
| -- populate to child namespaces |
| if self.children and not noChildren then |
| for _, db in pairs(self.children) do |
| DBObjectLib.ResetProfile(db) |
| DBObjectLib.ResetProfile(db, nil, noCallbacks) |
| end |
| end |
| -- Callback: OnProfileReset, database |
| self.callbacks:Fire("OnProfileReset", self) |
| if not noCallbacks then |
| self.callbacks:Fire("OnProfileReset", self) |
| end |
| end |
| --- Resets the entire database, using the string defaultProfile as the new default |
550,16 → 595,16
| if defaultProfile and type(defaultProfile) ~= "string" then |
| error("Usage: AceDBObject:ResetDB(defaultProfile): 'defaultProfile' - string or nil expected.", 2) |
| end |
| local sv = self.sv |
| for k,v in pairs(sv) do |
| sv[k] = nil |
| end |
| local parent = self.parent |
| initdb(sv, self.defaults, defaultProfile, self) |
| -- fix the child namespaces |
| if self.children then |
| if not sv.namespaces then sv.namespaces = {} end |
568,12 → 613,12
| initdb(sv.namespaces[name], db.defaults, self.keys.profile, db, self) |
| end |
| end |
| -- Callback: OnDatabaseReset, database |
| -- Callback: OnDatabaseReset, database |
| self.callbacks:Fire("OnDatabaseReset", self) |
| -- Callback: OnProfileChanged, database, profileKey |
| self.callbacks:Fire("OnProfileChanged", self, self.keys["profile"]) |
| return self |
| end |
592,15 → 637,15
| if self.children and self.children[name] then |
| error ("Usage: AceDBObject:RegisterNamespace(name, defaults): 'name' - a namespace with that name already exists.", 2) |
| end |
| local sv = self.sv |
| if not sv.namespaces then sv.namespaces = {} end |
| if not sv.namespaces[name] then |
| sv.namespaces[name] = {} |
| end |
| local newDB = initdb(sv.namespaces[name], defaults, self.keys.profile, nil, self) |
| if not self.children then self.children = {} end |
| self.children[name] = newDB |
| return newDB |
608,7 → 653,7
| --- Returns an already existing namespace from the database object. |
| -- @param name The name of the new namespace |
| -- @param silent if true, the addon is optional, silently return nil if its not found |
| -- @param silent if true, the addon is optional, silently return nil if its not found |
| -- @usage |
| -- local namespace = self.db:GetNamespace('namespace') |
| -- @return the namespace object if found |
648,25 → 693,25
| function AceDB:New(tbl, defaults, defaultProfile) |
| if type(tbl) == "string" then |
| local name = tbl |
| tbl = getglobal(name) |
| tbl = _G[name] |
| if not tbl then |
| tbl = {} |
| setglobal(name, tbl) |
| _G[name] = tbl |
| end |
| end |
| if type(tbl) ~= "table" then |
| error("Usage: AceDB:New(tbl, defaults, defaultProfile): 'tbl' - table expected.", 2) |
| end |
| if defaults and type(defaults) ~= "table" then |
| error("Usage: AceDB:New(tbl, defaults, defaultProfile): 'defaults' - table expected.", 2) |
| end |
| if defaultProfile and type(defaultProfile) ~= "string" and defaultProfile ~= true then |
| error("Usage: AceDB:New(tbl, defaults, defaultProfile): 'defaultProfile' - string or true expected.", 2) |
| end |
| return initdb(tbl, defaults, defaultProfile) |
| end |
LibStub/LibStub.toc
File deleted
WoWInterface
AddOn Sites
© 2004 - 2022 MMOUI
vBulletin © 2025, Jelsoft Enterprises Ltd