Source Insight几个有用的宏

 //代码检视信息
macro ReviewFunction()
{
    var filename //review文件的名称
   filename = "Review.txt"
   
    var hbuf//review文件的缓冲区
    hbuf = OpenBuf (filename)
    if(hbuf==hNil )
    hbuf = NewBuf (filename)
   
    var hcurbuf
    hcurbuf = GetCurrentBuf ()
    var strcurname
    strcurname = GetBufName (hcurbuf)//当前监视文件的名称
    var dwline
    dwline = GetBufLnCur (hcurbuf)
    dwline = cat("第",dwline)
    dwline = cat(dwline,"行")
    var strReview
    strReview = Ask("输入监视意见")
    AppendBufLine (hbuf, strcurname)
    AppendBufLine (hbuf, dwline)
    AppendBufLine (hbuf, strReview)
    SaveBuf (hbuf)
    //AddFileToProj(GetCurrentProj (), filename)
    // "localx" is displayed with "Ref to Local" style
   
}

//添加函数描述信息

macro AddFunctionCom