cad.net 仿猫老师的vlisp小助手

说明

本功能就是直接点击cad图元获取vla函数,快速知道图元对应的方法和属性(存在可用的).

小贱贱他复刻了一个高版本用的vlisp小助手,因为他调用了高版本函数,导致没有Acad08版,我很郁闷,然后就在他的基础上造了一个net全版本通用的...

至于猫老师曾经实现过的,通过帮助文件实现参数获取,我懒得做了,要新建数据库做快速索引才行,还要对数据库整理...

动图演示

制作过程

乱码

Acad08测试时候:
以下操作不加T表示仅看vlisp支持的属性,加T表示加看vlisp支持的方法,而加T时候会有乱码信息.

(if (setq ent (entsel))(progn (vlax-dump-object (vlax-ename->vla-object(car ent))T)))

它会将";支持的方法:" 会随机变成 ";?С值姆椒?"...等等含有"椒"字的字符串,由于直接使用Acad08获取都有,
所以这无法通过改变字符串编码修改,怀疑是Win10系统中文和Acad08编译环境不同导致.

处理方法详情见代码SplitMethod内,这可能仅发生在Acad08或者net35下,因为我用Acad21测试并没有这样的问题.
如果是lisp写小助手,恐怕每次获取都是不一样的码值(lisp的解释器有bug),无法用eq/equal对比,因为图层乱码是导致我学c#原因之一...
这可能就是不死猫老师vlisp小助手会出现有的能用,有的不能用的问题.

对话框模式和发送命令

代码同时支持调用winform的模态窗口和非模态窗口两种方式,可自己修改为自己喜欢的.

首先要说明: 先要发送复制命令历史命令,再从剪贴板获取历史.

1: 当发送命令时,此时要同步处理剪贴板,那么需要同步命令,但是非模态不能发送同步命令,否则出现Acap.DocumentManager.IsApplicationContext == true 命令上下文的报错.

2: 异步命令会导致先获取剪贴板,之后才发送了复制命令历史.而cad异步命令又没有执行完成后的回调.

在我一筹莫展的时候,edata给了我个建议:
写一个自己的同步命令,在命令内发送复制命令历史命令,再在剪贴板获取命令,并且修改窗体信息.

然后点击图元时候发送异步命令,调用这个自写的同步命令,这样执行顺序就是正常的,窗体也能得到信息.

简直妙到不行,有一种用魔法打败魔法的感觉.

命令

using Autodesk.AutoCAD.Runtime;

namespace JoinBox.CommandLisp.Vlisp
{
    public class VlispCmd
    {
        public VlispForm vlisp = null;

        //用户调用的命令
        [CommandMethod("Lisp")]
        public void Lisp()
        {
            if (vlisp == null || vlisp.IsDisposed)
            {
                vlisp = new VlispForm();
            }
#if true  //两种模式我都调整好了,均可用!
            vlisp.Show();
            Win32API.WinApi.SetFocus(vlisp.Handle);
#else
            vlisp.ShowDialog();
#endif
        }

        /* 此命令并不是由用户调用,而是点选的时候自动调用.
           因为在非模态窗口发送同步命令会失败.
           所以制作了一个同步命令来
           进行获取命令历史,加入剪贴板.
        */
        public const string Cmd_copyhist = "JJbox_Lisp_copyhist";
        [CommandMethod(Cmd_copyhist)]
        public void Cmd_copyhist_method()
        {
            VlispTool.SendCmd();
            if (vlisp != null)
            {
                VlispTool.ClipboardData(cmdLines =>
                {
                    //发送的最后一行是发送的命令,移除掉
                    cmdLines.Remove(Cmd_copyhist);
                    vlisp.SplitMethod(cmdLines);
                });
            }
        }
    }
}

工具类

using Autodesk.AutoCAD.DatabaseServices;
using System.Diagnostics;
using System.Windows.Forms;
using System;
using System.Collections.Generic;

namespace JoinBox.CommandLisp.Vlisp
{
    public static class VlispTool
    {
        /// <summary>
        /// 发送命令获取剪贴板历史
        /// </summary>
        public static void SendCmd()
        {
            const string cps = "_.copyhist";
            var rb = new ResultBuffer
            {
                new TypedValue((int)EnumBufCode.Text, cps)
            };
            int cnum = CSendSynchronization.AcedCmd(rb);
            if (cnum == 0)
            { 
                Debug.WriteLine($"{cps}发送命令失败!");
            }
        }

