SourceInsight教程：添加批量注释快捷键

SourceInsight教程：添加批量注释快捷键

在SourceInsight中有一个Base工程，这个工程在安装SourceInsight的时候就会自动生成，因此需要打开这个工程，如下：

找到utils.em文件，打开，如下：

在utils.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)
}

点击保存，然后在按如下设置，添加上面的代码后，在下面的选项中会在出现一个Macro：MultiLineComment选项,如下：

然后如下操作：

因为一般软件都是将批量注释设置为Ctrl + /,因此我们这设置成这个快捷键。

完成。