基本AutoLisp变量，函数传递

Question

好吧，我似乎很难把一个简单的变量传递到函数中的另一个变量。我没看到我做错了什么。为什么将一个字符串转换为零的变量传递，而传递原始字符串则保持不变？

;; Main Procedure
(defun C:Debug01(/ dirPath sResult)

    ;; Pulls and shows directory of current file
    (setq dirPath (getvar 'dwgprefix))
    (princ (strcat "\n \n" dirPath "\n \n"))

    ;; Basic Function
    (setq sResult (fcnBasic "Message 1" dirfile "Message 3" "Title"))
    (princ (strcat " \nResulting output : " sResult "\n "))
    (princ)
)

;; A Basic Function
(defun fcnBasic (message1 message2 message3 main / sReturn)

    ;; Displaying values
    (princ (type message1)) (princ (strcat " : " message1 "\n"))
    (princ (type message2)) (princ (strcat " : " message2 "\n")) ;; Message 2 should equal "C:\Users\Garrettb\Documents" with a type of STR.
    (princ (type message3)) (princ (strcat " : " message3 "\n"))
    (princ (type main))     (princ (strcat " : " main "\n"))

    ;; Returning a value
    (setq sReturn message2)
    (return sReturn)
)

​

​

Answer 1

排成一行：

(setq sResult (fcnBasic "Message 1" dirfile "Message 3" "Title"))

您传递变量dirfile，该变量在函数C:Debug01中未初始化。也许在某个地方，我不知道。)设置变量dirPath的值，该值与dirfile不相同;)