        /// <summary>
        /// 获取剪贴板数据
        /// </summary>
        /// <param name="action"></param>
        public static void ClipboardData(Action<List<string>> action)
        {
            // 此处还需要保存原来的剪贴板,再进行获取,再还原.
            // 剪贴板内容
            var iData = Clipboard.GetDataObject();
            if (iData.GetDataPresent(DataFormats.Text))
            {
                string clipboardText = (string)iData.GetData(DataFormats.Text);
                if (!string.IsNullOrEmpty(clipboardText))
                {
                    //将剪贴板的东西赋值给窗体
                    var aa = clipboardText.Split('\r', '\n');

                    List<string> _cmdLines = new();
                    _cmdLines.AddRange(aa);
                    _cmdLines.RemoveAll(str => str == string.Empty);
                    action(_cmdLines);
                }
            }
        }
    }
}

发送命令类

/// <summary>
/// 非模态对话框切换焦点回cad
/// </summary>
/// <param name="hWnd"></param>
/// <returns></returns>
[DllImport("user32.dll", EntryPoint = "SetFocus")]
public static extern int SetFocus(IntPtr hWnd);

public partial class CSendSynchronization
{
        //发送同步命令
        //由于cad2016里AcedCmd改成了AcedCmdS，Accore.dll也是2013版本后才开始改的。
        //调用AutoCAD命令，ARX原型：int acedCmdS(const struct resbuf * rbp);
#if NET35 || NET40
        [DllImport("acad.exe", EntryPoint = "acedCmd", CharSet = CharSet.Auto, CallingConvention = CallingConvention.Cdecl)]
#else
        [DllImport("accore.dll", EntryPoint = "acedCmdS", CharSet = CharSet.Auto, CallingConvention = CallingConvention.Cdecl)]
#endif
        private static extern int AcedCmd(IntPtr rbp);

        /// <summary>
        /// 调用C++的acedCmdS函数
        /// </summary> 
        /// <param name="args">命令参数列表</param>
        /// <returns>返回命令执行的状态</returns>
        public static int AcedCmd(ResultBuffer args)
        {
            if (!Acap.DocumentManager.IsApplicationContext)
                return AcedCmd(args.UnmanagedObject);
            else
                return 0;
        }
}

窗体

using System;
using System.Collections.Generic;
using System.Text;
using System.Windows.Forms;

using Autodesk.AutoCAD.ApplicationServices;
using Autodesk.AutoCAD.DatabaseServices;
using Autodesk.AutoCAD.EditorInput;
using Acap = Autodesk.AutoCAD.ApplicationServices.Application;
using static JoinBox.CommandLisp.LSend;
using JoinBox.CommandLisp.Vlisp;

namespace JoinBox
{
    public partial class VlispForm : Form
    {
        StringBuilder _sb;
        const string _dump = "(if (setq ent (entsel))(progn (vlax-dump-object (vlax-ename->vla-object(car ent))T)))";

        public VlispForm()
        {
            InitializeComponent();

            RunLisp("(vl-load-com)");
            _sb = new();
            for (int i = 0; i < 2048; i++) //最高命令行数
            {
                _sb.Append("\n");
            }
        }

        /// <summary>
        /// 点击图元按钮
        /// </summary>
        /// <param name="sender"></param>
        /// <param name="e"></param>
        private void Button3_Click(object sender, EventArgs e)
        {
            ModalAction(ed =>
            {
                ed.WriteMessage(_sb.ToString()); //清空命令历史
                ResultBuffer dump = null;
                dump = RunLisp(_dump);
                if (dump == null || !dump.AutoDelete)
                {
                    return;
                }
                ed.WriteMessage("\n");
                SendCmdGetClipboard();
            });
        }

        /// <summary>
        /// 判断模态和非模态进入不同的处理
        /// </summary>
        /// <param name="action"></param>
        private void ModalAction(Action<Editor> action)
        {
            var doc = Acap.DocumentManager.MdiActiveDocument;
            var ed = doc.Editor;

            if (this.Modal)
            {
                using (ed.StartUserInteraction(this))//启用用户交互
                {
                    action.Invoke(ed);
                }
            }
            else
            {
                Win32API.WinApi.SetFocus(Acap.MainWindow.Handle);
                using (doc.LockDocument())
                {
                    action.Invoke(ed);
                }
                Win32API.WinApi.SetFocus(this.Handle);
            }
        }

