【方便、习惯】 sourceinsight 安装完要做的一些设置

2024-02-04 19:59:34

文章目录

1.取消软件自动更新
2.修改默认编码和结束符
3.文件类型参数相关设置
4.添加快捷注释 Ctrl+/

4.1 找到默认工程Base
4.2 编辑utils.em
4.3 添加代码函数到末尾
4.4 添加快捷键

1.取消软件自动更新

2.修改默认编码和结束符

3.文件类型参数相关设置

4.添加快捷注释 Ctrl+/

4.1 找到默认工程Base

4.2 编辑utils.em

4.3 添加代码函数到末尾

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)
}