Topic: Create A New Drawing & Save Without Opening it

[JohnSnow]

Currently I am using the following codes to create new drawings and save them after doing something. It works fine but the screen keeps updating showing file being created. Is there anyway to do it in the background in silent without being seen? Any example codes are much appreciated.

(setq AcadApp (vlax-get-acad-object))
(setq acadDocs (vla-get-documents AcadApp))
(setq dwg (vl-catch-all-apply 'vla-add (list AcadDocs (getenv "LastTemplate"))))
(setq dwgname xxx)
(do_something)
(vla-saveas dwg dwgname)
(vla-close dwg)

[LinhPham]

People do it with .NET. I never know anyone can do it with AutoLisp. There is VBA AcadDBX or something can do it, but it is very cubersome API.

[Lee Mac]

It's possible to accomplish this in LISP by using ObjectDBX, however, the feasibility of this would depend on the operations being performed by your (do_something) expression, as ObjectDBX generally only permits the use of ActiveX properties & methods, and even then, not every aspect of the document object model is exposed through the ObjectDBX interface.

[JohnSnow]

Thank you very much. Understood.

Is there any place that I can find the full list of ActiveX properties and methods that are available by ObjectDBX?
I simply want to add lines, texts, layers etc and set the active layer and other basic things like that.

[baitang36]

Currently I am using the following codes to create new drawings and save them after doing something. It works fine but the screen keeps updating showing file being created. Is there anyway to do it in the background in silent without being seen? Any example codes are much appreciated.

(setq AcadApp (vlax-get-acad-object))
(setq acadDocs (vla-get-documents AcadApp))
(setq dwg (vl-catch-all-apply 'vla-add (list AcadDocs (getenv "LastTemplate"))))
(setq dwgname xxx)
(do_something)
(vla-saveas dwg dwgname)
(vla-close dwg)

  try accoreconsole.exe

[d2010]

I believe, the feature "opening many Drawings with OneScript.lsp",
bankrupt the AutoCad/BrisCad or ZwCad.
The autodesk.team do not understand, the CATIA, Z-Cad, SolidWork "steal the money$" from the market after Autodesk-insert this feature inside Autocad.
 

Code: [Select]

If you like this opinion, then you replay-me, here

Create A New Drawing & Save Without Opening it

Thank you very much. Understood.

Is there any place that I can find the full list of ActiveX properties and methods that are available by ObjectDBX?
I simply want to add lines, texts, layers etc and set the active layer and other basic things like that.

[Lee Mac]

Is there any place that I can find the full list of ActiveX properties and methods that are available by ObjectDBX?
I simply want to add lines, texts, layers etc and set the active layer and other basic things like that.

I'm not aware of the existence of official documentation on ObjectDBX (I don't think development of the interface was ever properly completed, as there are also still many bugs), but generally speaking, the following applies:

• No Selection Sets (use of ssget, ssname, ssdel etc)
• No Command calls (command "_.line" ... etc)
• No ent* methods (entmod, entupd etc) - though these are successful under some circumstances
• No access to System Variables (getvar, setvar, vla-getvariable, vla-setvariable etc)

As such, you'll be able to create the various objects you have described, but you won't be able to set the current layer.

[MSTG007]

Interesting.... Thanks for sharing that Lee. I thought you could do some layer control.

[BIGAL]

Like baitang36 look into accoreconsole uses lisp etc should be able to set current layer.

[It's Alive!]

I would at least have thought there would be access to database sysvars, like  textstyle,  tablestyle
Setting layers is a database operation, seems like there would be access to that as well.. analog to opening side databases in ARX.
No partying with the document or editor

[Lee Mac]

I would at least have thought there would be access to database sysvars, like  textstyle,  tablestyle
Setting layers is a database operation, seems like there would be access to that as well.. analog to opening side databases in ARX.

Code - Auto/Visual Lisp: [Select]

1. _$ (setq dbx (LM:getdocumentobject "drawing1.dwg"))
2. #<VLA-OBJECT IAxDbDocument 000000002df20680>
3. _$ (vla-setvariable dbx "clayer" "0")
4. ; error: ActiveX Server returned the error: unknown name: SetVariable
5. _$ (vla-put-activelayer dbx (vla-item (vla-get-layers dbx) "0"))
6. ; error: ActiveX Server returned the error: unknown name: ActiveLayer

[JohnSnow]

Thank you everyone. I will check out accoreconsole