        /// <summary>
        /// 发送命令及获取剪贴板
        /// </summary>
        private void SendCmdGetClipboard()
        {
            /*
              Acad2016的函数,我就为了仿照此处让Acad2008+都用上
              _cmdLines = Autodesk.AutoCAD.Internal.Utils.GetLastCommandLines(500, false);    
            */
            if (this.Modal)
            {
                //同步命令
                VlispTool.SendCmd(); 
                VlispTool.ClipboardData(cmdLines =>
                {
                    SplitMethod(cmdLines);
                });
            }
            else
            {
                //异步命令
                string cmd = VlispCmd.Cmd_copyhist + "\n";
                var doc = Acap.DocumentManager.MdiActiveDocument;
                doc.SendStringToExecute(cmd, false, true, true);
            }
        }

        /// <summary>
        /// 切割字符串加入对话框
        /// </summary>
        /// <param name="cmdLines"></param>
        public void SplitMethod(List<string> cmdLines)
        {
            MethodList.Items.Clear();
            MethodList.TopIndex = MethodList.Items.Count - 1;

            AttributesList.Items.Clear();
            AttributesList.TopIndex = AttributesList.Items.Count - 1;

            //为什么运行了一次就可以呢?
            const string stra = ";支持的方法:";
            const string strd = "椒";//Acad2008乱码
            var sNum = cmdLines.IndexOf(stra);
            if (sNum == -1)
            {
                for (int i = 0; i < cmdLines.Count; i++)
                {
                    if (cmdLines[i].Contains(strd))
                    {
                        sNum = i;
                        break;
                    }
                }
            }
            if (sNum != -1)
            {
                var sNuma = sNum + 1;
                var cc = cmdLines.GetRange(sNuma, cmdLines.Count - sNuma);

                this.BeginInvoke(new Action(() =>
                {
                    foreach (var item in cc)
                    {
                        MethodList.Items.Add(item.Replace(";   ", ""));
                    }
                }));
            }
            var eNum = cmdLines.IndexOf(";特性值:");
            if (eNum != -1)
            {
                ++eNum;
                List<string> cc;
                if (sNum != -1)
                {
                    cc = cmdLines.GetRange(eNum, sNum - eNum);
                }
                else
                {
                    //这里是 _dump 没有T参数时候
                    cc = cmdLines.GetRange(eNum, cmdLines.Count - eNum);
                }
                this.BeginInvoke(new Action(() =>
                {
                    foreach (var item in cc)
                    {
                        AttributesList.Items.Add(item.Replace(";   ", ""));
                    }
                }));
            }
        }

        /// <summary>
        /// 属性值单击显示 Vlax-Get
        /// </summary>
        /// <param name="sender"></param>
        /// <param name="e"></param>
        private void AttributesList_SelectedIndexChanged(object sender, EventArgs e)
        {
            this.BeginInvoke(new Action(() =>
            {
                var text = AttributesList.Text.Split(" ".ToCharArray()).GetValue(0);
                CodeText.Text = "(Vlax-Get (Vlax-Ename->Vla-Object (Car (Entsel))) '" + text.ToString() + " )";
            }));
        }

        /// <summary>
        /// 属性值双击显示 Vlax-Put
        /// </summary>
        /// <param name="sender"></param>
        /// <param name="e"></param>
        private void AttributesList_MouseDoubleClick(object sender, MouseEventArgs e)
        {
            this.BeginInvoke(new Action(() =>
            {
                var text = AttributesList.Text.Split(" ".ToCharArray()).GetValue(0);
                CodeText.Text = "(Vlax-Put (Vlax-Ename->Vla-Object (Car (Entsel))) '" + text.ToString() + " 参数)";
            }));
        }

