38 lines
1.0 KiB
Lua
38 lines
1.0 KiB
Lua
|
|
local myname, ns = ...
|
|
|
|
|
|
local BORDER_TEXTURE = "Interface\\Common\\Common-Input-Border"
|
|
|
|
|
|
function ns.NewTextInput(parent)
|
|
local editbox = CreateFrame("EditBox", nil, parent)
|
|
editbox:SetAutoFocus(false)
|
|
editbox:SetSize(105, 32)
|
|
editbox:SetFontObject("GameFontHighlightSmall")
|
|
|
|
local left = editbox:CreateTexture(nil, "BACKGROUND")
|
|
left:SetSize(8, 20)
|
|
left:SetPoint("LEFT", -5, 0)
|
|
left:SetTexture(BORDER_TEXTURE)
|
|
left:SetTexCoord(0, 0.0625, 0, 0.625)
|
|
|
|
local right = editbox:CreateTexture(nil, "BACKGROUND")
|
|
right:SetSize(8, 20)
|
|
right:SetPoint("RIGHT")
|
|
right:SetTexture(BORDER_TEXTURE)
|
|
right:SetTexCoord(0.9375, 1, 0, 0.625)
|
|
|
|
local center = editbox:CreateTexture(nil, "BACKGROUND")
|
|
center:SetHeight(20)
|
|
center:SetPoint("TOPLEFT", left, "TOPRIGHT")
|
|
center:SetPoint("BOTTOMRIGHT", right, "BOTTOMLEFT")
|
|
center:SetTexture(BORDER_TEXTURE)
|
|
center:SetTexCoord(0.0625, 0.9375, 0, 0.625)
|
|
|
|
editbox:SetScript("OnEscapePressed", editbox.ClearFocus)
|
|
editbox:SetScript("OnEnterPressed", editbox.ClearFocus)
|
|
|
|
return editbox
|
|
end
|