社区 › Auto Lisp › 警报中有多行文本

Lt Dan's l 发表于 2022-7-6 11:02:43

警报中有多行文本

我只是想有一个提醒弹出，但要多行。如何使文本返回右侧？
 
例子：
（提醒“你好吗？”）
 
结果：
你好
你好吗

alanjt 发表于 2022-7-6 11:12:04

(alert "first line\nsecond line")

fixo 发表于 2022-7-6 11:18:53

如果您有文本行列表，这将有所帮助
 

(defun build_alert (lst / text)
(alert
    (substr
      (setq text
      (apply 'strcat
      (mapcar
      '(lambda (x)
    (strcat x "\n")
)
      lst
      )
      )
      )
      1
      (1- (strlen text))
    )
)
)
;;usage
(build_alert '("alpha" "bravo" "charlie" "delta" "echo" "fixo"))

 
~'J'~

Lee Mac 发表于 2022-7-6 11:24:53

(defun build_alert ( lst / lst->str )
(defun lst->str ( lst del )
   (if (cdr lst)
   (strcat (car lst) del (lst->str (cdr lst) del))
   (car lst)
   )
)
(alert (lst->str lst "\n"))
)

 

alanjt 发表于 2022-7-6 11:31:43

：lol：

Lee Mac 发表于 2022-7-6 11:32:49

 

alanjt 发表于 2022-7-6 11:43:25

嘲笑你们两个把一个简单的问题复杂化了。

Lt Dan's l 发表于 2022-7-6 11:48:12

谢谢大家！我确实同意了
 
如何在LISP中添加“呢？
 
示例：我覆盖dim，输入“w/nx6'-8”h
 
我可以把这些话说进去，但“打乱了我的日常生活。”。

alanjt 发表于 2022-7-6 11:51:53

"\""。。。。。。。。。。。。。。

Lt Dan's l 发表于 2022-7-6 11:59:33

谢谢我正在尝试编写LISP例程。尝试

查看完整版本: 警报中有多行文本