[编程申请]：关于以前的一个批量插图文件在2005中的问题

chenhang1203

这个程序是批量插图的程序,在CAD2002能用,在CAD2005不能用,请问应该如何修改
(defun c:ct (/ lst)
  (xdrx_begin)
  (xdrx_sysvar_push "osmode")
  (setvar "osmode" 0)
  (setq lst (xdrx_getfiled "" "批量插图" "AutoCAD图形(*.dwg)|*.dwg" t))
  (if lst
    (mapcar '(lambda (x)
               (vl-cmdf ".insert" x '(0. 0. 0.) "1" "1" "0")
             )
               lst
    )
  )
  (xdrx_sysvar_pop)
  (xdrx_end)
  (princ)
)

eachy

是因为 API BUG 的原因，涉及到 WINAPI 函数的xdrx部分都有问题，只能等小东更新API了

阿土

程序很实用，能不能说说怎么用呀？