Tcl/TK -- DateTime Format

最新推荐文章于 2024-04-07 16:32:25 发布

黑仔ZJM

最新推荐文章于 2024-04-07 16:32:25 发布

阅读量1.9k

点赞数 1

分类专栏： Tcl/TK

本文链接：https://blog.csdn.net/MingRiDeYueMing/article/details/18088239

版权

Tcl/TK 专栏收录该内容

7 篇文章 0 订阅

订阅专栏

proc getDate {} {
	
	#01/10/2014
	return [clock format [clock seconds] -format "%m/%d/%Y"]	
}

proc fileDate {} {
	
	# 20121221
	return [clock format [clock seconds] -format "%Y%m%d"]
}

proc dateTime {} {

	# 12/21/2011 10:50:23 AM
	return [clock format [clock seconds] -format "%Y/%m/%d %T"]	
}

proc dayTime {} {
	
	# 12/21/2011 10:50:23 Wed
	return [clock format [clock seconds] -format "%A"]	
}
proc logTime {} {

	# [2013-08-20 12:05:26]
	return [clock format [clock seconds] -format "\[%Y-%m-%d %T\]"]
}