SI删除及注释快捷键实现

一、删除（实为剪切一行,类似VS的ctrl+l）:

ctrl+u

 

二、注释、消去注释的实现

    主要使用SI提供的宏函数来实现，将下面的宏函数另存为MulLinesComments.em文件 ：

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)
}

直接拷贝MulLinesComments.em文件到Base的目录：

 

project->open project,切换到base工程：

找到"MultLineComment"，点击“Assign New Key...”，在弹出方框后，按下CTRL /,即可以完成热键与宏的关联。

 

切换到其它的工程，选中代码，按一下CTRL+/给代码批量注释；再按一下就可以消去注释。

 

参考文章：

http://www.cnblogs.com/dongzhiquan/archive/2013/03/04/2943448.html