Hello together,
does anybody have a list of icon numbers together with the picture that they show in the MM library tree?
I would like to modify Magic Nodes in a way that I am able to set arbitrary icons by using the icon's internal number.
Can anyone help?
Numbers of library icons wanted
-
- Posts: 2153
- Joined: Fri Jan 14, 2005 1:45 am
- Location: Germany
- Contact:
Code: Select all
Option Explicit
'%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
' Startup Function
'%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
Dim SDB
Set SDB = CreateObject( "SongsDB.SDBApplication")
Dim Tree
Set Tree = SDB.MainTree
Dim CustomNodeRoot
Set CustomNodeRoot = Tree.CreateNode
Dim NewNode
Dim a
CustomNodeRoot.Caption = "View Icons"
CustomNodeRoot.IconIndex = 28
'Adding the Node to the Tree
Tree.AddNode Tree.Node_Web, CustomNodeRoot, 1
CustomNodeRoot.HasChildren = False ' To delete all old children
for a=0 to 60
Set NewNode = Tree.CreateNode
NewNode.Caption = "Icon " & a 'Caption
NewNode.IconIndex = a
NewNode.hasChildren = False
Tree.AddNode CustomNodeRoot, NewNode, 3
Set NewNode = Nothing
next
CustomNodeRoot.hasChildren = True
Set CustomNodeRoot = Nothing
Set Tree = Nothing
Set SDB = Nothing
-
- Posts: 2153
- Joined: Fri Jan 14, 2005 1:45 am
- Location: Germany
- Contact:
Re: Numbers of library icons wanted
Greetings
Nice and helpful script,I'm wondering if it's possible to show also the menu Icons ?
Nice and helpful script,I'm wondering if it's possible to show also the menu Icons ?