（VBA）重影对象图像
大家好，星期五快乐：我希望我的功能“重影”，因为没有更好的文字，而在mid命令（VBA）-插入、复制等中。正如AutoCAD在直接从std菜单、工具栏或命令行选择这些选项时所做的那样。我想不出另外一个词来搜索论坛了，很抱歉，如果这是旧帽子。有人能给我指一个有帮助的命令/方法/或过程吗？
谢谢你的帮助。
https://www.cadtutor.net/forum/attachment.php?attachmentid=8180&stc=1&d=1226698441
遗憾的是，VBA的“重影”功能非常有限。通过本图纸“橡胶粘接”除外。公用事业Getpoint-与其他一些“Get…”类似方法，VBA所能做的最好的事情是尝试协调SendCommand的使用。
Lisp。NET和ARX在交互式视觉反馈方面都更具能力。
在我浪费时间尝试这个之前，我必须问一下，这里有没有人尝试过使用API，并将“rubberband”绘制到acad窗口的hdc上，就像在picturebox上的VB中一样？ 我没有。不过，看看它的表现会怎么样，这会很有趣。如果要我猜的话，我会说它更新得不够快。嗯，至少不如AutoCAD的原生rubberbanding功能快。
页:
[1]