Translate

2015/10/22

Delphi IDE Search 功能的 Regular Expressions


最近在修改元件的過程中,遇到許多要增加屬性的操作。

比方說操作 Excel 元件時,我們可以這樣寫:
  ExcelWorksheet1.Cells.Item[Y, 3];
  ExcelWorksheet1.Cells.Item[Y, 6];
  ExcelWorksheet1.Cells.Item[Y, 8];

這些上百行有點像又不會太像的程式,我想修改成以下的內容
  ExcelWorksheet1.Cells.Item[Y, 3].Value;
  ExcelWorksheet1.Cells.Item[Y, 6].Value;
  ExcelWorksheet1.Cells.Item[Y, 8].Value;

實除修改時,除了增加滑鼠和鍵盤磨耗率外,對技術力的增加簡單是趨近於零。

這時,有個巧妙的工具可以應用 ── Replace Text (Hot Key = Ctrl + H)。

Replace Text 畫面
我猜猜你會怎麼做:

【選擇大範圍的模糊搜尋,找到目標後,再人工修改。】

實在很苦命。

這時正則表達式(Regular expressions)就很有用了。

Regular expressions 的位置

以上述的例子來說,我可以在 Text to find 輸入
{\.Item\[.+\]}

在 Replace with 輸入
\0.Value

如此一來就變成這樣:

找到了,要修改囉
修改成功!

要注意的是,官方說明的【()】符號並沒有功用,實際應用請直接使用【{ }】符號。

參考資料:


沒有留言:

張貼留言

DataSnap REST API Authorization with PHP

About Authentication with DataSet REST JavaScript client. In connection.js: function setCredentials(user, password) { connectionInf...