这篇文章是程序代码更改由其他用户。 不是原厂原装,例如下列总结,使用作为个人笔记。
(1)打开projectbase。打开文件Utils.em,插入下面代码:
//插入时间
macro MonthToName(MonthNum)
{
if (MonthNum== 1)
return "01"
if (MonthNum== 2)
return "02"
if (MonthNum== 3)
return "03"
if (MonthNum== 4)
return "04"
if (MonthNum== 5)
return "05"
if (MonthNum== 6)
return "06"
if (MonthNum== 7)
return "07"
if (MonthNum== 8)
return "08"
if (MonthNum== 9)
return "09"
if (MonthNum== 10)
return "10"
if (MonthNum== 11)
return "11"
if (MonthNum== 12)
return "12"
}
macro DisplayDate()
{
szTime = GetSysTime(1)
Day = szTime.Day
Month = szTime.Month
Year = szTime.Year
Hour = szTime.Hour
Minute = szTime.Minute
Second = szTime.Second
if (Day < 10)
szDay = "0@Day@"
else
szDay = Day
szMonth = MonthToName(Month)
hbuf = GetCurrentBuf()
SetBufSelText(hbuf, "/* @Year@/@szMonth@/@szDay@--@Hour@:@Minute@:@Second@ */")
}
(2)分配快捷键:
Options->Menu Assignments 打开Menu Assignments窗体, 在Command中输入Macro, 选中要使用的宏(DisplayDate), 加入到合适的菜单中.还能够自己定义快捷键,就能够了,我定义的是Ctrl+Alt+F11。
(选项-->键分配)
就能够产生下面效果:
/* 2014/09/28--11:41:15 */
版权声明:本文博主原创文章,博客,未经同意不得转载。