没辙了！请教各位怎么把autocad的dwg文件在delphi窗口中显示出来？ ( 积分: 100 )

我用autocad画了一张地图，存为dwg格式。我想用delphi编程，在一个窗口中显示出来。
就像是，把一个bmp文件在delphi中的image控件中显示出来一样！

请大家给指个路好吗？有源码最好了！
我的分不多，如果嫌少了，跟我说，我会另开一贴加分！谢谢了！只要问题能够解决！

我用autocad画了一张地图，存为dwg格式。我想用delphi编程，在一个窗口中显示出来。
就像是，把一个bmp文件在delphi中的image控件中显示出来一样！

请大家给指个路好吗？有源码最好了！
我的分不多，如果嫌少了，跟我说，我会另开一贴加分！谢谢了！只要问题能够解决！

来一个人点击一下撒！

自己实现几乎不可能吧？
看有没有这方面的控件，不知那个ACAD控件能不能？

要用到图控插件（这个我还没找到有破解的），我自已也不行。

大家给一个cad控件下载撒！
能下载能用！马上给分！

http://www.cadology.co.uk/Software.asp

http://www.delphibbs.com/delphibbs/dispq.asp?lid=1827429

http://www.delphibbs.com/delphibbs/dispq.asp?lid=2410234

来自：jingmd, 时间：2004-7-6 15:33:08, ID：2698964
Autodesk公司有一个免费的产品：VoloVEp.exe（大约17M），安装完后就可以在Delphi中通过“Import ActiveX Control...”安装一个控件，然后就可以通过这个控件实现你要的功能（包括装入DWG文件、任意放大、缩小、移动、关闭图层等），很好用的。

dwgthumbnail.ocx只是一个看预览图的，装入的是Dwg中的一个位图，所以是不能做其他操作的。

嗯，俺再顶一下个！
高手们都来！

to dawnsong
我安装了，可是，没有看到任何OCX控件……

http://www.cadsofttools.com/?PageName=CADImportVCL#DXFStructure
那楼主看这个，CAD连源代码都提供了，省了Ocx控件，呵呵，cadsofttools.com说的，我也只是看到有这么一个DXFImage.pas文件，未作测试[]

dawnsong 大哥，有没有破解版啊……

http://www.autocad.com.tw/cad-vba/Download/download.htm

我安装了，可是，没有看到任何OCX控件……
---------------------------------------------------------
我安装了VoloVEp.exe试了下，这个控件还是存在的
你应该导入一个Ocx，即在其安装目录下面有个AvViewX.dll，就是这个了

用OLE可以么

TO DAWNSONG
我安装了
Package c:/program files/borland/delphi7/Projects/Bpl/dclusr70.bpl has been installed.
The following new component(s) have been registered: VOLOVIEWXLib_TLB.TAvViewX.

可是，TAvViewX中只有几个继承自TObject的方法：create啊，classinfo啊，等等
这有什么用啊？
我要完成的功能是，在一个窗口中显示，放大，缩小，画图，可以保存等等……

谢谢你的帮助，可是，我得实现一定的功能啊……
你的机子上能实现上述功能吗？怎么实现能告诉我吗？我愿意再加分[]

我在生成的pas文件中，发现了一些接口……是不是在这里面啊？可是，没有说明文件啊我也不知道怎么用……

vdViewport = interface(vdFigure)
['{19E0429E-3128-4DA7-AABA-6FB5DCABCFDB}']
function Get_Center: OleVariant; safecall;
function Get_width: Double; safecall;
function Get_height: Double; safecall;
function Get_ClipObjHandle: WideString; safecall;
function Get_Axis3DRotations: OleVariant; safecall;
function Get_TargetPoint: OleVariant; safecall;
function Get_View3DMode: VdConstDrawMode; safecall;
function Get_showEdge: VdConstShowEdge; safecall;
function Get_ViewCenter: OleVariant; safecall;
function Get_ViewSize: Double; safecall;
function Get_FrozenLayerList: OleVariant; safecall;
function Get_Sections: vdSectionClips; safecall;
function Get_BkColorEx: vdColor; safecall;
property Center: OleVariant read Get_Center;
property width: Double read Get_width;
property height: Double read Get_height;
property ClipObjHandle: WideString read Get_ClipObjHandle;
property Axis3DRotations: OleVariant read Get_Axis3DRotations;
property TargetPoint: OleVariant read Get_TargetPoint;
property View3DMode: VdConstDrawMode read Get_View3DMode;
property showEdge: VdConstShowEdge read Get_showEdge;
property ViewCenter: OleVariant read Get_ViewCenter;
property ViewSize: Double read Get_ViewSize;
property FrozenLayerList: OleVariant read Get_FrozenLayerList;
property Sections: vdSectionClips read Get_Sections;
property BkColorEx: vdColor read Get_BkColorEx;
end;
to zgl198171怎么用ole？？？[?]

呵呵，难道没人有办法了吗～～～

多人接受答案了。