求助!如何取得系统时间,并以年月日 时分秒格式返回!!
问题如题。 我用 (setq b (getvar "DATE"))取得的b 显示出来是一个浮点数,我不知道要什么算法才能得到 当前系统时钟的年月日时分秒格式的时间呢??求高手代码! (setq b (menucmd "M=$(edtime,$(getvar,date), YYYY.M.D hh:mm:ss)")) adc 发表于 2012-10-15 12:44 static/image/common/back.gif(setq b (menucmd "M=$(edtime,$(getvar,date), YYYY.M.D hh:mm:ss)"))
很感谢!我想在请教一个问题!如果我的文件名为P6.lsp 请问我要做一个内部函数实现每次输入命令后就自动加载此文件,代码如下 :
(defun C:aload(/ a)
(princ "\n<<<<<<<<<<-------")
(setq a (load "D:/test/lisp教学/P6"))
(princ a)
(princ "\n|---->>>>>>>>>")
(princ)
)
我运行了几次都不成功 提示load函数的参数错误 请问我这个地方哪有错? 正确的应该如何写 实现自加载? 很简单,(setq b (getvar "CDATE"))试试 陨落 发表于 2012-10-15 15:13 static/image/common/back.gif
很简单,(setq b (getvar "CDATE"))试试
之前就是用这个好像不行! 蔡__洛 发表于 2012-10-15 13:32 static/image/common/back.gif
很感谢!我想在请教一个问题!如果我的文件名为P6.lsp 请问我要做一个内部函数实现每次输入命令后就自动加 ...
路径再加个斜杠试试. 本帖最后由 陨落 于 2012-10-15 18:18 编辑
很简单,(setq b (rtos (getvar "CDATE")))试试,注意是cdate 而不是date。 陨落 发表于 2012-10-15 18:16 static/image/common/back.gif
很简单,(setq b (rtos (getvar "CDATE")))试试,注意是cdate 而不是date。
这次可以了 学习一下啊 VBALISPER 发表于 2012-10-15 17:45 static/image/common/back.gif
路径再加个斜杠试试.
还是不行 完整代码应该怎么写呢?
页:
[1]
2