source insight中的多行注释

我们经常要对一整段代码进行注释，很多代码编辑器都提供了这样的功能：用快捷键“Ctrl + /”来实现“//”的多行注释。

但是在用source insight的时候，发现竟然没有这样的功能。于是在网上搜了一下，source insight里面的多行注释可以用宏来实现。

以下是实现多行注释的宏代码（在别的网站copy过来的，经过测试，还是很好用的）：

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

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

(my config: comment(ctrl+shift+c) uncomment(ctrl+shift+u))

这里还有一份添加“#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 )
}

这份宏的代码可以把光标显示的行注释掉：

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

最后是source insight与宏有关的资源：

• source insight官方的宏库
• source insight官方帮助文档

====

http://www.2eggs.org/?p=147

 

--------

宏的导入和使用。source insight可以导入.em文件，即实现自定义的宏功能。找了很多帖子，下了很多.em文件，但是最后都没成功。操作方法：打开一个SI工程，添加.em文件，options，Key Assignment，输入macro，但是找不到.em文件里的宏函数。

别人一般都这么写：   
 SI中的宏语言
我始终认为这是SI中最有趣的部分，这是一种功能强大的编程语言，几乎可以实现在编程过程可能使用到的各种功能。
这里不准备对如何使用宏语言进行编程作介绍(可参阅SI帮助文档)，只介绍如何使用已编好程序。为方便使用，我已把这些程序都集中放在utils.em文件中，下文就此文件进行论述。
该宏文件实现了一些在编码过程中可能会用到的功能, 如添加文件头、函数说明(使用时能自动添加文件名、函数名和当前日期)和宏定义，代码补全等。
使用说明：
Project/Open Project...
打开Base工程(该工程一般在"我的文档/Source Insight/Projects/Base"中)；
    
    
Project/Add and Remove Project Files...
加入宏文件(即utils.em)；
    
    
Options/Menu Assignments
打开Menu Assignments窗口，在Command中输入Macro，选中要使用的宏，添加到合适的菜单中.

---------
但是此时，在Menu Assignments窗口中，我找不到宏名字。

有些电脑可以，有些不行，有时开始还有一些宏名字，再倒入新的宏后就都没有了！！

====

http://topic.csdn.net/u/20120501/22/65f65114-7bc3-4a22-819e-9504c8a41a8b.html