You probably shouln't let the head programmer see this thread.
PaletteSetStyles is a set of flags.
I'll have to assume that you're not familiar with flags and bitwise operatons or how to work with them.
The probelm you have is that you are assigning individual flags to the property, when you should be combining them, like this:
ps.Style = ps.Style Or PaletteSetStyles.ShowTabForSingle
ps.Style = ps.Style Or PaletteSetStyles.ShowCloseButton;
ps.Style = ps.Style Or PaletteSetStyles.ShowAutoHideButton;
The "Or" operator combines the existing flags set in the style property, with the one you pass as the operand.
--
http://www.caddzone.com
AcadXTabs: MDI Document Tabs for AutoCAD 2009
Supporting AutoCAD 2000 through 2009
http://www.acadxtabs.com
wrote in message news:5914319@discussion.autodesk.com...
Tony I got permission to post this:
Dim ed As Editor = Autodesk.AutoCAD.ApplicationServices.Application.DocumentManager.MdiActiveDocument.Editor
Try
If ps Is Nothing Then
Dim myForm As ModelessForm = New ModelessForm()
ps = New Autodesk.AutoCAD.Windows.PaletteSet("MYPALLETTE")
ps.Style = PaletteSetStyles.ShowTabForSingle
'Wouldn't this statement show the "X" on the Palette:
ps.Style = PaletteSetStyles.ShowCloseButton
ps.Style = PaletteSetStyles.ShowAutoHideButton
ps.MinimumSize = New System.Drawing.Size(300, 500)
ps.Opacity = 65
ps.Add("Search Catalog", myForm)
ps.Visible = True
ps.Dock = DockSides.Left
End If
Catch ex As System.Exception
ed.WriteMessage("Error Creating Palette: " + ex.Message)
End Try
I hope you can see something I cant.