        /// <summary>
        /// 方法选择动作
        /// </summary>
        /// <param name="sender"></param>
        /// <param name="e"></param>
        private void MethodList_SelectedIndexChanged(object sender, EventArgs e)
        {
            this.BeginInvoke(new Action(() =>
            {
                var text = MethodList.Text.Split(" ".ToCharArray());
                var t1 = text.GetValue(0).ToString();
                var t2 = text.GetValue(1).ToString().Split((new char[] { '(', ')' }));
                int num = 1;
                if (t2.GetValue(1).ToString() != "")
                {
                    num = Convert.ToInt16(t2.GetValue(1));
                }
                string canshu = "";
                for (int i = 0; i < num; i++)
                {
                    canshu = "参数 " + canshu;
                }
                CodeText.Text = "(Vlax-Invoke-Method (Vlax-Ename->Vla-Object (Car(Entsel))) '" + t1 + " " + canshu + ")";
            }));
        }

        /// <summary>
        /// 数据复制到粘贴板
        /// </summary>
        /// <param name="sender"></param>
        /// <param name="e"></param>
        private void Button2_Click(object sender, EventArgs e)
        {
            try
            {
                Clipboard.SetDataObject(CodeText.Text);
            }
            catch (Exception)
            {
                throw;
            }
        }

        /// <summary>
        /// 自动拷贝
        /// </summary>
        /// <param name="sender"></param>
        /// <param name="e"></param>
        private void CodeText_TextChanged(object sender, EventArgs e)
        {
            Clipboard.SetDataObject(CodeText.Text);
        }

        /// <summary>
        /// 变量赋值
        /// </summary>
        /// <param name="sender"></param>
        /// <param name="e"></param>
        private void TextBox2_Leave(object sender, EventArgs e)
        {
            this.BeginInvoke(new Action(() =>
            {
                CodeText.Text = $"(setq {VariableText.Text} {CodeText.Text})";
            }));
        }

        /// <summary>
        /// 加载按钮
        /// </summary>
        /// <param name="sender"></param>
        /// <param name="e"></param>
        private void Button1_Click(object sender, EventArgs e)
        {
            ModalAction(ed =>
            {
                ed.WriteMessage("\n\n");
                ed.WriteMessage(CodeText.Text + "\n");
                ResultBuffer aa = RunLisp(CodeText.Text);
                var bb = aa.AsArray();
                ed.WriteMessage(bb[0].Value.ToString() + "\n");
            });
        }

    }
    public static class LResultBufferTool
    {
        public static object GetValue(this ResultBuffer res)
        {
            var arr = res.AsArray();
            object ret = arr[0].Value;
            return ret;
        }
    }
}

窗体设计

namespace JoinBox
{
    partial class VlispForm
    {
        /// <summary>
        /// Required designer variable.
        /// </summary>
        private System.ComponentModel.IContainer components = null;

        /// <summary>
        /// Clean up any resources being used.
        /// </summary>
        /// <param name="disposing">true if managed resources should be disposed; otherwise, false.</param>
        protected override void Dispose(bool disposing)
        {
            if (disposing && (components != null))
            {
                components.Dispose();
            }
            base.Dispose(disposing);
        }

        #region Windows Form Designer generated code

