Add search box
This commit is contained in:
parent
82f4233385
commit
cef1ae7700
|
@ -202,6 +202,7 @@ local _, _, _, _, _, _, _, _, RECIPE = GetAuctionItemClasses()
|
|||
local quality_colors = {}
|
||||
for i=1,7 do quality_colors[i] = select(4, GetItemQualityColor(i)) end
|
||||
local offset = 0
|
||||
local searchstring
|
||||
local function Refresh()
|
||||
local n = GetMerchantNumItems()
|
||||
for i,row in pairs(rows) do
|
||||
|
@ -229,6 +230,8 @@ local function Refresh()
|
|||
row.backdrop:Show()
|
||||
end
|
||||
|
||||
row:SetAlpha(searchstring and not name:lower():match(searchstring) and 0.5 or 1)
|
||||
|
||||
row.icon:SetTexture(itemTexture)
|
||||
row.ItemName:SetText((numAvailable > -1 and ("["..numAvailable.."] ") or "").. color.. (name or "<Loading item data>").. (itemStackCount > 1 and ("|r x"..itemStackCount) or ""))
|
||||
|
||||
|
@ -260,6 +263,56 @@ local function Refresh()
|
|||
end
|
||||
|
||||
|
||||
local editbox = CreateFrame('EditBox', nil, GVS)
|
||||
editbox:SetAutoFocus(false)
|
||||
editbox:SetPoint("TOPLEFT", GVS, "BOTTOMLEFT", 0, -51)
|
||||
editbox:SetWidth(160)
|
||||
editbox:SetHeight(32)
|
||||
editbox:SetFontObject('GameFontHighlightSmall')
|
||||
|
||||
local left = editbox:CreateTexture(nil, "BACKGROUND")
|
||||
left:SetWidth(8) left:SetHeight(20)
|
||||
left:SetPoint("LEFT", -5, 0)
|
||||
left:SetTexture("Interface\\Common\\Common-Input-Border")
|
||||
left:SetTexCoord(0, 0.0625, 0, 0.625)
|
||||
|
||||
local right = editbox:CreateTexture(nil, "BACKGROUND")
|
||||
right:SetWidth(8) right:SetHeight(20)
|
||||
right:SetPoint("RIGHT", 0, 0)
|
||||
right:SetTexture("Interface\\Common\\Common-Input-Border")
|
||||
right:SetTexCoord(0.9375, 1, 0, 0.625)
|
||||
|
||||
local center = editbox:CreateTexture(nil, "BACKGROUND")
|
||||
center:SetHeight(20)
|
||||
center:SetPoint("RIGHT", right, "LEFT", 0, 0)
|
||||
center:SetPoint("LEFT", left, "RIGHT", 0, 0)
|
||||
center:SetTexture("Interface\\Common\\Common-Input-Border")
|
||||
center:SetTexCoord(0.0625, 0.9375, 0, 0.625)
|
||||
|
||||
editbox:SetScript("OnEscapePressed", editbox.ClearFocus)
|
||||
editbox:SetScript("OnEnterPressed", editbox.ClearFocus)
|
||||
editbox:SetScript("OnEditFocusGained", function(self)
|
||||
if not searchstring then
|
||||
self:SetText("")
|
||||
self:SetTextColor(1,1,1,1)
|
||||
end
|
||||
end)
|
||||
editbox:SetScript("OnEditFocusLost", function(self)
|
||||
if self:GetText() == "" then
|
||||
self:SetText("Search...")
|
||||
self:SetTextColor(0.75, 0.75, 0.75, 1)
|
||||
end
|
||||
end)
|
||||
editbox:SetScript("OnTextChanged", function(self)
|
||||
local t = self:GetText()
|
||||
searchstring = t ~= "" and t ~= "Search..." and t:lower() or nil
|
||||
Refresh()
|
||||
end)
|
||||
editbox:SetScript("OnShow", function(self)
|
||||
self:SetText("Search...")
|
||||
self:SetTextColor(0.75, 0.75, 0.75, 1)
|
||||
end)
|
||||
|
||||
local scrollbar = LibStub("tekKonfig-Scroll").new(GVS, 0, SCROLLSTEP)
|
||||
local f = scrollbar:GetScript("OnValueChanged")
|
||||
scrollbar:SetScript("OnValueChanged", function(self, value, ...)
|
||||
|
|
|
@ -9,11 +9,11 @@ h2. Features
|
|||
* Ctrl- and shift-click behave as default (dress-up and paste link, respectively)
|
||||
* Recipes you do not yet know are highlighted in blue
|
||||
* Items you cannot use are highlighted in red
|
||||
* Search box to help you find that item you're after on a vendor with hundreds of items
|
||||
|
||||
h2. Un-features
|
||||
|
||||
* No support for split-stack purchases, I'm not convinced it's needed.
|
||||
* No search... yet
|
||||
|
||||
h2. Links
|
||||
|
||||
|
|
Loading…
Reference in New Issue