Create UI-styled dropdown menu
This snippet creates a very simple dropdown selection box in the center of the screen.
Snippet
if not DropDownMenuTest then CreateFrame("Button", "DropDownMenuTest", UIParent, "UIDropDownMenuTemplate") end DropDownMenuTest:ClearAllPoints() DropDownMenuTest:SetPoint("CENTER", 0, 0) DropDownMenuTest:Show() local items = { "Alpha", "Beta", "Gamma", "Delta", } local function OnClick(self) UIDropDownMenu_SetSelectedID(DropDownMenuTest, self:GetID()) end local function initialize(self, level) local info = UIDropDownMenu_CreateInfo() for k,v in pairs(items) do info = UIDropDownMenu_CreateInfo() info.text = v info.value = v info.func = OnClick UIDropDownMenu_AddButton(info, level) end end UIDropDownMenu_Initialize(DropDownMenuTest, initialize) UIDropDownMenu_SetWidth(DropDownMenuTest, 100); UIDropDownMenu_SetButtonWidth(DropDownMenuTest, 124) UIDropDownMenu_SetSelectedID(DropDownMenuTest, 1) UIDropDownMenu_JustifyText(DropDownMenuTest, "LEFT")
Posted by jnwhiteh at Wed, 29 Apr 2009 17:48:43 +0000