zwzmh 发表于 2007-11-17 17:26:00

[求助]能否在不打开DWG文件的情况下知道该dwg文件里某特定层里含有图元的数目

<p>能不能用vlisp方法在不打开DWG文件的情况下知道该dwg文件里某特定层里含有图元的数目?</p><p>不知道我有没有把问题说清楚</p>

lyy 发表于 2007-11-17 20:49:00

(defun test (dwgname layname / dbxdoc n)<br/>&nbsp; (vl-load-com)<br/>&nbsp; (setq dbxdoc (vla-getinterfaceobject (vlax-get-acad-object) (strcat "ObjectDBX.AxDbDocument." (substr (getvar "acadver") 1 2))) n 0)<br/>&nbsp; (vla-open dbxdoc dwgname)<br/>&nbsp; (vlax-for item (vla-get-modelspace dbxdoc)<br/>&nbsp;&nbsp;&nbsp; (if (= (vla-get-layer item) layname) (setq n (1+ n)))<br/>&nbsp; )<br/>&nbsp; (vlax-release-object dbxdoc)<br/>&nbsp; n<br/>)

zwzmh 发表于 2007-11-18 22:14:00

<p>谢谢楼上了,明天回公司谢谢</p><p></p>

gjh 发表于 2007-11-19 17:10:00

<p>谢谢lyy!</p>
页: [1]
查看完整版本: [求助]能否在不打开DWG文件的情况下知道该dwg文件里某特定层里含有图元的数目