（工具类）source insight中快速添加时间到代码

来源：互联网发布：风云网络传奇编辑：程序博客网时间：2024/06/05 19:34

本文章中程序由其他网友代码修改而来，并非原本原创，总结如下，作为个人笔记使用。

（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@  */")}

（2）分配快捷键：

Options->Menu Assignments 打开Menu Assignments窗口, 在Command中输入Macro, 选中要使用的宏（DisplayDate）, 添加到合适的菜单中.还可以自定义快捷键，就可以了，我定义的是Ctrl+Alt+F11。

（选项-->键分配）

就可以产生以下效果：

/*  2014/09/28--11:41:15  */

0 0