Script for EvilLyrics Menu Button

Post a reply

Smilies
:D :) :( :o :-? 8) :lol: :x :P :oops: :cry: :evil: :roll: :wink:
BBCode is ON
[img] is ON
[url] is ON
Smilies are ON
Topic review
   

Expand view Topic review: Script for EvilLyrics Menu Button

by jiri » Fri Aug 20, 2004 11:35 am

Thanks for the script, good idea!

As for the icon, there currently isn't any way how to add custom icons but we plan to add it to the next version.

Jiri

Script for EvilLyrics Menu Button

by jaxjon » Fri Aug 20, 2004 7:56 am

Code: Select all

Sub OnStartup

Set UI = SDB.UI

UI.AddMenuItemSep UI.Menu_TbStandard, 0, 0

  Set Mnu = UI.AddMenuItem( UI.Menu_TbStandard, 0, 0)
  Mnu.Caption = "EvilLyrics"
  Mnu.UseScript = Script.ScriptPath
  Mnu.OnClickFunc = "OnClick"
  Mnu.IconIndex = 22
  Mnu.Hint = "Launch EvilLyrics"
End Sub
  
  
Sub OnClick( Itm)
  
  Dim oShell
  Set oShell = CreateObject ("WSCript.shell")
  oShell.run "H:\EvilLyrics\EvilLyrics.exe"
  Set oShell = Nothing
  
End Sub
Put in Scripts\Auto dir.

Question, I created an icon for EL and named it Menu068.ico and put it in icon dir, did not work. How do I change the IconIndex to account for this new icon? Thanks

Top