View Issue Details
ID | Project | Category | View Status | Date Submitted | Last Update |
---|---|---|---|---|---|
0006754 | MMW v4 | Framework: Scripts/Extensions | public | 2010-11-27 17:58 | 2010-11-27 17:58 |
Reporter | zvezdan | Assigned To | |||
Priority | normal | Severity | minor | Reproducibility | always |
Status | new | Resolution | open | ||
Summary | 0006754: ISDBMenuItem::ShortCut doesn't work for Tree popup menu | ||||
Description | It works for main menu, tracklist popup and Now Playing panel popup, but not for Tree popup | ||||
Steps To Reproduce | Option Explicit Sub OnStartup() Dim oMenuItem Set oMenuItem = SDB.UI.AddMenuItem(SDB.UI.Menu_Edit, 0, 0) oMenuItem.Caption = "Test of shortcut" oMenuItem.Shortcut = "Ctrl+1" oMenuItem.UseScript = Script.ScriptPath oMenuItem.OnClickFunc = "Test1" Set oMenuItem = SDB.UI.AddMenuItem(SDB.UI.Menu_Pop_TrackList, 0, 0) oMenuItem.Caption = "Test of shortcut" oMenuItem.Shortcut = "Ctrl+2" oMenuItem.UseScript = Script.ScriptPath oMenuItem.OnClickFunc = "Test2" Set oMenuItem = SDB.UI.AddMenuItem(SDB.UI.Menu_Pop_Tree, 0, 0) oMenuItem.Caption = "Test of shortcut" oMenuItem.Shortcut = "Ctrl+3" oMenuItem.UseScript = Script.ScriptPath oMenuItem.OnClickFunc = "Test3" Set oMenuItem = SDB.UI.AddMenuItem(SDB.UI.Menu_Pop_NP, 0, 0) oMenuItem.Caption = "Test of shortcut" oMenuItem.Shortcut = "Ctrl+4" oMenuItem.UseScript = Script.ScriptPath oMenuItem.OnClickFunc = "Test4" End Sub Sub Test1(oItem) SDB.MessageBox "Main menu shortcut.", mtInformation, Array(mbOK) End Sub Sub Test2(oItem) SDB.MessageBox "Tracklist popup menu shortcut.", mtInformation, Array(mbOK) End Sub Sub Test3(oItem) SDB.MessageBox "Tree popup menu shortcut.", mtInformation, Array(mbOK) End Sub Sub Test4(oItem) SDB.MessageBox "Now Playing popup menu shortcut.", mtInformation, Array(mbOK) End Sub | ||||
Tags | No tags attached. | ||||
Fixed in build | |||||
related to | 0009073 | new | Option to specify Enabled, Visible and Active for items in the Scripts.ini file for type 0/1 scripts |