请问各位同仁,如何将autocad的dwg格式转成openpicturedialog能支持的格式,如*.jpg,*.jpeg,*.bmp,*.ico等等(急)
解决方案 »
- dxdbtreevieview的同级节点显示顺序
- SQL数据库的操作
- 多线程问题:线程类Execute中调用了别的对象的方法,这个方法中如何使用Synchronize
- DBGRIDEH中记录分组显示用不同颜色问题,3Q
- 跪求一算法!
- TADOTable.DeleteRecords(arall)出错,错误如下,帮忙,谢谢,马上给分
- 在打印报表时,上面加的QRMemory,能否规定它一行打多少字或这一行多长??
- 关于FORMSTYLE的一个小问题,请指教。在FORMCHILD模式想隐藏。小难
- 急!!!!日期???
- 请问:如何获取IE的历史记录啊?
- 100分:求ehlib 2.4 控件
- 一个关于字符串处理的问题,请高手帮帮忙!
如果我没有记错的话,AutoCad有一个导出功能,可以导出为图片格式!
cad:=CreateoleObject('AutoCAD.Application');
except
on E:Exception do
begin
// common.SAVE_DO_LOG(common.username,'CAD调用出错:'+e.Message,err_log);
Application.MessageBox( 'CAD调用出错','信息提示',MB_OK+ MB_ICONINFORMATION);
exit;
end;
end;
cad.Visible:=true;
caddoc:=cad.ActiveDocument;
// cad.ZoomAll;
//改变当前背景颜色为白色
cad.Preferences.Display.GraphicsWinModelBackgrndColor:= clwhite;
//改变当前命令行为1行
cad.Preferences.Display.DockedVisibleLines:= 1;
//设置模式为单文档
caddoc.SetVariable('SDI',1);
caddoc.Application.Documents.Open('c:\ff.dwg', False);
sleep(1000);
t_SelectionSet:=caddoc.SelectionSets.Add('1');
t_SelectionSet.Select(5);
caddoc.Export( 'c:\test', 'WMF', t_SelectionSet);