Topic: OnLastFileClose...

[Andrea]

Hi all,

I'm trying to make something like this...

(On_closeDrawing_file)
   (Progn
      (if (check if this is the last open drawing)
            (Make_Qnew_and get the Templatefile)
      )
    )
)

For the moment...i have this....but not working great..

Code: [Select]

(setq acadObject (vlax-get-acad-object))
(setq documents (vla-get-Documents acadObject))
(setq count (vla-get-Count documents))
(if (= count 1)
  (progn
  (command "_close" pause)
  (command "_fileopen" (getenv "LastTemplate"))
  )
)
(princ)     

I think there is no way in LISP......