Source insight 自定义快捷键 注释快捷键

添加一些配置文件宏，比如：注释掉代码：单行注释、多行注释，将选中内容注释掉；在一行代码的前、后添加注释性文字等。

打开Projcet->Open project，选择base，可以看到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)
 }

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

这是一份添加“#ifdef 0”和“#endif”的宏代码，定义快捷键为Ctrl+#：

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

这份宏的代码可以把光标所在的行注释掉，定义快捷键为Ctrl+*：

 macro CommentSingleLine()
 {
     hbuf = GetCurrentBuf()
     ln = GetBufLnCur(hbuf)
     str = GetBufLine (hbuf, ln)
     str = cat("/*",str)
     str = cat(str,"*/")
     PutBufLine (hbuf, ln, str)
 }

将一行中鼠标选中部分注释掉，定义快捷键为Ctrl+shift+*：

 macro CommentSelStr()
 {
     hbuf = GetCurrentBuf()
     ln = GetBufLnCur(hbuf)
     str = GetBufSelText(hbuf)
     str = cat("/*",str)
     str = cat(str,"*/")
     SetBufSelText (hbuf, str)
 }

在一行代码前添加注释性文字， 定义快捷键为Alt+/:

在一行代码前添加注释性文字，定义快捷键为Alt+\: