source insight中的多行注释

来源：互联网发布：娃娃音的网络女歌手编辑：程序博客网时间：2024/05/20 06:07

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

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

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
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”的宏代码：

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
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 )
}

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

1
2
3
4
5
6
7
8
9
macro CommentSingleLine()
{ 
    hbuf = GetCurrentBuf()
    ln = GetBufLnCur(hbuf)
    str = GetBufLine (hbuf, ln)
    str = cat("/*",str)
    str = cat(str,"*/")
    PutBufLine (hbuf, ln, str)
}

将一行中鼠标选中部分注释掉：

1
2
3
4
5
6
7
8
9
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