STARTUP 系统变量和StartUpType 环境变量

XDSoft

问题：

The STARTUP system variable and the StartUpType environment variable

解答：

With the value of the STARTUP system variable set to 0, the user is only given the option of using a template.  If it was set to 1, this would enable a user to 1) start a drawing from scratch, 2) use a template, or 3) use a wizard.  You can of course control this programatically.

1. (defun-q MyStartup ( / app doc)
   
2.    (vl-load-com)
   
3.    (setq app (vlax-get-acad-object)
   
4.            doc (vla-get-activedocument app)
   
5.    ) ;setq
   
6.    (if (= (substr (vlax-variant-value
   
7.    (vla-getvariable doc "ACADVER")) 1 2) "17")
   
8.       (vla-setvariable doc "STARTUP"
   
9.        (vlax-make-variant 1 vlax-vbInteger))
   
10.    )
    
11.    (princ)
    
12. )
    
13. (setq S::STARTUP (append S::STARTUP MYSTARTUP))
    
14. 
    
15. You can change the default option for the dialog by setting the StartUpType variable as shown below:
    
16. 
    
17. ;To start from Scratch
    
18. (setenv "StartUpType" "Scratch")
    
19. 
    
20. ;To use a Template
    
21. (setenv "StartUpType" "T?emplate")
    
22. 
    
23. ;To use a Wizard
    
24. (setenv "StartUpType" "Wizard")
    

(defun-q MyStartup ( / app doc)<br />    (vl-load-com)<br />    (setq app (vlax-get-acad-object)<br />            doc (vla-get-activedocument app)<br />    ) ;setq <br />    (if (= (substr (vlax-variant-value<br />    (vla-getvariable doc "ACADVER")) 1 2) "17")<br />       (vla-setvariable doc "STARTUP"<br />        (vlax-make-variant 1 vlax-vbInteger))<br />    )<br />    (princ)<br /> )<br /> (setq S::STARTUP (append S::STARTUP MYSTARTUP))<br /> <br /> You can change the default option for the dialog by setting the StartUpType variable as shown below:<br /> <br /> ;To start from Scratch<br /> (setenv "StartUpType" "Scratch")<br /> <br /> ;To use a Template<br /> (setenv "StartUpType" "T?emplate")<br /> <br /> ;To use a Wizard<br /> (setenv "StartUpType" "Wizard")<br />

/db_自贡黄明儒_

这段代码很实用。