How to tell the difference between Plain AutoCAD and C3D?

[GreyHippo]

I want to be able to set the autocad drawing template for QNEW different for each vertical. Is there a system variable I can use to check if AutoCAD is Civil 3D, plain, etc.?

I will be setting QNEW using the following code:

(vla-put-QNewTemplateFile (vla-Get-Files (vla-Get-Preferences (vlax-get-acad-object))) "U:\\AutoCAD\\Templates\\some_file.dwt")

[BeKirra]

Try this:

(vla-get-caption (vlax-get-acad-object))

[dgorsman]

We use fixed profile names ie. every user has the same profile names. Makes it very easy to tell which application (and in several cases, version) is running.

[BlackBox]

FWIW - Just check if the NOD contains a "Root" entry:

(defun _IsCivilDatabase (/ isCivilDb)
  ;; Example:
  ;; (if (_IsCivilDatabase)
  ;;   (prompt "\nCivil 3D Drawing opened. ")
  ;; )
  (foreach x (entget (namedobjdict))
    (if (and (= 3 (car x)) (= "Root" (cdr x)))
      (setq isCivilDb T)
    )
  )
  isCivilDb
)

[BlackBox]

Try this:

(vla-get-caption (vlax-get-acad-object))

That will just inform you if the active session is Civil 3D, and not if you've opened a Civil 3D drawing in vanilla AutoCAD.

Also... If memory serves... Simply opening a vanilla AutoCAD drawing with Civil 3D will append the "Root" entry to NOD.

Cheers

[BlackBox]

I want to be able to set the autocad drawing template for QNEW different for each vertical. Is there a system variable I can use to check if AutoCAD is Civil 3D, plain, etc.?

I will be setting QNEW using the following code:

(vla-put-QNewTemplateFile (vla-Get-Files (vla-Get-Preferences (vlax-get-acad-object))) "U:\\AutoCAD\\Templates\\some_file.dwt")

Using the sub-function I just posted:

(vla-put-QNewTemplateFile
  (vla-Get-Files (vla-Get-Preferences (vlax-get-acad-object)))
  (strcat
    "U:\\AutoCAD\\Templates\\"
    (if	(_IsCivilDatabase)
      "MyCivl3DTemplate.dwt"
      "MyAcadTemplate.dwt"
    )
  )
)