Mercurial > wow > itemauditor
diff Libs/AceGUI-3.0/widgets/AceGUIWidget-Window.lua @ 0:169f5211fc7f
First public revision.
At this point ItemAuditor watches mail for auctions sold or purchased, watches for buy/sell (money and 1 item type change) and conversions/tradeskills. Milling isn't working yet because there is too much time between the first event and the last event.
author | Asa Ayers <Asa.Ayers@Gmail.com> |
---|---|
date | Thu, 20 May 2010 19:22:19 -0700 |
parents | |
children |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/Libs/AceGUI-3.0/widgets/AceGUIWidget-Window.lua Thu May 20 19:22:19 2010 -0700 @@ -0,0 +1,328 @@ +local AceGUI = LibStub("AceGUI-3.0") + +-- Lua APIs +local pairs, assert, type = pairs, assert, type + +-- WoW APIs +local CreateFrame, UIParent = CreateFrame, UIParent + +-- Global vars/functions that we don't upvalue since they might get hooked, or upgraded +-- List them here for Mikk's FindGlobals script +-- GLOBALS: GameFontNormal + +---------------- +-- Main Frame -- +---------------- +--[[ + Events : + OnClose + +]] +do + local Type = "Window" + local Version = 2 + + local function frameOnClose(this) + this.obj:Fire("OnClose") + end + + local function closeOnClick(this) + this.obj:Hide() + end + + local function frameOnMouseDown(this) + AceGUI:ClearFocus() + end + + local function titleOnMouseDown(this) + this:GetParent():StartMoving() + AceGUI:ClearFocus() + end + + local function frameOnMouseUp(this) + local frame = this:GetParent() + frame:StopMovingOrSizing() + local self = frame.obj + local status = self.status or self.localstatus + status.width = frame:GetWidth() + status.height = frame:GetHeight() + status.top = frame:GetTop() + status.left = frame:GetLeft() + end + + local function sizerseOnMouseDown(this) + this:GetParent():StartSizing("BOTTOMRIGHT") + AceGUI:ClearFocus() + end + + local function sizersOnMouseDown(this) + this:GetParent():StartSizing("BOTTOM") + AceGUI:ClearFocus() + end + + local function sizereOnMouseDown(this) + this:GetParent():StartSizing("RIGHT") + AceGUI:ClearFocus() + end + + local function sizerOnMouseUp(this) + this:GetParent():StopMovingOrSizing() + end + + local function SetTitle(self,title) + self.titletext:SetText(title) + end + + local function SetStatusText(self,text) + -- self.statustext:SetText(text) + end + + local function Hide(self) + self.frame:Hide() + end + + local function Show(self) + self.frame:Show() + end + + local function OnAcquire(self) + self.frame:SetParent(UIParent) + self.frame:SetFrameStrata("FULLSCREEN_DIALOG") + self:ApplyStatus() + self:EnableResize(true) + end + + local function OnRelease(self) + self.status = nil + for k in pairs(self.localstatus) do + self.localstatus[k] = nil + end + end + + -- called to set an external table to store status in + local function SetStatusTable(self, status) + assert(type(status) == "table") + self.status = status + self:ApplyStatus() + end + + local function ApplyStatus(self) + local status = self.status or self.localstatus + local frame = self.frame + self:SetWidth(status.width or 700) + self:SetHeight(status.height or 500) + if status.top and status.left then + frame:SetPoint("TOP",UIParent,"BOTTOM",0,status.top) + frame:SetPoint("LEFT",UIParent,"LEFT",status.left,0) + else + frame:SetPoint("CENTER",UIParent,"CENTER") + end + end + + local function OnWidthSet(self, width) + local content = self.content + local contentwidth = width - 34 + if contentwidth < 0 then + contentwidth = 0 + end + content:SetWidth(contentwidth) + content.width = contentwidth + end + + + local function OnHeightSet(self, height) + local content = self.content + local contentheight = height - 57 + if contentheight < 0 then + contentheight = 0 + end + content:SetHeight(contentheight) + content.height = contentheight + end + + local function EnableResize(self, state) + local func = state and "Show" or "Hide" + self.sizer_se[func](self.sizer_se) + self.sizer_s[func](self.sizer_s) + self.sizer_e[func](self.sizer_e) + end + + local function Constructor() + local frame = CreateFrame("Frame",nil,UIParent) + local self = {} + self.type = "Window" + + self.Hide = Hide + self.Show = Show + self.SetTitle = SetTitle + self.OnRelease = OnRelease + self.OnAcquire = OnAcquire + self.SetStatusText = SetStatusText + self.SetStatusTable = SetStatusTable + self.ApplyStatus = ApplyStatus + self.OnWidthSet = OnWidthSet + self.OnHeightSet = OnHeightSet + self.EnableResize = EnableResize + + self.localstatus = {} + + self.frame = frame + frame.obj = self + frame:SetWidth(700) + frame:SetHeight(500) + frame:SetPoint("CENTER",UIParent,"CENTER",0,0) + frame:EnableMouse() + frame:SetMovable(true) + frame:SetResizable(true) + frame:SetFrameStrata("FULLSCREEN_DIALOG") + frame:SetScript("OnMouseDown", frameOnMouseDown) + + frame:SetScript("OnHide",frameOnClose) + frame:SetMinResize(240,240) + frame:SetToplevel(true) + + local titlebg = frame:CreateTexture(nil, "BACKGROUND") + titlebg:SetTexture([[Interface\PaperDollInfoFrame\UI-GearManager-Title-Background]]) + titlebg:SetPoint("TOPLEFT", 9, -6) + titlebg:SetPoint("BOTTOMRIGHT", frame, "TOPRIGHT", -28, -24) + + local dialogbg = frame:CreateTexture(nil, "BACKGROUND") + dialogbg:SetTexture([[Interface\Tooltips\UI-Tooltip-Background]]) + dialogbg:SetPoint("TOPLEFT", 8, -24) + dialogbg:SetPoint("BOTTOMRIGHT", -6, 8) + dialogbg:SetVertexColor(0, 0, 0, .75) + + local topleft = frame:CreateTexture(nil, "BORDER") + topleft:SetTexture([[Interface\PaperDollInfoFrame\UI-GearManager-Border]]) + topleft:SetWidth(64) + topleft:SetHeight(64) + topleft:SetPoint("TOPLEFT") + topleft:SetTexCoord(0.501953125, 0.625, 0, 1) + + local topright = frame:CreateTexture(nil, "BORDER") + topright:SetTexture([[Interface\PaperDollInfoFrame\UI-GearManager-Border]]) + topright:SetWidth(64) + topright:SetHeight(64) + topright:SetPoint("TOPRIGHT") + topright:SetTexCoord(0.625, 0.75, 0, 1) + + local top = frame:CreateTexture(nil, "BORDER") + top:SetTexture([[Interface\PaperDollInfoFrame\UI-GearManager-Border]]) + top:SetHeight(64) + top:SetPoint("TOPLEFT", topleft, "TOPRIGHT") + top:SetPoint("TOPRIGHT", topright, "TOPLEFT") + top:SetTexCoord(0.25, 0.369140625, 0, 1) + + local bottomleft = frame:CreateTexture(nil, "BORDER") + bottomleft:SetTexture([[Interface\PaperDollInfoFrame\UI-GearManager-Border]]) + bottomleft:SetWidth(64) + bottomleft:SetHeight(64) + bottomleft:SetPoint("BOTTOMLEFT") + bottomleft:SetTexCoord(0.751953125, 0.875, 0, 1) + + local bottomright = frame:CreateTexture(nil, "BORDER") + bottomright:SetTexture([[Interface\PaperDollInfoFrame\UI-GearManager-Border]]) + bottomright:SetWidth(64) + bottomright:SetHeight(64) + bottomright:SetPoint("BOTTOMRIGHT") + bottomright:SetTexCoord(0.875, 1, 0, 1) + + local bottom = frame:CreateTexture(nil, "BORDER") + bottom:SetTexture([[Interface\PaperDollInfoFrame\UI-GearManager-Border]]) + bottom:SetHeight(64) + bottom:SetPoint("BOTTOMLEFT", bottomleft, "BOTTOMRIGHT") + bottom:SetPoint("BOTTOMRIGHT", bottomright, "BOTTOMLEFT") + bottom:SetTexCoord(0.376953125, 0.498046875, 0, 1) + + local left = frame:CreateTexture(nil, "BORDER") + left:SetTexture([[Interface\PaperDollInfoFrame\UI-GearManager-Border]]) + left:SetWidth(64) + left:SetPoint("TOPLEFT", topleft, "BOTTOMLEFT") + left:SetPoint("BOTTOMLEFT", bottomleft, "TOPLEFT") + left:SetTexCoord(0.001953125, 0.125, 0, 1) + + local right = frame:CreateTexture(nil, "BORDER") + right:SetTexture([[Interface\PaperDollInfoFrame\UI-GearManager-Border]]) + right:SetWidth(64) + right:SetPoint("TOPRIGHT", topright, "BOTTOMRIGHT") + right:SetPoint("BOTTOMRIGHT", bottomright, "TOPRIGHT") + right:SetTexCoord(0.1171875, 0.2421875, 0, 1) + + local close = CreateFrame("Button", nil, frame, "UIPanelCloseButton") + close:SetPoint("TOPRIGHT", 2, 1) + close:SetScript("OnClick", closeOnClick) + self.closebutton = close + close.obj = self + + local titletext = frame:CreateFontString(nil, "ARTWORK") + titletext:SetFontObject(GameFontNormal) + titletext:SetPoint("TOPLEFT", 12, -8) + titletext:SetPoint("TOPRIGHT", -32, -8) + self.titletext = titletext + + local title = CreateFrame("Button", nil, frame) + title:SetPoint("TOPLEFT", titlebg) + title:SetPoint("BOTTOMRIGHT", titlebg) + title:EnableMouse() + title:SetScript("OnMouseDown",titleOnMouseDown) + title:SetScript("OnMouseUp", frameOnMouseUp) + self.title = title + + local sizer_se = CreateFrame("Frame",nil,frame) + sizer_se:SetPoint("BOTTOMRIGHT",frame,"BOTTOMRIGHT",0,0) + sizer_se:SetWidth(25) + sizer_se:SetHeight(25) + sizer_se:EnableMouse() + sizer_se:SetScript("OnMouseDown",sizerseOnMouseDown) + sizer_se:SetScript("OnMouseUp", sizerOnMouseUp) + self.sizer_se = sizer_se + + local line1 = sizer_se:CreateTexture(nil, "BACKGROUND") + self.line1 = line1 + line1:SetWidth(14) + line1:SetHeight(14) + line1:SetPoint("BOTTOMRIGHT", -8, 8) + line1:SetTexture("Interface\\Tooltips\\UI-Tooltip-Border") + local x = 0.1 * 14/17 + line1:SetTexCoord(0.05 - x, 0.5, 0.05, 0.5 + x, 0.05, 0.5 - x, 0.5 + x, 0.5) + + local line2 = sizer_se:CreateTexture(nil, "BACKGROUND") + self.line2 = line2 + line2:SetWidth(8) + line2:SetHeight(8) + line2:SetPoint("BOTTOMRIGHT", -8, 8) + line2:SetTexture("Interface\\Tooltips\\UI-Tooltip-Border") + local x = 0.1 * 8/17 + line2:SetTexCoord(0.05 - x, 0.5, 0.05, 0.5 + x, 0.05, 0.5 - x, 0.5 + x, 0.5) + + local sizer_s = CreateFrame("Frame",nil,frame) + sizer_s:SetPoint("BOTTOMRIGHT",frame,"BOTTOMRIGHT",-25,0) + sizer_s:SetPoint("BOTTOMLEFT",frame,"BOTTOMLEFT",0,0) + sizer_s:SetHeight(25) + sizer_s:EnableMouse() + sizer_s:SetScript("OnMouseDown",sizersOnMouseDown) + sizer_s:SetScript("OnMouseUp", sizerOnMouseUp) + self.sizer_s = sizer_s + + local sizer_e = CreateFrame("Frame",nil,frame) + sizer_e:SetPoint("BOTTOMRIGHT",frame,"BOTTOMRIGHT",0,25) + sizer_e:SetPoint("TOPRIGHT",frame,"TOPRIGHT",0,0) + sizer_e:SetWidth(25) + sizer_e:EnableMouse() + sizer_e:SetScript("OnMouseDown",sizereOnMouseDown) + sizer_e:SetScript("OnMouseUp", sizerOnMouseUp) + self.sizer_e = sizer_e + + --Container Support + local content = CreateFrame("Frame",nil,frame) + self.content = content + content.obj = self + content:SetPoint("TOPLEFT",frame,"TOPLEFT",12,-32) + content:SetPoint("BOTTOMRIGHT",frame,"BOTTOMRIGHT",-12,13) + + AceGUI:RegisterAsContainer(self) + return self + end + + AceGUI:RegisterWidgetType(Type,Constructor,Version) +end