6 WidgetWarlock
.TooltipBorderBG
= {
7 bgFile
= "Interface\\ChatFrame\\ChatFrameBackground",
8 edgeFile
= "Interface\\Tooltips\\UI-Tooltip-Border",
10 insets
= {left
= 4, right
= 4, top
= 4, bottom
= 4}
14 function WidgetWarlock
.SummonCheckBox(size
, parent
, ...)
15 local check
= CreateFrame("CheckButton", nil, parent
)
18 if select(1, ...) then check
:SetPoint(...) end
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")
30 function WidgetWarlock
.SummonOptionHouseBaseFrame(frametype
)
31 local frame
= CreateFrame(frametype
or "Frame", nil, OptionHouseOptionsFrame
)
34 frame
:SetPoint("TOPLEFT", 190, -103)
40 function WidgetWarlock
.SummonTexture(parent
, w
, h
, texture
, ...)
41 local tex
= parent
:CreateTexture()
44 tex
:SetTexture(texture
)
45 if select(1, ...) then tex
:SetPoint(...) end
50 function WidgetWarlock
.SummonFontString(parent
, a1
, a2
, inherit
, text
, ...)
51 local fs
= parent
:CreateFontString(a1
, a2
, inherit
)
53 if select(1, ...) then fs
:SetPoint(...) end