Exiles/coa-details
3
0
Fork 0
Code Pull Requests Actions Packages Releases 2 Wiki Activity

8.3.0 > 9.0.1

Browse Source
This commit is contained in:
Tercio Jose
2020-10-16 19:51:44 -03:00
parent 530a825358
commit c42a35657d
223 changed files with 93840 additions and 94757 deletions
Download Patch File Download Diff File Expand all files Collapse all files
Libs/DF/textentry.lua
+21 -9
View File
@@ -245,6 +245,18 @@ DF.TextEntryCounter = DF.TextEntryCounter or 1
end
end
function TextEntryMetaFunctions:SetBackdrop(...)
return self.editbox:SetBackdrop(...)
end
function TextEntryMetaFunctions:SetBackdropColor(...)
return self.editbox:SetBackdropColor(...)
end
function TextEntryMetaFunctions:SetBackdropBorderColor(...)
return self.editbox:SetBackdropBorderColor(...)
end
--> select all text
function TextEntryMetaFunctions:SelectAll()
self.editbox:HighlightText()
@@ -608,7 +620,7 @@ function DF:NewTextEntry (parent, container, name, member, w, h, func, param1, p
TextEntryObject.container = container
TextEntryObject.have_tooltip = nil
TextEntryObject.editbox = CreateFrame ("EditBox", name, parent)
TextEntryObject.editbox = CreateFrame ("EditBox", name, parent,"BackdropTemplate")
TextEntryObject.editbox:SetSize (232, 20)
TextEntryObject.editbox:SetBackdrop ({bgFile = [["Interface\DialogFrame\UI-DialogBox-Background"]], tileSize = 64, tile = true, edgeFile = [[Interface\DialogFrame\UI-DialogBox-Border]], edgeSize = 10, insets = {left = 1, right = 1, top = 0, bottom = 0}})
@@ -1111,17 +1123,17 @@ function DF:NewSpecialLuaEditorEntry (parent, w, h, member, name, nointent, show
name = name:gsub ("$parent", parentName)
end
local borderframe = CreateFrame ("Frame", name, parent)
local borderframe = CreateFrame ("Frame", name, parent,"BackdropTemplate")
borderframe:SetSize (w, h)
if (member) then
parent [member] = borderframe
end
local scrollframe = CreateFrame ("ScrollFrame", name, borderframe, "UIPanelScrollFrameTemplate")
local scrollframeNumberLines = CreateFrame ("ScrollFrame", name .. "NumberLines", borderframe, "UIPanelScrollFrameTemplate")
local scrollframe = CreateFrame ("ScrollFrame", name, borderframe, "UIPanelScrollFrameTemplate, BackdropTemplate")
local scrollframeNumberLines = CreateFrame ("ScrollFrame", name .. "NumberLines", borderframe, "UIPanelScrollFrameTemplate, BackdropTemplate")
scrollframe.editbox = CreateFrame ("editbox", "$parentEditBox", scrollframe)
scrollframe.editbox = CreateFrame ("editbox", "$parentEditBox", scrollframe,"BackdropTemplate")
scrollframe.editbox:SetMultiLine (true)
scrollframe.editbox:SetAutoFocus (false)
scrollframe.editbox:SetScript ("OnCursorChanged", _G.ScrollingEdit_OnCursorChanged)
@@ -1131,7 +1143,7 @@ function DF:NewSpecialLuaEditorEntry (parent, w, h, member, name, nointent, show
--line number
if (showLineNumbers) then
scrollframeNumberLines.editbox = CreateFrame ("editbox", "$parentLineNumbers", scrollframeNumberLines)
scrollframeNumberLines.editbox = CreateFrame ("editbox", "$parentLineNumbers", scrollframeNumberLines, "BackdropTemplate")
scrollframeNumberLines.editbox:SetMultiLine (true)
scrollframeNumberLines.editbox:SetAutoFocus (false)
scrollframeNumberLines.editbox:SetEnabled (false)
@@ -1147,7 +1159,7 @@ function DF:NewSpecialLuaEditorEntry (parent, w, h, member, name, nointent, show
for i = 1, 1000 do
scrollframeNumberLines.editbox:Insert (i .. "\n")
end
end
--place the lua code field 20 pixels to the right to make run to the lines scroll
scrollframe:SetPoint ("topleft", borderframe, "topleft", 30, -10)
@@ -1190,7 +1202,7 @@ function DF:NewSpecialLuaEditorEntry (parent, w, h, member, name, nointent, show
scrollframeNumberLines:SetPoint ("bottomright", borderframe, "bottomright", -10, 10)
scrollframeNumberLines:Hide()
end
--16:40
borderframe.SetAsAutoComplete = TextEntryMetaFunctions.SetAsAutoComplete
scrollframe:SetScript ("OnSizeChanged", function (self)
@@ -1260,7 +1272,7 @@ local function bit (x,b)
end
local function lor (x,y)
result = 0
local result = 0
for p=1,8 do result = result + (((bit(x,p) or bit(y,p)) == true) and 2^(p-1) or 0) end
return result
end