本文章中程序由其他网友代码修改而来, 并非原本原创,总结如下,作为个人笔记使用。
(1)打开工程base,打开文件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@  */")
}
Options->Menu Assignments 打开Menu Assignments窗口, 在Command中输入Macro, 选中要使用的宏(DisplayDate), 添加到合适的菜单中.还可以自定义快捷键,就可以了,我定义的是Ctrl+Alt+F11。
(选项-->键分配)
就可以产生以下效果:
/* 2014/09/28--11:41:15 */
原文:http://blog.csdn.net/yagnruinihao/article/details/39639075