先选择后执行命令与“ThisDrawing.sendcommand”命令间的冲突 如何解决

guntopztm

各位高手，小弟在编写一个先选择后执行的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"获得正确的命令返回值

齐天大圣3386

你可以在发送完命令，等待一会，再去获得返回值试一下。

guntopztm

我用过DELAY函数还是不行的，还是会获得“命令:BG”无法获得“命令:BG”后面的命令行返回值