标签：style blog http io ar color 使用 sp strong
Source Insight是一款强大的代码查看工具，本身支持扩展性很好。下面我们就介绍2个扩展用例。
1、快速打开当前文件所在的目录，这个功能类似于eclipse的easyshell插件，就是能快速定位到文件所在的目录，这个在代码查看的时候是很有好处的。
按照以下步骤，首先进入【option】->【Custom Commands】
自定的命令名，个人发挥，关键是填入 explorer.exe %d，
设置快捷键CTRL+T
也可以将自定义命令加入Menu菜单中
到此设置完毕，可以通过快捷键CTRL+T，直接打开当前文件所在的目录。
2、与eclipse中快捷方便的注释反注释相比较，sI是有点古板和不方便额。但是可以通过自定义的宏块来改善这个情况。
首先，打开Projcet->Open project，选择base，可以看到utils.em文件，将下列宏添加到该文件中。
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)
- 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) != "/"){
- buf = Cat("//", buf)
- if(Ln == Lnfirst){
- buf = Cat(buf,"//removed by jhy")//注释作者信息
- }
- PutBufLine(hbuf, Ln, buf)
- }
- Ln = Ln + 1
- }
-
- SetWndSel(hwnd, selection)
- }
- 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)
- 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) != "/"){
- buf = Cat("//", buf)
- if(Ln == Lnfirst){
- buf = Cat(buf,"//removed by jhy")//注释作者信息
- }
- PutBufLine(hbuf, Ln, buf)
- }
- Ln = Ln + 1
- }
-
- SetWndSel(hwnd, selection)
- }
保存后，打开新的工程：options->key assignments(设置快捷键)
到此为止，我们在代码中使用ALT+X的快捷键看看，效果如下：
3、我们再来贴一个快速插入时间的宏，类似于UltraEdit中的F7快捷键功能
- macro MonthToName(MonthNum)
- {
-
- if (MonthNum== 1)
- return "Jan"
- if (MonthNum== 2)
- return "Feb"
- if (MonthNum== 3)
- return "Mar"
- if (MonthNum== 4)
- return "Apr"
- if (MonthNum== 5)
- return "May"
- if (MonthNum== 6)
- return "Jun"
- if (MonthNum== 7)
- return "Jul"
- if (MonthNum== 8)
- return "Aug"
- if (MonthNum== 9)
- return "Sep"
- if (MonthNum== 10)
- return "Oct"
- if (MonthNum== 11)
- return "Nov"
- if (MonthNum== 12)
- return "Dec"
- }
-
- macro DisplayDate()
- {
- szTime = GetSysTime(1)
- Day = szTime.Day
- Month = szTime.Month
- Year = szTime.Year
- if (Day < 10)
- szDay = "0@Day@"
- else
- szDay = Day
- szMonth = MonthToName(Month)
-
- hbuf = GetCurrentBuf()
- SetBufSelText(hbuf, "@szMonth@ @szDay@, @Year@")
- }
- macro MonthToName(MonthNum)
- {
-
- if (MonthNum== 1)
- return "Jan"
- if (MonthNum== 2)
- return "Feb"
- if (MonthNum== 3)
- return "Mar"
- if (MonthNum== 4)
- return "Apr"
- if (MonthNum== 5)
- return "May"
- if (MonthNum== 6)
- return "Jun"
- if (MonthNum== 7)
- return "Jul"
- if (MonthNum== 8)
- return "Aug"
- if (MonthNum== 9)
- return "Sep"
- if (MonthNum== 10)
- return "Oct"
- if (MonthNum== 11)
- return "Nov"
- if (MonthNum== 12)
- return "Dec"
- }
-
- macro DisplayDate()
- {
- szTime = GetSysTime(1)
- Day = szTime.Day
- Month = szTime.Month
- Year = szTime.Year
- if (Day < 10)
- szDay = "0@Day@"
- else
- szDay = Day
- szMonth = MonthToName(Month)
-
- hbuf = GetCurrentBuf()
- SetBufSelText(hbuf, "@szMonth@ @szDay@, @Year@"
转：
[转]Source Insight使用小技巧小结
标签：style blog http io ar color 使用 sp strong
原文地址：http://www.cnblogs.com/yangxia-test/p/4146745.html
