请问Autolisp如何获取C#做的非模态界面文本框值？

tender138

请问Autolisp如何获取C#做的非模态界面文本框值？

tender138

yshf 发表于 2024-10-31 15:34
不贴出窗体代码，不好判断

非常感谢兄弟一再指导，麻烦帮我修改一下，谢谢！


using Autodesk.AutoCAD.ApplicationServices;
using Autodesk.AutoCAD.EditorInput;
using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
using Autodesk.AutoCAD.Runtime;
using System.Windows.Forms;
using static System.Windows.Forms.VisualStyles.VisualStyleElement;
using Autodesk.AutoCAD.DatabaseServices;
using static System.Windows.Forms.VisualStyles.VisualStyleElement.Window;


namespace ModelessDlg
{
    public class Class1
    {
    [CommandMethod("LoadWin")]
        static public void LoadWin()
        {
            FormMain MyForm = new FormMain();
            MyForm.Show();
            MyForm.TextBox1.Text = "001";
            MyForm.TextBox2.Text = "002";

        }

        [LispFunction("GetVal")]
        public static ResultBuffer GetVal(ResultBuffer resBufIn)
        {
            FormMain MyForm = new FormMain();
            return new ResultBuffer(new TypedValue((int)LispDataType.Int32, MyForm.TextBox1.Text));
        }
    }
}




namespace ModelessDlg
{
    partial class FormMain
    {
        /// <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.TextBox1 = new System.Windows.Forms.TextBox();
            this.TextBox2 = new System.Windows.Forms.TextBox();
            this.label1 = new System.Windows.Forms.Label();
            this.label2 = new System.Windows.Forms.Label();
            this.SuspendLayout();
            //
            // TextBox1
            //
            this.TextBox1.Location = new System.Drawing.Point(99, 12);
            this.TextBox1.Name = "TextBox1";
            this.TextBox1.Size = new System.Drawing.Size(100, 21);
            this.TextBox1.TabIndex = 0;
            this.TextBox1.Text = "123";
            //
            // TextBox2
            //
            this.TextBox2.Location = new System.Drawing.Point(99, 60);
            this.TextBox2.Name = "TextBox2";
            this.TextBox2.Size = new System.Drawing.Size(100, 21);
            this.TextBox2.TabIndex = 1;
            this.TextBox2.Text = "456";
            //
            // label1
            //
            this.label1.AutoSize = true;
            this.label1.Location = new System.Drawing.Point(37, 15);
            this.label1.Name = "label1";
            this.label1.Size = new System.Drawing.Size(29, 12);
            this.label1.TabIndex = 2;
            this.label1.Text = "长度";
            //
            // label2
            //
            this.label2.AutoSize = true;
            this.label2.Location = new System.Drawing.Point(37, 60);
            this.label2.Name = "label2";
            this.label2.Size = new System.Drawing.Size(29, 12);
            this.label2.TabIndex = 3;
            this.label2.Text = "宽度";
            //
            // FormMain
            //
            this.AutoScaleDimensions = new System.Drawing.SizeF(6F, 12F);
            this.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font;
            this.ClientSize = new System.Drawing.Size(230, 93);
            this.Controls.Add(this.label2);
            this.Controls.Add(this.label1);
            this.Controls.Add(this.TextBox2);
            this.Controls.Add(this.TextBox1);
            this.MaximizeBox = false;
            this.MinimizeBox = false;
            this.Name = "FormMain";
            this.Text = "参数";
            this.ResumeLayout(false);
            this.PerformLayout();

        }

        #endregion

        public System.Windows.Forms.TextBox TextBox1;
        public System.Windows.Forms.TextBox TextBox2;
        private System.Windows.Forms.Label label1;
        private System.Windows.Forms.Label label2;
    }
}

tender138

d1742647821 发表于 2024-10-30 23:30
那么你应该知道，函数打上[CommandMethod]可以用命令触发，那么函数打上[LispFunction]特性则可以被lisp ...

非常感谢！如下代码不成功，望指教，谢谢！

namespace ModelessDlg
{
    public class Class1
    {
    [CommandMethod("LoadWin")]
        static public void LoadWin()
        {
            FormMain MyForm = new FormMain();
            MyForm.Show();
            MyForm.TextBox1.Text = "001";
            MyForm.TextBox2.Text = "002";
        }
        [LispFunction("Getvalue")]
        public static string Getvalue()
        {
            FormMain MyForm = new FormMain();
            string str = MyForm.TextBox1.Text;
            return str;
        }
    }
}

tender138

yshf 发表于 2024-10-31 10:21
C#定义一个带窗体的LispFunction，然后用Lisp调用，如下 图

谢谢！修改以下红色代码可以返回值，但是窗口设计值，非修改后的值
namespace ModelessDlg
{
    public class Class1
    {
    [CommandMethod("LoadWin")]
        static public void LoadWin()
        {
            FormMain MyForm = new FormMain();
            MyForm.Show();
            MyForm.TextBox1.Text = "001";
            MyForm.TextBox2.Text = "002";

        }
        [LispFunction("GetVal")]
        public static ResultBuffer GetVal(ResultBuffer resBufIn)
        {
            FormMain MyForm = new FormMain();
            return new ResultBuffer(new TypedValue((int)LispDataType.Int32, MyForm.TextBox1.Text));
        }
    }
}

Bao_lai

不如把dll发出来玩玩

d1742647821

让写窗体的人给你留个接口

tender138

d1742647821 发表于 2024-10-29 14:34
让写窗体的人给你留个接口

谢谢！窗口是我做的，怎么留？刚接触C#，啥都不懂

guohq

窗口对象里写一个方法能返回文本的内容，如getText，并把窗口的实例存为一个静态变量,如 obj，再写一个方法调用obj.getText()  ,这个方法需要用lispfunction包装起来

d1742647821

tender138 发表于 2024-10-29 14:43
谢谢！窗口是我做的，怎么留？刚接触C#，啥都不懂

那么你应该知道，函数打上[CommandMethod]可以用命令触发，那么函数打上[LispFunction]特性则可以被lisp调用

yshf

C#定义一个带窗体的LispFunction，然后用Lisp调用，如下 图

yshf

...非修改后的值

不贴出窗体代码，不好判断