先选择后执行命令与“ThisDrawing.sendcommand”命令间的冲突 如何解决
各位高手，小弟在编写一个先选择后执行的CAD命令(如"bg“）时 定义了一个LSP文件加载这个命令使其可以先选择对象后执行该命令，定义的LSP语句如下(defun c:BG()
(vl-load-com)
(vla-runmacro
(vlax-get-acad-object)
"GFCJ.DVB!BG"
)
(princ)
)
但BG过程中有一个ThisDrawing.SendCommand 命令 这部分的代码如下
Strlsppnt = axPoint2lspPoint(Ptinsert) & vbCr ' strlsppnt是我转换过来提供给下面”Calrandomptoriginele"命令的坐标参数
ThisDrawing.SendCommand "Calrandomptoriginele" & vbCr & Strlsppnt ‘这里我是想模拟我ACAD中一个插件的命令“Calrandomptoriginele" 获得坐标参数strlsppnt后 在ACAD的命令行中获得一个返回值
Strgcxx = ThisDrawing.GetVariable("lastprompt")’然后我用这个变量获得返回值
可现在我的问题是 ，我在先选择含有坐标信息的块后在命令行输入"BG”时 ，获得的命令行返回值确是“命令:BG”（这行文字在命令行中位于"Calrandomptoriginele" 命令行返回值的上方一行）而无法获得Calrandomptoriginele"命令在命令行的返回值,请问各位大侠可有什么解决方法能让我的先选择后执行命令"BG"获得正确的命令返回值
你可以在发送完命令，等待一会，再去获得返回值试一下。 我用过DELAY函数还是不行的，还是会获得“命令:BG”无法获得“命令:BG”后面的命令行返回值
页:
[1]