[PSPad] 複製游標列的內容的Script

[PSPad]
PSPad的Scripting功能初探

文說明了PSPad的Scripting環境,而本篇腳本的功用是按Ctrl+D複製目前游標列的內容到下一列,這個功能是比照IntelliJ-
IDEA的編輯鍵,有了這個按鍵,複製列的步驟:【標示→Ctrl+C→Enter鍵→Ctrl+V】就簡化成一個按鍵,對於寫程式非常方便。

另外,若標示數列的話,會複製標示列內的容。

dupLine.vbs
‘***********************************************************

‘$Id$

‘Duplicate current line; like IntelliJ-IDEA’s Ctrl+D

‘emisjerry@gmail.com; http://blog.xuite.net/emisjerry/tech

‘***********************************************************

const module_name  =
"dupLine"        
‘this name must be unique !!!

const module_ver   =
"0.001a"           
‘version

sub Init

  addMenuItem "Duplicate current line", "", "dupLine", "CTRL+D"

end sub

sub dupLine

  dim oEditor, iCaretX, iCaretY

 

  set oEditor =
newEditor()          
‘new editor object

  oEditor.assignActiveEditor

  iCaretX = oEditor.caretX

  if oEditor.selText = "" then  ‘No selection area

    sLine = oEditor.lineText

    ‘Since the indent will add more leading
spaces, so we trim it first.

    sLine = Trim(sLine) + vbNewLine + sLine

    oEditor.lineText(sLine)

    oEditor.caretX(iCaretX)  ‘move
cursor to the same horizontal position

  else

    iCaretY = oEditor.caretY – 1

    sLine = oEditor.selText

    if InStr(sLine, Chr(13)) > 0 then

      sLine = Left(sLine,
Len(sLine)-2) + vbNewLine + sLine

    else

      sLine = sLine + sLine

    end if

   

    ‘echo("$" & sLine & "$,"
& iCaretY)

    oEditor.selText(sLine)

    oEditor.caretX(iCaretX)  ‘move
cursor to the same horizontal position   

   
‘oEditor.caretY(iCatetY)   

  end if

end sub


##


您可能也會有興趣的類似文章

填寫回應

 

 

 

您可使用這些HTML標籤

<a href="" title=""> <abbr title=""> <acronym title=""> <b> <blockquote cite=""> <cite> <code> <del datetime=""> <em> <i> <q cite=""> <strike> <strong> <pre lang="" line="" escaped="" highlight="">

隨機文章

  1. [轉貼] 甲骨文欲收購開原碼MySQL 
  2. [Xuite] 加上Flash的時鐘顯示(範例在右方) (8)
  3. [轉貼] 不玩了 明基退出德國手機子公司經營 (1)
  4. 13個Web 2.0的網路服務 
  5. 在瀏覽器網頁裡如何複製連結中的文字? (7)
  6. [附中憶往] 南樓傳奇 (5)
  7. 一眼瞬間!用Switcher切換工作視窗 (2)
  8. [Xuite] 樣式全都跑掉了… :-( 
  9. WordPress 3.0與PHP 5的時區問題 (1)
  10. [2011/05/07 長灘島之旅第四天] 東岸沙灘與海鮮大餐 

歷史熱門文章

  1. 如何手動輸入Plurk的表情圖示? (352,030 點擊/2008-09-29)
  2. 簡單放大Plurk輸入區的方法[修訂] (86,779 點擊/2008-09-29)
  3. Plurk CSS樣式自訂修改全攻略 (82,770 點擊/2009-07-04)
  4. 啟用&關閉中華電信ZyXEL P874的無線網路連線功能的步驟[修訂] (82,395 點擊/2011-06-01)
  5. 網路升級光世代50M/3M與設定ZyXEL P874 (52,413 點擊/2011-05-28)
  6. 輕鬆學會彈指神功-揭露AutoHotkey絕技 (42,814 點擊/2008-04-10)
  7. iPad新手入門技巧 (39,993 點擊/2011-02-05)
  8. 分享世博台灣館主題曲『台灣的心跳聲』MV(附歌詞+下載連結+新歌詞) (38,040 點擊/2010-04-27)
  9. 把HTC Touch HD操作介面換成Spb Mobile Shell,美觀又便利! (37,863 點擊/2009-02-18)
  10. 另一套適用手機的影片轉檔工具:WinAVI 3GP/MP4/PSP/iPod Video Converter (35,796 點擊/2009-04-18)