菜鸟求助

烛光 · 发表于 2002-7-11 20:45:00

有没有函数可以把视窗内只看的到的图形另存为一个图档啊。

wzgzyf · 发表于 2002-7-12 20:46:00

删除掉视窗外的图形再存盘，
存好后回退就成。

烛光 · 发表于 2002-7-13 19:58:00

(defun c:blk()
(setq ss (ssget))
那我怎么样才能使"ss"生成一个图块(或图档)啊

mccad · 发表于 2002-7-13 20:26:00

(defun c:blk(/ outfile)
  (setq outfile "c:/bb.dwg")
  (blktofile outfile)
  (princ)
  )
(defun blktofile(outfile / vmax vmin ss outfile)
  (setq vmax(getvar "vsmax")
      vmin(getvar "vsmin")
      ss(ssget "w" vmax vmin)
      )
  (if(findfile outfile)
(command "-wblock" outfile "Y" "" vmin ss "")
(command "-wblock" outfile "" vmin ss "")
)
  (command "oops")
  )
  (princ)