        /// <summary>
        /// Required method for Designer support - do not modify
        /// the contents of this method with the code editor.
        /// </summary>
        private void InitializeComponent()
        {
            this.AttributesList = new System.Windows.Forms.ListBox();
            this.MethodList = new System.Windows.Forms.ListBox();
            this.label3 = new System.Windows.Forms.Label();
            this.CodeText = new System.Windows.Forms.TextBox();
            this.button1 = new System.Windows.Forms.Button();
            this.button3 = new System.Windows.Forms.Button();
            this.label4 = new System.Windows.Forms.Label();
            this.FeaturesText = new System.Windows.Forms.TextBox();
            this.label5 = new System.Windows.Forms.Label();
            this.MethodText = new System.Windows.Forms.TextBox();
            this.label6 = new System.Windows.Forms.Label();
            this.VariableText = new System.Windows.Forms.TextBox();
            this.groupBox1 = new System.Windows.Forms.GroupBox();
            this.groupBox2 = new System.Windows.Forms.GroupBox();
            this.groupBox1.SuspendLayout();
            this.groupBox2.SuspendLayout();
            this.SuspendLayout();
            // 
            // AttributesList
            // 
            this.AttributesList.Font = new System.Drawing.Font("宋体", 9F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(134)));
            this.AttributesList.FormattingEnabled = true;
            this.AttributesList.ItemHeight = 12;
            this.AttributesList.Location = new System.Drawing.Point(6, 20);
            this.AttributesList.Name = "AttributesList";
            this.AttributesList.Size = new System.Drawing.Size(546, 424);
            this.AttributesList.TabIndex = 0;
            this.AttributesList.SelectedIndexChanged += new System.EventHandler(this.AttributesList_SelectedIndexChanged);
            this.AttributesList.MouseDoubleClick += new System.Windows.Forms.MouseEventHandler(this.AttributesList_MouseDoubleClick);
            // 
            // MethodList
            // 
            this.MethodList.Font = new System.Drawing.Font("宋体", 9F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(134)));
            this.MethodList.FormattingEnabled = true;
            this.MethodList.ItemHeight = 12;
            this.MethodList.Location = new System.Drawing.Point(6, 20);
            this.MethodList.Name = "MethodList";
            this.MethodList.Size = new System.Drawing.Size(256, 424);
            this.MethodList.TabIndex = 2;
            this.MethodList.SelectedIndexChanged += new System.EventHandler(this.MethodList_SelectedIndexChanged);
            // 
            // label3
            // 
            this.label3.AutoSize = true;
            this.label3.Enabled = false;
            this.label3.Font = new System.Drawing.Font("宋体", 9F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(134)));
            this.label3.Location = new System.Drawing.Point(8, 530);
            this.label3.Name = "label3";
            this.label3.Size = new System.Drawing.Size(29, 12);
            this.label3.TabIndex = 4;
            this.label3.Text = "代码";
            // 
            // CodeText
            // 
            this.CodeText.Font = new System.Drawing.Font("宋体", 9F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(134)));
            this.CodeText.Location = new System.Drawing.Point(41, 527);
            this.CodeText.Name = "CodeText";
            this.CodeText.Size = new System.Drawing.Size(800, 21);
            this.CodeText.TabIndex = 5;
            this.CodeText.TextChanged += new System.EventHandler(this.CodeText_TextChanged);
            // 
            // button1
            // 
            this.button1.Font = new System.Drawing.Font("宋体", 9F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(134)));
            this.button1.Location = new System.Drawing.Point(416, 552);
            this.button1.Name = "button1";
            this.button1.Size = new System.Drawing.Size(117, 27);
            this.button1.TabIndex = 6;
            this.button1.Text = "加载";
            this.button1.UseVisualStyleBackColor = true;
            this.button1.Click += new System.EventHandler(this.Button1_Click);
            // 
            // button3
            // 
            this.button3.Font = new System.Drawing.Font("宋体", 9F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(134)));
            this.button3.Location = new System.Drawing.Point(293, 552);
            this.button3.Name = "button3";
            this.button3.Size = new System.Drawing.Size(117, 27);
            this.button3.TabIndex = 6;
            this.button3.Text = "选择图元";
            this.button3.UseVisualStyleBackColor = true;
            this.button3.Click += new System.EventHandler(this.Button3_Click);
            // 
            // label4
            // 
            this.label4.AutoSize = true;
            this.label4.Enabled = false;
            this.label4.Font = new System.Drawing.Font("宋体", 9F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(134)));
            this.label4.Location = new System.Drawing.Point(8, 475);
            this.label4.Name = "label4";
            this.label4.Size = new System.Drawing.Size(29, 12);
            this.label4.TabIndex = 7;
            this.label4.Text = "功能";
            // 
            // FeaturesText
            // 
            this.FeaturesText.Enabled = false;
            this.FeaturesText.Font = new System.Drawing.Font("宋体", 9F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(134)));
            this.FeaturesText.Location = new System.Drawing.Point(41, 471);
            this.FeaturesText.Name = "FeaturesText";
            this.FeaturesText.Size = new System.Drawing.Size(800, 21);
            this.FeaturesText.TabIndex = 5;
            this.FeaturesText.Text = "判断是在发生命令之前（先选取再执行）或之后选取对象。";
            // 
            // label5
            // 
            this.label5.AutoSize = true;
            this.label5.Enabled = false;
            this.label5.Font = new System.Drawing.Font("宋体", 9F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(134)));
            this.label5.Location = new System.Drawing.Point(8, 503);
            this.label5.Name = "label5";
            this.label5.Size = new System.Drawing.Size(29, 12);
            this.label5.TabIndex = 4;
            this.label5.Text = "方法";
            // 
            // MethodText
            // 
            this.MethodText.Enabled = false;
            this.MethodText.Font = new System.Drawing.Font("宋体", 9F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(134)));
            this.MethodText.Location = new System.Drawing.Point(41, 499);
            this.MethodText.Name = "MethodText";
            this.MethodText.Size = new System.Drawing.Size(800, 21);
            this.MethodText.TabIndex = 5;
            // 
            // label6
            // 
            this.label6.AutoSize = true;
            this.label6.Enabled = false;
            this.label6.Font = new System.Drawing.Font("宋体", 9F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(134)));
            this.label6.Location = new System.Drawing.Point(8, 559);
            this.label6.Name = "label6";
            this.label6.Size = new System.Drawing.Size(29, 12);
            this.label6.TabIndex = 4;
            this.label6.Text = "变量";
            // 
            // VariableText
            // 
            this.VariableText.Font = new System.Drawing.Font("宋体", 9F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(134)));
            this.VariableText.Location = new System.Drawing.Point(41, 555);
            this.VariableText.Name = "VariableText";
            this.VariableText.Size = new System.Drawing.Size(246, 21);
            this.VariableText.TabIndex = 5;
            this.VariableText.Leave += new System.EventHandler(this.TextBox2_Leave);
            // 
            // groupBox1
            // 
            this.groupBox1.Controls.Add(this.AttributesList);
            this.groupBox1.Location = new System.Drawing.Point(6, 5);
            this.groupBox1.Name = "groupBox1";
            this.groupBox1.Size = new System.Drawing.Size(561, 456);
            this.groupBox1.TabIndex = 8;
            this.groupBox1.TabStop = false;
            this.groupBox1.Text = "属性";
            // 
            // groupBox2
            // 
            this.groupBox2.Controls.Add(this.MethodList);
            this.groupBox2.Location = new System.Drawing.Point(573, 5);
            this.groupBox2.Name = "groupBox2";
            this.groupBox2.Size = new System.Drawing.Size(268, 456);
            this.groupBox2.TabIndex = 9;
            this.groupBox2.TabStop = false;
            this.groupBox2.Text = "方法";
            // 
            // VlispLook
            // 
            this.AutoScaleDimensions = new System.Drawing.SizeF(6F, 12F);
            this.AutoScaleMode = System.Windows.Forms.AutoScaleMode.None;
            this.ClientSize = new System.Drawing.Size(849, 583);
            this.Controls.Add(this.groupBox2);
            this.Controls.Add(this.groupBox1);
            this.Controls.Add(this.label4);
            this.Controls.Add(this.button3);
            this.Controls.Add(this.button1);
            this.Controls.Add(this.FeaturesText);
            this.Controls.Add(this.VariableText);
            this.Controls.Add(this.MethodText);
            this.Controls.Add(this.CodeText);
            this.Controls.Add(this.label5);
            this.Controls.Add(this.label6);
            this.Controls.Add(this.label3);
            this.Name = "VlispLook";
            this.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen;
            this.Text = "Vlisp图元属性查看器";
            this.groupBox1.ResumeLayout(false);
            this.groupBox2.ResumeLayout(false);
            this.ResumeLayout(false);
            this.PerformLayout();

        }

        #endregion

        private System.Windows.Forms.ListBox AttributesList;
        private System.Windows.Forms.ListBox MethodList;
        private System.Windows.Forms.Label label3;
        private System.Windows.Forms.TextBox CodeText;
        private System.Windows.Forms.Button button1;
        private System.Windows.Forms.Button button3;
        private System.Windows.Forms.Label label4;
        private System.Windows.Forms.TextBox FeaturesText;
        private System.Windows.Forms.Label label5;
        private System.Windows.Forms.TextBox MethodText;
        private System.Windows.Forms.Label label6;
        private System.Windows.Forms.TextBox VariableText;
        private System.Windows.Forms.GroupBox groupBox1;
        private System.Windows.Forms.GroupBox groupBox2;
    }
}

Arx制作

由于Arx可以通过重写命令栏的方式拦截命令文本数据,所以不需要像c#一样在那绕圈圈,
便可以导出命令历史到窗体上面,不过实现了功能就好啦🌚

后记

实际上我们需求是反射图元下面所拥有的东西,那么,我们为什么要靠net调用arx反射?
我们net可是有API的啊!所以只需要反射图元就好了...

(完)