Source Insight怎样修改注释字体
Posted
tags:
篇首语:本文由小常识网(cha138.com)小编为大家整理,主要介绍了Source Insight怎样修改注释字体相关的知识,希望对你有一定的参考价值。
参考技术A 光标移到注释上,然后鼠标右键单击此注释,选择StyleProperties。
里面就是设置注释显示风格的,Italic那项的ON和OFF就是设置斜体的,设置为OFF就没有斜体了。
其他项也可以根据需要修改。
注意,单行注释和多行注释可能是需要分开设置的,所以需要分别修改。
Source Insight实现Ctrl+/,自动注释或者去掉注释
macro MultiLineComment()
{
hwnd = GetCurrentWnd()
selection = GetWndSel(hwnd)
LnFirst = GetWndSelLnFirst(hwnd) //取首行行号
LnLast = GetWndSelLnLast(hwnd) //取末行行号
hbuf = GetCurrentBuf()
// 判断是否需要注释,条件:只要有一行没有注释就需要全部添加一次注释
Ln = Lnfirst
flagAddComment = false
spaceCnt = 256
while(Ln <= Lnlast) {
buf = GetBufLine(hbuf, Ln) //取Ln对应的行
//跳过空行
if(buf ==""){
Ln = Ln + 1
continue
}
// 统计前置空白数
len = strlen(buf)
q = 0
while(q < len) {
if(StrMid(buf,q,q+1) !=" ")
break
q = q + 1
}
if(q == len)
break
if(q < spaceCnt){
spaceCnt = q
spaces = StrMid(buf,0,q)
}
// 判断是否需要添加注释
if(StrMid(buf,q,q+1) !="/"){
// todo 这里可能会有问题
flagAddComment = true
}
Ln = Ln + 1
}
Comment = Cat(spaces, "// ")
Ln = Lnfirst
buf = GetBufLine(hbuf, Ln)
len =strlen(buf)
while(Ln <= Lnlast) {
buf = GetBufLine(hbuf, Ln) //取Ln对应的行
if(buf ==""){ //跳过空行
Ln = Ln + 1
continue
}
if(flagAddComment){
len = strlen(buf)
buf = StrMid(buf,spaceCnt,len)
PutBufLine(hbuf, Ln, Cat(Comment, buf))
}else{
// 统计前置空白数
len = strlen(buf)
p = 0
while(p < len) {
if(StrMid(buf,p,p+1) !=" ")
break
p = p + 1
}
if(StrMid(buf, p, p+3) =="// ") {
PutBufLine(hbuf, Ln, Cat(spaces, StrMid(buf, p+3, Strlen(buf))))
}else if(StrMid(buf, p, p+2) =="//") {
PutBufLine(hbuf, Ln, Cat(spaces, StrMid(buf, p+2, Strlen(buf))))
}
}
Ln = Ln + 1
}
SetWndSel(hwnd, selection)
}
以上是关于Source Insight怎样修改注释字体的主要内容,如果未能解决你的问题,请参考以下文章
source insight注释显示不出来,出现乱码怎么办?我用的是英文的注释。