View Single Post
06-13-19, 10:42 AM   #2
Fizzlemizz
I did that?
 
Fizzlemizz's Avatar
Premium Member
AddOn Author - Click to view addons
Join Date: Dec 2011
Posts: 1,871
Maybe something more like a scrolling text box so you don't have to worry about sizes.

Lua Code:
  1. local backdrop = {
  2.         bgFile = "Interface/BUTTONS/WHITE8X8",
  3.         edgeFile = "Interface/GLUES/Common/Glue-Tooltip-Border",
  4.         tile = true,
  5.         edgeSize = 8,
  6.         tileSize = 8,
  7.         insets = {
  8.             left = 5,
  9.             right = 5,
  10.             top = 5,
  11.             bottom = 5,
  12.         },
  13.     }
  14.      
  15.      
  16.     local f = CreateFrame("Frame", "MyScrollMessageTextFrame", UIParent)
  17.     f:SetSize(150, 150)
  18.     f:SetPoint("CENTER")
  19.     f:SetFrameStrata("BACKGROUND")
  20.     f:SetBackdrop(backdrop)
  21.     f:SetBackdropColor(0, 0, 0)
  22.     f.Close = CreateFrame("Button", "$parentClose", f)
  23.     f.Close:SetSize(24, 24)
  24.     f.Close:SetPoint("TOPRIGHT")
  25.     f.Close:SetNormalTexture("Interface/Buttons/UI-Panel-MinimizeButton-Up")
  26.     f.Close:SetPushedTexture("Interface/Buttons/UI-Panel-MinimizeButton-Down")
  27.     f.Close:SetHighlightTexture("Interface/Buttons/UI-Panel-MinimizeButton-Highlight", "ADD")
  28.     f.Close:SetScript("OnClick", function(self)
  29.         self:GetParent():Hide()
  30.     end)
  31.     f.Select = CreateFrame("Button", "$parentSelect", f, "UIPanelButtonTemplate")
  32.     f.Select:SetSize(14, 14)
  33.     f.Select:SetPoint("RIGHT", f.Close, "LEFT")
  34.     f.Select:SetText("S")
  35.     f.Select:SetScript("OnClick", function(self)
  36.         self:GetParent().Text:HighlightText() -- parameters (start, end) or default all
  37.         self:GetParent().Text:SetFocus()
  38.     end)
  39.      
  40.     f.SF = CreateFrame("ScrollFrame", "$parent_DF", f, "UIPanelScrollFrameTemplate")
  41.     f.SF:SetPoint("TOPLEFT", f, 12, -30)
  42.     f.SF:SetPoint("BOTTOMRIGHT", f, -30, 10)
  43.     f.Text = CreateFrame("EditBox", nil, f)
  44.     f.Text:SetMultiLine(true)
  45.     f.Text:SetSize(180, 170)
  46.     f.Text:SetPoint("TOPLEFT", f.SF)
  47.     f.Text:SetPoint("BOTTOMRIGHT", f.SF)
  48.     f.Text:SetMaxLetters(99999)
  49.     f.Text:SetFontObject(GameFontNormal)
  50.     f.Text:SetAutoFocus(false)
  51.     f.Text:SetScript("OnEscapePressed", function(self) self:ClearFocus() end)
  52.     f.SF:SetScrollChild(f.Text)
  53.      
  54.     f.Text:SetText("bfs fasjdf dsaf adsj fasjkf bsafjsaf bjs fasjkf bjsf basf badsjkf dsakfbhaskf asjkf asjkf skaf sak fsk fdsaf kkl l fjds rewpwfrjpo foewf jjfwe fpwfevzv mcvn  qo fnaw[ffgngnerf we foiweffgorenfg[f fewfn sdskfn asdf sp ffq[ofkgbhp    i regp nIF N 'OFGRE  NG;G KG IGN ;EFPIREG REG  ZG;  ergregp esg gg-ero  rdf45540 4y   q8wffn ")

Look in SharedXML\SharedFontStyles.xml for lots of GameFont font objects.
__________________
Fizzlemizz
Maintainer of Discord Unit Frames and Discord Art.
Author of FauxMazzle, FauxMazzleHUD and Move Pad Plus.

Last edited by Fizzlemizz : 06-13-19 at 12:20 PM.
  Reply With Quote