Source Insight 多行注释宏:
将下面的代码保存为codecomments.em并添加到Base工程里(全局设置),然后在"Options"->"Menu Assignments"窗口点击右下角倒数第二个按钮"Keys..",在Command输入框输入CodeComments,然后给这个宏添加热键,点击"Assign New Key...",输入"Ctrl + Shift + /",点击OK即可。快捷键可以根据自己的习惯修改,由于"Ctrl + /"已被占用,可以修改或者覆盖。
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)))