使用delphi开发AutoCAD的入门级问题（整理添加中）

lazybones

又搞定一个问题，使用API函数将AutoCAD窗口置顶 SetForegroundWindow(acad.HWND);
或者
BringWindowToTop(acad.HWND); 我不知道二者差别

lazybones

新问题，如果AutoCAD有一个命令正在执行中，如，等待输入直线的另一个端点，此时会触发一个异常，提示“被呼叫方拒绝接受呼叫”，如何能够先取消 AutoCAD正在运行的命令呢，就像在CAD中选择菜单命令先“^^C”一样的效果？

lazybones

使用命令行画一个圆
acad.ActiveDocument.SendCommand('circle 10,10,10 100 ');
注意空格

lazybones

实现命令行提示
acad.ActiveDocument.Utility.Prompt('hello'+#13+#10);

lazybones

新问题
如何将自己的应用程序窗体和AutoCAD窗体一上一下绑定在一起，使用鼠标在任务栏单击二者之一，则应用程序被激活，置于最顶层，AutoCAD排在其 下。好比应用程序窗体是AutoCAD的模态窗口一样，当然，应用程序窗口还要能暂时隐藏，对AutoCAD进行手工操作之后再show出来。

qustsummit

我也在学delphi二次开发autocad，请大家多少指教

qustsummit

摸索了三天，写了个绘制六角头螺栓的程序 http://hizone.91i.net/123.exe，请大家pp

laoliu09

1、用异常处理语句不行吗？就像VBA一样！ 2、绑定CAD窗口我可没试过，但你要应用程序窗口能暂时隐藏，对AutoCAD进行手工操作之后再show出来，可以用Form.hide和Form.show来实现！这还是跟VBA一样的！ 我爱编程，共同提高吧！

lazybones

构造选择集时遇到麻烦，用户屏选vba语法为：object.SelectOnScreen [FilterType][, FilterData]，套用到delphi时s1.SelectOnScreen();却非要那两个可选参数，编译通不过，不知谁有经历？如何解决？

lazybones

令人悲观的是，察看AutoCAD_TLB.pas，类型库转换成.pas后SelectOnScreen的两个参数并不像VBA一样是可选的。



不过，有一招可谓破釜沉舟：不引入类型库，AutoCAD有关的对象均声明为OleVariant，这样SelectOnScreen可以实现缺省参数，可是所有的代码提示就没有了。