为SourceInsight(SI)添加批量多行注释宏并设置快捷键

第一步，打开base工程的Utils.em文件，在末尾添加以下代码。

macro CodeComments(){//多行注释
	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 )
}

第二步，在菜单Options的Key Assignment中，找到Macro:CodeComments，并为其分配快捷键，我用的是Alt+V键。

之后，就可以选中多行代码，按Alt+V，就会在前面添加注释了。（在每行前面加“//”）