How to add a title and separator in the Tool Palette Manager using C#

artillis_prado — Mon, 01 Apr 2024 16:42:50 GMT

My code can create a palette and add the PKT files via path.
I am using the Tool Palette Manager from the AcTcMgd DLL.

However, I'm unable to add text or a separator via C# code. Does anyone know how to do it?

[CommandMethod("QSAVEAS")] public void QuickSaveAs() { Document doc = Application.DocumentManager.MdiActiveDocument; Editor ed = doc.Editor; Database db = doc.Database; // If this is the first time run... if (_path == "" || _base == "") { // Ask the user for a base file location PromptSaveFileOptions opts = new PromptSaveFileOptions( "Select location to save first drawing file" ); opts.Filter = "Drawing (*.dwg)|*.dwg"; PromptFileNameResult pr = ed.GetFileNameForSave(opts); // Delete the file, if it exists // (may be a problem if the file is in use) if (File.Exists(pr.StringResult)) { try { File.Delete(pr.StringResult); } catch { } } if (pr.Status == PromptStatus.OK) { // If a file was selected, and it contains a path... if (pr.StringResult.Contains(pthSep)) { // Separate the path from the file name int idx = pr.StringResult.LastIndexOf(pthSep); _path = pr.StringResult.Substring(0, idx); string fullname = pr.StringResult.Substring(idx + 1); // If the path has an extension (this should always // be the case), extract the base file name if (fullname.Contains(extSep)) { _base = fullname.Substring( 0, fullname.LastIndexOf(extSep) ); // Create folders for our icons and our scripts Directory.CreateDirectory( _path + pthSep + bmpLoc ); Directory.CreateDirectory( _path + pthSep + scrLoc ); } } } } // Assuming the path and name were set appropriately... if (_path != "" && _base != "") { string name = _base; // Add our suffix if not the first time run if (_count > 0) name += sfxSep + _count.ToString(); // Our drawing is located in the base path string dwgPath = _path + pthSep + name + dwgExt; // While our script is in a sub-folder string scrPath = _path + pthSep + scrLoc + pthSep + name + scrExt; // Create a dummy script, so we can make sure we pick // up the contents in our dummy execute command File.WriteAllText( scrPath, "This is a dummy script for " + name + "." ); // Now we want to save our drawing and use the image // for our tool icon // Using either COM or .NET doesn't generate a // thumbnail in the resultant file (or its Database) // .NET: // db.SaveAs(dwgPath, false, DwgVersion.Current, null); // COM: // AcadDocument adoc = (AcadDocument)doc.AcadDocument; // adoc.SaveAs(dwgPath, AcSaveAsType.acNative, null); // So we'll send commands to the command-line // We'll use LISP, to avoid having to set FILEDIA to 0 object ocmd = Application.GetSystemVariable("CMDECHO"); string dwgPath2 = dwgPath.Replace(pthSep, lspSep); string scrPath2 = scrPath.Replace(pthSep, lspSep); string c1 = "(setvar \"CMDECHO\" 0)" + "(command \"_.SAVEAS\" \"\" \"" + dwgPath2 + "\")"; string c2 = "(setvar \"CMDECHO\" " + ocmd.ToString() + ")" + "(tp-create \"" + name + "\" \"" + scrPath2 + "\")" + "(princ) "; string cmd = c1 + c2; if (cmd.Length <= 255) { doc.SendStringToExecute(cmd, false, false, false); } else { doc.SendStringToExecute(c1 + " ", false, false, false); doc.SendStringToExecute(c2, false, false, false); } // Print a confirmation message for the DWG save // (which actually gets displayed before the queued // string gets executed, but anyway) ed.WriteMessage("\nSaved to: \"" + dwgPath + "\""); _count++; } } // Our LISP-registered continuation function to create a // command tool on our tool palette [LispFunction("TP-CREATE")] public ResultBuffer CreateToolPaletteCommand( ResultBuffer rb ) { const int RTSTR = 5005; Document doc = Application.DocumentManager.MdiActiveDocument; Editor ed = doc.Editor; if (rb == null) { ed.WriteMessage("\nError: too few arguments."); } else { // We're only interested in the first two arguments Array args = rb.AsArray(); if (args.Length != 2) { ed.WriteMessage( "\nError: wrong number of arguments." ); } else { // First argument is the name, second is the path // to the script TypedValue tv1 = (TypedValue)args.GetValue(0); TypedValue tv2 = (TypedValue)args.GetValue(1); if (tv1 != null && tv1.TypeCode == RTSTR && tv2 != null && tv2.TypeCode == RTSTR) { string name = Convert.ToString(tv1.Value); string lspScrPath = Convert.ToString(tv2.Value); string scrPath = lspScrPath.Replace(lspSep, pthSep); bool success = CreateCommand(doc.Database, name, scrPath); //CreateCommand(doc.Database, name, scrPath); //CreateCommand(doc.Database, name, scrPath); return (success ? new ResultBuffer( new TypedValue(RTSTR, tv1.Value) ) : null); } } } return null; } // Function to add a command tool to // Function to add a command tool to our tool palette to // execute the script private bool CreateCommand( Database db, string name, string scrPath ) { const string catName = "ScriptCatalog"; const string palName = "ToolsPalette"; ToolPaletteManager tpm = ToolPaletteManager.Manager; // Get the GUID of our dummy custom tool Type t = typeof(DummyTool); GuidAttribute ga = (GuidAttribute)t.GetCustomAttributes( typeof(GuidAttribute), false)[0]; Guid g = new Guid(ga.Value); // Instantiate our dummy tool - this will allow us to use // its helper functions DummyTool tool = new DummyTool(); Catalog cat; Autodesk.AutoCAD.Windows.ToolPalette.Palette pal = null; // First we check whether our GUID is in a catalog CatalogItem ci = tpm.StockToolCatalogs.Find(g); if (ci != null) { // If it is, search each catalog for our palette foreach (CatalogItem ci2 in tpm.Catalogs) { for (int i = 0; i < ci2.ChildCount; i++) { CatalogItem ci3 = ci2.GetChild(i); if (ci3 != null && ci3.Name == palName) { pal = ci3 as Autodesk.AutoCAD.Windows.ToolPalette.Palette; break; } } if (pal != null) break; } } // If we didn't find our palette, create it if (pal == null) { cat = tool.CreateStockTool(catName); pal = tool.CreatePalette(cat, palName); } // To add our command tool instance we need an icon List<string> listaPKT = new List<string> { "Ferrovias_Surperestrutura 1", "Ferrovias_InfraEstrutura 1"}; List<string> listpath = new List<string>() { "C:\\Users\\pc\\music\\file 1.pkt", "C:\\Users\\pc\\music\\file 2.pkt" }; int cont = 0; foreach (string namePKT in listaPKT) { ImageInfo ii = new ImageInfo(); ii.Size = new System.Drawing.Size(65, 65); // And then we use our dummy tool to create the // command tool tool.CreateCommandTool( pal, namePKT, ii, "_IMPORTPKT\"" + listpath[cont] + "\"" ); cont += 1; } // Finally we reload the catalogs to display the change tpm.LoadCatalogs(); return true; } [Guid("3B725500-0451-4081-A1BB-B37CE6A65767")] [Tool("MyDummyTool", "IDB_TOOL")] [ClassInterface(ClassInterfaceType.AutoDual)] public class DummyTool : CustomToolBase { }

Re: How to add a title and separator in the Tool Palette Manager using C#

ActivistInvestor — Tue, 02 Apr 2024 03:13:25 GMT

What release of AutoCAD are you using that forces you to resort to sending lisp Expressions to the command line?

Re: How to add a title and separator in the Tool Palette Manager using C#

ActivistInvestor — Tue, 02 Apr 2024 06:59:23 GMT

That was a question but it definitely didn't solve your problem. There should be a property named ToolType that can be assigned the value ToolType.Seperator or ToolType.Text.

Re: How to add a title and separator in the Tool Palette Manager using C#

artillis_prado — Tue, 02 Apr 2024 17:12:03 GMT

2024

Re: How to add a title and separator in the Tool Palette Manager using C#

ActivistInvestor — Tue, 02 Apr 2024 20:38:00 GMT

@artillis_prado wrote:
2024

Are you sure?

// Using either COM or .NET doesn't generate a // thumbnail in the resultant file (or its Database) // COM: // AcadDocument adoc = (AcadDocument)doc.AcadDocument; // adoc.SaveAs(dwgPath, AcSaveAsType.acNative, null);

The above code has not worked since AutoCAD 2012. After that release, there is no AcadDocument property (It was replaced with the GetAcadDocument() extension method).

AutoCAD 2024 doesn't require sending LISP expressions to the command line to execute commands. You can use the Editor's Command() method to do that more directly.

About your original problem, to create a separator or text, you have to create an Autodesk.AutoCAD.Windows.ToolPalette.Tool, and set its ToolType property to ToolTip.Seperator or ToolType.Text.

Re: How to add a title and separator in the Tool Palette Manager using C#

artillis_prado — Tue, 02 Apr 2024 22:13:52 GMT

How do I add it to the palette? My question is how to add it.

Re: How to add a title and separator in the Tool Palette Manager using C#

ActivistInvestor — Tue, 02 Apr 2024 22:53:37 GMT

First, You should have mentioned that the code you posted is from a 2009 Through The Interface blog post.

You add items using the AddChild() method.

Re: How to add a title and separator in the Tool Palette Manager using C#

artillis_prado4J852 — Wed, 03 Apr 2024 00:11:07 GMT

I realized that it accepts catalog as a parameter, and not other parameters I am experienced with the autocad api, so these doubts

Re: How to add a title and separator in the Tool Palette Manager using C#

artillis_prado4J852 — Wed, 03 Apr 2024 00:11:22 GMT

I realized that it accepts catalog as a parameter, and not other parameters I am experienced with the autocad api, so these doubts

Re: How to add a title and separator in the Tool Palette Manager using C#

ActivistInvestor — Wed, 03 Apr 2024 01:05:20 GMT

CreateTool() and CreateCommandTool() both create and return a Tool object, and adds it to a Palette.

Re: How to add a title and separator in the Tool Palette Manager using C#

artillis_prado — Wed, 03 Apr 2024 18:32:46 GMT

But, so you know an example of what it would be like using Tooltype, to add text or separator
I think these commands are not useful for ToolType, because both commands you mentioned ask for an image

topic Re: How to add a title and separator in the Tool Palette Manager using C# in .NET Forum

How to add a title and separator in the Tool Palette Manager using C#

Re: How to add a title and separator in the Tool Palette Manager using C#

Re: How to add a title and separator in the Tool Palette Manager using C#

Re: How to add a title and separator in the Tool Palette Manager using C#

Re: How to add a title and separator in the Tool Palette Manager using C#

Re: How to add a title and separator in the Tool Palette Manager using C#

Re: How to add a title and separator in the Tool Palette Manager using C#

Re: How to add a title and separator in the Tool Palette Manager using C#

Re: How to add a title and separator in the Tool Palette Manager using C#

Re: How to add a title and separator in the Tool Palette Manager using C#

Re: How to add a title and separator in the Tool Palette Manager using C#