WoW - 添加用于修改键的事件处理程序 - kgPanels

我正在使用kgPanels创建一个团队标记工具。我有两个面板。一个面板作为按钮 - 我们称之为rmButton。当rmButton按下时，它会打开团队标记工具 - rmUtility。

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

现在，就放置目标标记而言，一切都正常工作。我希望添加进一步的功能，当按住任何一个shift按钮时，它将允许放置世界标记。我正在努力将其整合。

在我的OnLoad脚本中：

local btnWidth = 30 -- 每个按钮的宽度
local btnHeight = 30 -- 每个按钮的高度
local leftBorderOffset = 7 -- 从kgPanel的左边框到第一个按钮的偏移量
local btnOffset = 7 -- 按钮之间的像素
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) -- 替换此项
    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

当此面板加载时，它会制作六个带有团队标记的按钮，并清除标记的一个按钮。当按下按钮时，面板将隐藏，并且在我进入战斗时面板将自动隐藏。

如上所述，我需要此面板接受“shift”修改键以放置世界标记。感谢。