Community
I have code like this:
'ensure single instance of this app... Friend Shared m_ps As Autodesk.AutoCAD.Windows.PaletteSet = Nothing ' Define command <CommandMethod("TestPalette")> _ Public Sub DoIt() 'check to see if paletteset is already created If m_ps Is Nothing Then 'no so create it m_ps = New Autodesk.AutoCAD.Windows.PaletteSet("My First Palette") 'create new instance of user control Dim myPalette As Container1 = New Container1() 'add it to the paletteset m_ps.Add("My First Palette", myPalette) End If 'turn it on m_ps.Visible = True End Sub
in this code has a only one pallete ( tab ) but , ı want to make 4 or 5 pallete . how can I do thiswith vb.net ?
Solved! Go to Solution.
Solved by _gile. Go to Solution.
Hi,
The palette set tabs are the controls added to the palette set.
'ensure single instance of this app... Friend Shared m_ps As Autodesk.AutoCAD.Windows.PaletteSet = Nothing ' Define command <CommandMethod("TestPalette")> _ Public Sub DoIt() 'check to see if paletteset is already created If m_ps Is Nothing Then 'no so create it m_ps = New Autodesk.AutoCAD.Windows.PaletteSet("My First Palette") 'create new instance of user control Dim myPalette1 As Container1 = New Container1() 'add it to the paletteset m_ps.Add("My First Palette", myPalette1) 'create new instance of user control Dim myPalette2 As Container2 = New Container2() 'add it to the paletteset m_ps.Add("My Second Palette", myPalette2) 'create new instance of user control Dim myPalette3 As Container3 = New Container3() 'add it to the paletteset m_ps.Add("My Third Palette", myPalette3) 'and so on... End If 'turn it on m_ps.Visible = True End Sub
Thank you so much. its works 🙂