Source insight设置
增加多行注释功能及其快捷键
- 将一下代码保存为word.em文件
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)
}
-
将该文件放到project的目录之下的某个地方
-
点击菜单栏project-add and remove project file,在file name之列双击选择准备好的word.em文件,点击右侧的add按钮。由此,该文件加入了这个项目之中,后续可以在文件搜索栏中搜索到该word.em文件。
-
点击菜单栏poptions-key assignments,在command栏目中搜索MultiLineComment,随后选中,设置喜欢的快捷键即可。目前我使用的是option+/键的组合。