WidgetWarlock.lua

   1
   2
   3 WidgetWarlock = {}
   4
   5
   6 WidgetWarlock.TooltipBorderBG = {
   7         bgFile = "Interface\\ChatFrame\\ChatFrameBackground",
   8         edgeFile = "Interface\\Tooltips\\UI-Tooltip-Border",
   9         edgeSize = 16,
  10         insets = {left = 4, right = 4, top = 4, bottom = 4}
  11 }
  12
  13
  14 function WidgetWarlock.SummonCheckBox(size, parent, ...)
  15         local check = CreateFrame("CheckButton", nil, parent)
  16         check:SetWidth(size)
  17         check:SetHeight(size)
  18         if select(1, ...) then check:SetPoint(...) end
  19
  20         check:SetNormalTexture("Interface\\Buttons\\UI-CheckBox-Up")
  21         check:SetPushedTexture("Interface\\Buttons\\UI-CheckBox-Down")
  22         check:SetHighlightTexture("Interface\\Buttons\\UI-CheckBox-Highlight")
  23         check:SetDisabledCheckedTexture("Interface\\Buttons\\UI-CheckBox-Check-Disabled")
  24         check:SetCheckedTexture("Interface\\Buttons\\UI-CheckBox-Check")
  25
  26         return check
  27 end
  28
  29
  30 function WidgetWarlock.SummonOptionHouseBaseFrame(frametype)
  31         local frame = CreateFrame(frametype or "Frame", nil, OptionHouseOptionsFrame)
  32         frame:SetWidth(630)
  33         frame:SetHeight(305)
  34         frame:SetPoint("TOPLEFT", 190, -103)
  35         return frame
  36 end
  37
  38
  39
  40 function WidgetWarlock.SummonTexture(parent, w, h, texture, ...)
  41         local tex = parent:CreateTexture()
  42         tex:SetWidth(w)
  43         tex:SetHeight(h)
  44         tex:SetTexture(texture)
  45         if select(1, ...) then tex:SetPoint(...) end
  46         return tex
  47 end
  48
  49
  50 function WidgetWarlock.SummonFontString(parent, a1, a2, inherit, text, ...)
  51         local fs = parent:CreateFontString(a1, a2, inherit)
  52         fs:SetText(text)
  53         if select(1, ...) then fs:SetPoint(...) end
  54         return fs
  55 end