source insight 添加注释快捷方式

     将下面的代码另存为xxx.em文件，打开source insight，将该文件添加到工程中，然后在Options->KeyAssignments中你就可以看到这个宏了，宏的名字是MultiLineComments，然后我们为它分配快捷键“Ctrl + /”，然后就可以了。

        或者打开 source insight 然后在 Project->Open Project 打开Base项目，然后打开Utils.em文件，将以下宏添加到文件末尾，然后在Options->KeyAssignments就可以看到这个宏了，然后我们和上面一样分配快捷键即可。

//选中行行首添加"//"注释
macro MultiLineComment()
{
    hwnd = GetCurrentWnd()
    selection = GetWndSel(hwnd)
    LnFirst =GetWndSelLnFirst(hwnd)      //取首行行号
    LnLast =GetWndSelLnLast(hwnd)      //取末行行号
    hbuf = GetCurrentBuf()
 
    if(GetBufLine(hbuf, 0) =="//magic-number:tph85666031"){
        stop
    } 


    Ln = Lnfirst
    buf = GetBufLine(hbuf, Ln)
    len = strlen(buf)
     
    while(Ln <= Lnlast) {
        buf = GetBufLine(hbuf, Ln)  //取Ln对应的行
        if(buf ==""){                   //跳过空行
            Ln = Ln + 1
            continue
        }
 
        if(StrMid(buf, 0, 1) == "/"){       //需要取消注释,防止只有单字符的行
            if(StrMid(buf, 1, 2) == "/"){
                PutBufLine(hbuf, Ln, StrMid(buf, 2, Strlen(buf)))
            }
        }
 
        if(StrMid(buf,0,1) !="/"){          //需要添加注释
            PutBufLine(hbuf, Ln, Cat("//", buf))
        }


        Ln = Ln + 1
    }


    SetWndSel(hwnd, selection)
}


//光标显示行注释掉
macro CommentSingleLine()
{
    hbuf = GetCurrentBuf()
    ln = GetBufLnCur(hbuf)


str = GetBufLine (hbuf, ln)
    str = cat("/*",str)
    str = cat(str,"*/")
    PutBufLine (hbuf, ln, str)
}


//将一行中鼠标选中部分注释掉
macro CommentSelStr()
{
    hbuf = GetCurrentBuf()
    ln = GetBufLnCur(hbuf)
    
    str = GetBufSelText(hbuf)
    str = cat("/*",str)
    str = cat(str,"*/")


    SetBufSelText (hbuf, str)
}


//添加“#ifdef 0”和“#endif”的宏代码
macro AddMacroComment()
{
    hwnd=GetCurrentWnd()
    sel=GetWndSel(hwnd)


    lnFirst=GetWndSelLnFirst(hwnd)
    lnLast=GetWndSelLnLast(hwnd)


    hbuf=GetCurrentBuf()


    if (LnFirst == 0) {
            szIfStart = ""
    } else {
            szIfStart = GetBufLine(hbuf, LnFirst-1)
    }


    szIfEnd = GetBufLine(hbuf, lnLast+1)


    if (szIfStart == "#if 0" && szIfEnd =="#endif") {
            DelBufLine(hbuf, lnLast+1)
            DelBufLine(hbuf, lnFirst-1)
            sel.lnFirst = sel.lnFirst - 1
            sel.lnLast = sel.lnLast - 1


    } else {
            InsBufLine(hbuf, lnFirst, "#if 0")
            InsBufLine(hbuf, lnLast+2, "#endif")


            sel.lnFirst = sel.lnFirst + 1
            sel.lnLast = sel.lnLast + 1
    }


    SetWndSel( hwnd, sel )

}

source insight 官方网站：http://www.sourceinsight.com

source insight 官方宏库：http://www.sourceinsight.com/public/macros/

source insight 官方帮助文档：http://www.sourceinsight.com/docs35/ManualTOC.htm