source insight中注释_取注快捷键设置方法

最新推荐文章于 2024-08-12 13:50:14 发布

Ken.Wayne

最新推荐文章于 2024-08-12 13:50:14 发布

阅读量1.4k

点赞数

文章标签： source insigh 注释快捷键

本文链接：https://blog.csdn.net/qq_31701279/article/details/78511614

版权

source insight中注释_取注快捷键设置方法：（使用//注释）
1、打开Source Insight4.0，点击Project->Open Project->打开base项目->打开Base下的utils.em文件；相对路径如下：
./Source Insight 4.0/Projects/Base/utils.em

2、在文件utils.em末尾添加下面代码,然后在source insight中点击Options->Key Assignments（键值分配）为Macro:MultiLineComment分配快捷键，比如Alt+/；或者点击Options->Menu Assignments（菜单分配）为Macro:MultiLineComment分配菜单按钮

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