关于在DELPHI中调用CAD并保存结果的问题
我需要在程序中调用cad,并且要将cad的保存结果存到数据库中.
使用ole可以实现调用,但是现在的问题是导入了cad的tlb库,在activex中出现一大堆控件,要求是使用这些东西完成的,不知道有没有什么高见啊各位,最好有源代码.
如果能介绍些现成的控件也行啊,分不够可以分开给.谢谢.
问题点数:100、回复次数:7Top
1 楼sherperd(牧羊者)回复于 2002-02-28 21:04:57 得分 15
编写一个计算器或简单但实用的数据库管理系统,如图书馆管理系统等,这样效果才会好。
否则,要是手上没有项目,很难学精。
虽然我也是初学者,但我同样这样建议你
Top
2 楼yansea(思宏)回复于 2002-03-01 18:40:34 得分 0
这是我项目啊大哥,要是做不出来我就要下岗了啊!!!!!!!!!
有没有什么高见啊,谢谢各位!
谢谢sherperd,我明白你的意思,虽然对我的项目没有什么帮助……Top
3 楼INeedCa(缺钙)回复于 2002-03-01 18:48:35 得分 15
我想你只能看CAD(我不知道你用的什么版本)的帮助,按照正规的做法,CAD会提供这方面的帮助。
具体源码,只能依照TLB提供的接口,用Rose Delphi Link 将这些*_TLB.Pas转化为类图,可能看起来舒服一点。Top
4 楼Liusp(夜深千帐灯)回复于 2002-03-01 18:50:59 得分 10
收藏Top
5 楼yansea(思宏)回复于 2002-03-01 18:53:10 得分 0
谢了先,我用olevariant可以实现调用,可是在使用TLB函数时有问题,不知道如何用啊,找不到文档帮助。
在运行时
AacdApplication1.Connect这句时总是提示“interfact not support”,但是并非每台机器都不好使,我也不知道是cad配置的问题还是delphi配置的问题,恳请帮助!
谢谢INeedCa!Top
6 楼yansea(思宏)回复于 2002-04-16 14:07:30 得分 0
我很不爽啊!不能给分……不过我到是能调用并保存结果了……但是还有一个问题是我怎么能在调用出cad后给一个打印命令呢,就是控制cad打印?
帖子发了很久了,有没有人啊!!???Top
7 楼yansea(思宏)回复于 2002-06-27 13:44:21 得分 0
算了,结了吧Top
8 楼linyin(林荫)回复于 2002-06-27 13:45:36 得分 60
try
acad := CreateOleObject('autocad.application');
sleep(1000);
acad.visible := true;
speedbutton7.Enabled :=false;
speedbutton8.Enabled :=true;
cad1.Enabled:=false;
cad2.Enabled:=true;
except
Application.MessageBox( 'CAD调用出错','信息提示',MB_OK+ MB_ICONINFORMATION);
speedbutton7.Enabled :=true;
speedbutton8.Enabled :=false;
cad1.Enabled:=true;
cad2.Enabled:=false;
exit;
end;Top




