2023年7月9日发(作者：)

sourceinsight整段代码注释我们经常要对⼀整段代码进⾏注释，很多代码编辑器都提供了这样的功能：⽤快捷键“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)}将上⾯的代码另存为⽂件，打开source insight，将该⽂件添加到⼯程中，然后在Options->Key Assignments中你就可以看到这个宏了，宏的名字是MultiLineComments，然后我们为它分配快捷键“Ctrl + /”，然后就可以了。这⾥还有⼀份添加“#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) t = t – 1 = – 1 } else { InsBufLine(hbuf, lnFirst, "#if 0" ) InsBufLine(hbuf, lnLast+2, "#endif" ) t = t + 1 = + 1 } SetWndSel( hwnd, sel )}这份宏的代码可以把光标显⽰的⾏注释掉：macro CommentSingleLine(){ hbuf = GetCurrentBuf() ln = GetBufLnCur(hbuf) str = GetBufLine (hbuf, ln) str = cat( "" ) PutBufLine (hbuf, ln, str)}将⼀⾏中⿏标选中部分注释掉：macro CommentSelStr(){ hbuf = GetCurrentBuf() ln = GetBufLnCur(hbuf) str = GetBufSelText(hbuf) str = cat( "" ) SetBufSelText (hbuf, str)}