--[[-------------------------------------------------------------- Method: AddButton---- data - A table local to YOUR addon that will contain all the-- data for your addon.-- text - The button's text.-- onclick - The function that the button will call when clicked.-- onshow - (Optional) The function that the button will call when shown.-- onhide - (Optional) The function that the button will call when hidden.-- pt - (Optional) Override the default anchor setting.-- ox - (Optional) Override the default offset setting in pixels for x.-- oy - (Optional) Override the default offset setting in pixels for y.-- rp - (Optional) Override the default relative parent.-- rpt - (Optional) Override the default relative point.---- This is mostly a copy of OptionsButtonTemplate, -- going down the inheritance chain.--------------------------------------------------------------]]function lib:AddButton(data,text,onclick,onshow,onhide,pt,ox,oy,rp,rpt) if data and text and onclick then local f local tab = data[ data["_t"] ] local tcol = tab[ tab["_nc"] ] if tab["_nc"] == 1 then table.insert( tcol, CreateFrame("Button",nil, data["_f"] ) ) else table.insert( tcol, CreateFrame("Button",nil, tab[1][1] ) ) end tcol["_size"] = tcol["_size"] + 1 f = tcol[ tcol["_size"] ] f:SetTextFontObject( getglobal("GameFontNormal") ) f:SetDisabledFontObject( getglobal("GameFontDisable") ) f:SetHighlightFontObject( getglobal("GameFontHighlight") ) f:SetNormalTexture("Interface\\Buttons\\UI-Panel-Button-Up") f:SetPushedTexture("Interface\\Buttons\\UI-Panel-Button-Down") f:SetDisabledTexture("Interface\\Buttons\\UI-Panel-Button-Disabled" ) f:SetHighlightTexture("Interface\\Buttons\\UI-Panel-Button-Highlight" ) self:ReadjustPoint(data,f,pt,ox,oy,rp,rpt) f:SetText(text) local fs = f:CreateFontString() fs:SetPoint("BOTTOMLEFT", f, "LEFT", f:GetTextWidth() / 7, 0.5) f:SetFontString( fs ) f:SetText(text) f:SetWidth( f:GetTextWidth() * 2 + 6 ) f:SetHeight( 32 ) self:ReadjustSize(data, f:GetWidth(), f:GetHeight() ) f:SetScript("OnClick", onclick) if onshow then f:SetScript("OnShow", onshow) end if onhide then f:SetScript("OnHide", onhide) end elseif not data then self:Print("In AddButton() - Invalid data table given.") elseif not text then self:Print("In AddButton() - No text given.") elseif not onclick then self:Print("In AddButton() - No OnClick function given.") endend