How to set opened document Active with VL.

Maybe a 'uninformed' question, but, I want to open a read-only drawing - using VLisp and set it to the 'current' drawing in the editor. I have a drawing open, and am in SDI = 0 mode.

What does the code look like if the drawing = "test.dwg".

Bob
EC-CAD

 

So far I have:

(vl-load-com)
(command "SDI" 0)
(setq fname (findfile "test.dwg"))
(if fname
(progn
(setq doc (vla-open (vla-get-documents (vlax-get-acad-object)) fname))
(vlax-release-object docs)
); end progn
(prompt "\nCould not find the Test.dwg ?? ")
); end if
(princ)

It opens the test.dwg (it's on a support path), but it does not
set it the 'current' drawing. It just adds it to the 'History' list.

Bob

 

(defun test()
(setq fname"Z:\\0\\0Dwgs\\testdwgs\\stairtest.dwg")
(setq doc (vla-open (vla-get-documents (vlax-get-acad-object)) fname))

;this activates doc but leaves vlide stuck in previous drawing(from where
lisp was run)
;(vlax-invoke-method doc 'activate)

;this activates doc and seems to free up lisp from previous doc
;method gleaned from Jason Piercey - thanks dude!
(command "vbastmt" "documents.item(documents.count - 1).activate")

; i thought maybe this would work but it didn't
;(command "vbastmt" (strcat "documents.item(" fname ").activate"))
)

hth
Mark

fname))

(command "vbastmt" "documents.item(documents.count-1).activate")

 

Mark,
Thanx. This works fine.
(command "vbastmt" "documents.item(documents.count - 1).activate")

Bob
http://www.bobscadshop.com

 

Cool.
too bad there's not a cleaner way - without command - but till then...

 

Hi Mark,
Slightly simpler versions:
(command "vbastmt" "documents.open \"test.dwg\",true")
or
(vl-cmdf "vbastmt" "documents.open \"test.dwg\",true")

It is important to realize that, as soon as either of those statements are
executed, that the lisp program in the launching document is suspended
and does resume execution until that document is reactivated.