Hey guys, since 7.1 my Copy From Chat hasn't worked not really sure what's wrong i've tried a lot of stuff, hope someone can help me
Lua Code:
local CopyFrame = CreateFrame("Frame", nil, UIParent)
CopyFrame:SetSize(600, 250)
CopyFrame:SetPoint("CENTER", UIParent, 0, 0)
CopyFrame:SetFrameStrata("DIALOG")
CopyFrame:Hide()
CopyFrame:SetBackdrop({
edgeFile = "Interface\\Buttons\\WHITE8x8", edgeSize = 2,
})
CopyFrame:SetBackdrop(0.050, 0.050, 0.050, 0.80)
local CopyEditBox = CreateFrame("EditBox", nil, CopyFrame)
CopyEditBox:SetSize(600, 250)
CopyEditBox:SetMultiLine(true)
CopyEditBox:SetMaxLetters(99999)
CopyEditBox:EnableMouse(true)
CopyEditBox:SetAutoFocus(false)
CopyEditBox:SetFont('Fonts\\ARIALN.ttf', 12, "THINOUTLINE")
CopyEditBox:SetShadowOffset(1, -1)
CopyEditBox:SetShadowColor(0,0,0)
CopyEditBox:SetScript("OnEscapePressed", function() CopyFrame:Hide() end)
--local CopyCloseButton = CreateFrame("Button", nil, CopyFrame, "UIPanelCloseButton")
local ScrollArea = CreateFrame("ScrollFrame", "ACopyScrollArea", CopyFrame, "UIPanelScrollFrameTemplate")
ScrollArea:SetPoint("TOPLEFT", CopyFrame, "TOPLEFT", 8, -28)
ScrollArea:SetPoint("BOTTOMRIGHT", CopyFrame, "BOTTOMRIGHT", -28, 8)
ScrollArea:SetScrollChild(CopyEditBox)
local Lines = {}
local function GetLines(...)
local Count = 1
for i = select("#", ...), 1, -1 do
local Region = select(i, ...)
if (Region:GetObjectType() == "FontString") then
Lines[Count] = tostring(Region:GetText())
Count = Count + 1
end
end
return Count - 1
end
local function CopyText(self)
local LineCount = GetLines(self:GetRegions())
local Text = table.concat(Lines, "\n", 1, LineCount)
if CopyFrame:IsVisible() then return CopyFrame:Hide() end
CopyEditBox:SetText(Text)
CopyFrame:Show()
end
for i = 1, NUM_CHAT_WINDOWS do
local Frame = _G["ChatFrame"..i]
local Button = CreateFrame("Button", nil, Frame)
Button:SetSize(16, 16)
Button:SetPoint("TOPRIGHT", 0, 1.5)
Button:SetAlpha(0.25)
local ButtonTexture = Button:CreateTexture(nil, "BORDER")
ButtonTexture:SetSize(22, 22)
ButtonTexture:SetPoint("CENTER", Button, 0.5, 0)
ButtonTexture:SetTexture("Interface\\Buttons\\WHITE8x8")
ButtonTexture:SetVertexColor(0.355, 0.355, 0.355)
Button:SetScript("OnMouseUp", function(self) CopyText(self.ChatFrame) end)
Button:SetScript("OnEnter", function(self) UIFrameFadeIn(Button, 1, Button:GetAlpha(), 1) end)
Button:SetScript("OnLeave", function(self) UIFrameFadeIn(Button, 1, Button:GetAlpha(), 0.25) end)
Button.ChatFrame = Frame
end