1. 程式人生 > >cad 建立自定義選單

cad 建立自定義選單

[assembly: CommandClass(typeof(clist.Main))]
//[assembly:ExtensionApplication(typeof(clist.Main))]
namespace clist
{

    public class Main 
    {
       public string qm;
        public void VAddToolBar()
        {
            //string path = "";
            Autodesk.AutoCAD.Interop.AcadApplication acadApp = (AcadApplication)Autodesk.AutoCAD.ApplicationServices.Application.AcadApplication;
            Autodesk.AutoCAD.Interop.AcadToolbar atb = null;
            Autodesk.AutoCAD.Interop.AcadToolbarItem atbi = null;
            //  Autodesk.AutoCAD.Interop.AcadToolbarItem atbi2 = null;
            try
            {
                atb = acadApp.MenuGroups.Item("ACAD").Toolbars.Add("登入");
                //示例atbi = atb.AddToolbarButton(0, "工具欄名稱", "幫助", "命令 ", false);
                //命令後,緊跟一空格,否則處於等待狀態
                atbi = atb.AddToolbarButton(1, "登入", "登入", "mt_login ", false);
                atbi.SetBitmaps(acadApp.Path.Trim() + "\\alk.bmp", acadApp.Path.Trim() + "\\alk1.bmp");
                atbi = atb.AddToolbarButton(2, "登出", "登出", "mt_logout ", false);
                atbi.SetBitmaps(acadApp.Path.Trim() + "\\alk.bmp", acadApp.Path.Trim() + "\\alk1.bmp");
                
                                ///atb.Dock(Autodesk.AutoCAD.Interop.Common.AcToolbarDockStatus.acToolbarDockRight);
                //工具欄靠右邊停靠
                atb.Float(300, 300, 4);

                atb.Visible = true;
            }
            catch
            {
                Editor ed = Autodesk.AutoCAD.ApplicationServices.Application.DocumentManager.MdiActiveDocument.Editor;
                ed.WriteMessage("載入工具欄出錯……");
            }
        }