Source Insight 自定宏,老是忘了..今天整理了一下.做个备份
参考.http://blog.youkuaiyun.com/nieliquan/article/details/7917773
macro InsertComment()
{MyName = "zlk" //getenv(MYNAME) 修改者
//MyComment = "modify" //注释
MyI ="1" //0为删除 1 为增加 2为更改
hbuf = GetCurrentBuf()
hwnd = GetCurrentWnd()
lnFirst = GetWndSelLnFirst(hwnd)
lnLast = GetWndSelLnLast(hwnd)
//InsBufLine(hbuf, lnFirst, "//")
//获得界面输入信息
//if(strlen( MyI ) == 0)
{
MyI = Ask("0:del 1:add 2:update")
}
//szMyName = getreg(MYNAME)
//if(strlen( szMyName ) == 0)
//{
// szMyName = Ask("Enter your name:")
// setreg(MYNAME, szMyName)
//}
// Get current time
szTime = GetSysTime(1)
Day = szTime.Day
Month = szTime.Month
Year = szTime.Year
if (Day < 10)
szDay = "0@Day@"
else
szDay = Day
if (Month < 10)
szMonth = "0@Month@"
else
szMonth = Month
//InsBufLine(hbuf, lnFirst, "#if 1 //@MyName@ @Year@@szMonth@@szDay@ @MyComment@")//InsBufLine
//InsBufLine(hbuf, lnLast+2, "#endif //@MyName@ @Year@@szMonth@@szDay@ @MyComment@")
if(MyI==0)
{
InsBufLine(hbuf, lnFirst, "#if 0 //@MyName@ @Year@@szMonth@@szDay@ del start")//InsBufLine
InsBufLine(hbuf, lnLast+2, "#endif //del end")
}
else if(MyI==1)
{
InsBufLine(hbuf, lnFirst, "#if 1 //@MyName@ @Year@@szMonth@@szDay@ add start")//InsBufLine
InsBufLine(hbuf, lnLast+2, "#endif //add end")
}
else if(MyI==2)
{
InsBufLine(hbuf, lnFirst, "#if 1 //@MyName@ @Year@@szMonth@@szDay@ modify start")//InsBufLine
InsBufLine(hbuf, lnFirst+1, "#else //modify")//InsBufLine
InsBufLine(hbuf, lnLast+3, "#endif //modify end")
}
}