[求助]关于“在CAD中插入时间和日期”的显示问题

vanching · 发表于 2007-8-8 11:13:00

我在明经http://www.mjtd.com/Codes/ArticleShow.asp?ArticleID=1045上看到“在CAD中插入时间和日期”，于是也在自己的CAD2007上进行了设置，但发现显示的“MM”月份和“mm”分钟是一样的，当我把“MM”改为“M”时，月份才显示正确。截图如下。请问：如何才能让该lsp程序正确显示“年月日时分秒”呢？

无痕 · 发表于 2007-8-8 12:31:00

(menucmd "M=$(edtime,$(getvar,date),DDD\", \"D MON YYYY)") ->"周三, 8 八月 2007"
(menucmd "M=$(edtime,$(getvar,date),YYYY.M.DD hh:mm:ss)") ->"2007.8.08 12:24:49"
(menucmd "M=$(edtime,$(getvar,date),YYYY\"年\"M\"月\"DD\"日\" hh\"时\"mm\"分\"ss\"秒\")") －> "2007年8月08日 12时26分06秒"

vanching · 发表于 2007-8-8 14:47:00

谢谢无痕。

zhangzl · 发表于 2012-1-7 20:23:22

很好，解决了，是日历的问题

vlisp2012 · 发表于 2012-4-3 11:59:23

非常感谢无痕。困扰了很久！！！

669423907 · 发表于 2012-4-3 12:16:53

这个很好，但不好用。

vlisp2012 · 发表于 2012-4-4 09:14:36

669423907 发表于 2012-4-3 12:16
这个很好，但不好用。

(defun C:io0( / date0 pt0)
(setq pt0 (getpoint "\n请指定插入位置点 :")
wzgd (getvar "textsize"))
(setq date0 (menucmd "M=$(edtime,$(getvar,date),YYYY\"年\"M\"月\"DD\"日\" hh\"时\"mm\"分\"ss\"秒\")"))
(command "text" "j" "bl" pt0 wzgd 0 date0)
(princ)
)
很好用啊，非常好。没感觉哪里不好啊？！

注册 · 发表于 2012-4-4 10:57:49

这个哪里用的到啊

sdls · 发表于 2019-3-28 22:50:43

很给力，谢谢

账号		自动登录	找回密码
密码			注册

[求助]关于“在CAD中插入时间和日期”的显示问题

本帖子中包含更多资源

评分

浏览过的版块