Topic: How to get *.plt file's path and name?

[connieleo]

Afte I create *.plt files with plot dialog, I want to write the *.plt file's path and name in the *.txt ? How can I  get *.plt file's path and name after print dialog disappear? Thank a lot.

[rkmcswain]

Assuming you are plotting to the default path...

Code: [Select]

(strcat
  (vla-get-DefaultPlotToFilePath
    (vla-get-output
      (vla-get-preferences (vlax-get-acad-object))
    )
  )
  "\\"
  (vl-string-right-trim ".dwg" (getvar "dwgname"))
  "-"
  (getvar "ctab")
  ".plt"
)


[connieleo]

If I change the save path and plt name, I can't get it. Is the plt information exit in Regedit? Thants.

[CAB]

Maybe this will help you.

As far as I know, the previous plot settings are stored in the registry under the current profile name -HKEY_CURRENT_USER\Software\Autodesk\AutoCAD\< releaseno. >\< versionspec >\Profiles\< profilename >\Previous plot settings\Model - but I'm not sure if it includes a plot-to-file record. In fact, I don't think it's included.

By getting the active profile from the preferences and the productkey, you can piece together a string to read the registry keys. For example:

Code: [Select]

(defun readPrevPlot ()
  (setq prefs         (vla-get-preferences (vlax-get-acad-object))
        activeProfile (vla-get-activeprofile (vla-get-profiles prefs))
        acadkey       (vlax-product-key)
  )
  (setq keyString (strcat "HKEY_CURRENT_USER\\" acadkey "\\Profiles\\"
                          activeProfile "\\Previous plot settings"))
  (princ (strcat "\nLast plot configuration file, model:  "
                 (cond ((vl-registry-read (strcat keyString "\\Model") "Cfg Name")) ("None"))))
  (princ (strcat "\nLast plot configuration file, layout: "
                 (cond ((vl-registry-read (strcat keyString "\\Layout") "Cfg Name")) ("None"))))
  (princ)
)