Question

我正在与kgPanels一起创建一个RAID标记实用程序。我有两个面板。一个面板用作按钮-我们将其称为rmButton。当按下rmButton时，它将打开团队标记实用程序rmUtility。

在kgPanels中，您可以创建一个面板，您可以在该面板上添加用于许多不同处理程序的脚本。对于rmUtility，我使用OnLoad和OnEvent。

现在，只要在目标上放置标记，一切都可以正常进行。我想添加更多的功能，以便在按住任一移位按钮时放置世界标记。我很难将其集成。

在我的OnLoad脚本中：

local btnWidth = 30 -- the width of each button
local btnHeight = 30 -- the height of each button
local leftBorderOffset = 7 -- from the left border of the kgPanel to the first button
local btnOffset = 7 -- pixels between the buttons
local topBorderOffset = -7
self:RegisterEvent ("PLAYER_REGEN_DISABLED")
self:RegisterEvent ("PLAYER_REGEN_ENABLED")
self:Show()


self.buttons = {}
local hideFunc = function(s) s.parent:Hide() end
for n=1,6 do
    local btn = CreateFrame("Button",nil,self,"SecureActionButtonTemplate")
    btn:SetSize(btnWidth, btnHeight) -- replace this
    btn:SetPoint("TOP",0,topBorderOffset - ((n-1) * (btnHeight + btnOffset)))
    btn:SetAttribute("type","macro")
    btn:RegisterForClicks("AnyUp")
    btn.parent = self
    btn:SetScript("PostClick",hideFunc)
    btn:RegisterEvent ("MODIFIER_STATE_CHANGED")
    if (event == "MODIFIER_STATE_CHANGED") then
        if n == 6 then
            btn:SetAttribute("macrotext","/cwm all")
        else
            btn:SetAttribute("macrotext",("/wm %d"):format(n))
        end
    else
        if n == 6 then
            btn:SetAttribute("macrotext","/tm 0")
        else
            btn:SetAttribute("macrotext",("/tm %d"):format(n))
        end
    end
    self.buttons[n] = btn
end
self.buttons[1]:SetNormalTexture("Interface\\AddOns\\SharedMedia\\background\\Square.tga")
self.buttons[2]:SetNormalTexture("Interface\\AddOns\\SharedMedia\\background\\Triangle.tga")
self.buttons[3]:SetNormalTexture("Interface\\AddOns\\SharedMedia\\background\\Diamond.tga")
self.buttons[4]:SetNormalTexture("Interface\\AddOns\\SharedMedia\\background\\Cross.tga")
self.buttons[5]:SetNormalTexture("Interface\\AddOns\\SharedMedia\\background\\Star.tga")
self.buttons[6]:SetNormalTexture("Interface\\AddOns\\SharedMedia\\background\\Clear.tga")

在我的OnEvent脚本中：

if event == "PLAYER_REGEN_DISABLED" then
 self:Hide()
elseif event == "PLAYER_REGEN_ENABLED" then
 self:Hide()
end

在加载此面板时，它会显示六个按钮-五个带有raid标记的按钮，以及一个用于清除标记的按钮。当按下按钮时，面板将隐藏，当我进入战斗时，面板将自动隐藏。

如上所述，我需要面板接受“ shift”修饰键来放置世界标记。

谢谢。

Answer 1

您尝试过类似的事情

btn:SetAttribute("shift-macrotext1",("/wm %d"):format(n))

https://wow.gamepedia.com/SecureActionButtonTemplate#Modified_attributes

除非您是要使用Shift放置世界标记，否则？而不是将其用作安全操作按钮的修饰符？我不知道任何修改键，例如Shift，Ctrl，Alt都可以激活操作按钮。

哇-为修饰键添加事件处理程序-kgPanels

1 个答案: