置換ダイアログの履歴を任意で残す

kanon 様

いつも EmEditor Professional をお使いいただき、誠にありがとうございます。

次のようなマクロを書くと、複数の置換を一度に実行できるようになります。

document.selection.Replace( “find 1”, “replace 1”, eeReplaceAll );
document.selection.Replace( “find 2”, “replace 2”, eeReplaceAll );
document.selection.Replace( “find 3”, “replace 3”, eeReplaceAll );

しかし、将来のバージョンでは、このような置換機能の改善も検討いたします。
貴重なご意見ありがとうございました。
他にもご質問がございましたら、ご遠慮なくご連絡ください。
今後もどうぞよろしくお願い申し上げます。

kanon 様

いつも EmEditor Professional をお使いいただき、誠にありがとうございます。

ご希望のような機能も将来のバージョンで検討します。
貴重なご意見ありがとうございました。
他にもご質問がございましたら、ご遠慮なくご連絡ください。
今後もどうぞよろしくお願い申し上げます。

こんにちは。

私がプラグインの作者なので、よく使用しているのですが
正規表現オプションはあまり使ってないです。

どういう用途で正規表現を使うのでしょうか…
使用例を教えて欲しいです。

正規表現にはTRegExpというライブラリを使っていましたが、その部品の作者が行方不明になってしまっているようです。
調べたところ、日本語ヘルプによると次のように書かれていました。

http://delwiki.info/?%E3%82%B3%E3%83%B3%E3%83%9D%E3%83%BC%E3%83%8D%E3%83%B3%E3%83%88%2FTRegExpr%2F%E6%97%A5%E6%9C%AC%E8%AA%9E%E3%83%98%E3%83%AB%E3%83%97%2FSyntax%20of%20Regular%20Expressions

＞デフォルトでは “^” は入力文字列 / テキスト中の先頭に、”$” は終端にマッチすることのみ保証されます。間にあるラインセパレータ (改行) は “^”, “$” にマッチしません。
＞しかし入力した文字列を複数行のバッファとして扱いたい場合、つまり “^” をあらゆる改行の直後にマッチさせ、 “$” を改行の直前にマッチさせたいことがあります。モディファイヤ /m をオンにするとそのように動作します。

ということのようで
プラグイン側でモディファイヤ/mというのをONにする必要があるようです
可能なら、近いうちにプラグインを改造してみます。

改造前の対策として、
正規表現行頭置き換え[TAB]^⇒//[TAB]rn⇒rn//[TAB]/r

このように設定していただくのはいかがでしょうか？
動作としては、お望みのものになります。

もしくは、行頭挿入でしたら
http://delfusa.main.jp/delfusafloor2/download/download_f.html
の、InsertQuoteプラグインを使っていただくほうが使い勝手がよいと思います。

また、改造する場合
他の部品に乗せ変えたり
EmEditor標準の正規表現文字列置き換え機能を利用した機能になるかもしれません。

よろしくです。

暫定的においてみました。
http://delfusa.main.jp/temp/ReplaceText.zip

たぶん、これで大丈夫だと思うのですが、どうでしょうか。
試してみてください。

行頭文字指定は動きました。

単語単位指定や、大文字小文字対応も動くと思うんですが…

以下、
開発者にしか分からないですが、ソースはこんな感じ。
コンパイラをD2007からDelphiXEに変更したのですが、ちゃんと動いているみたい。

メイン抜粋
　　　EmReplaceFlag :=
　　　　FLAG_FIND_REG_EXP or

　　　　FLAG_REPLACE_SEL_ONLY or
　　　　FLAG_REPLACE_ALL or
　　　　FLAG_FIND_NO_PROMPT or
　　　　FLAG_FIND_CLOSE;

　　　if ReplaceFlagWord then {←単語単位指定}
　　　begin
　　　　EmReplaceFlag := EmReplaceFlag or FLAG_FIND_ONLY_WORD;
　　　end;
　　　if ReplaceFlagCaseCompare = ccCaseSensitive then {←大小文字区別指定}
　　　begin
　　　　EmReplaceFlag := EmReplaceFlag or FLAG_FIND_CASE;
　　　end;

　　　for i := 0 to Length(OldPatterns)-1 do
　　　begin
　　　　Editor_ReplaceW_Delphi(hwnd,
　　　　　OldPatterns, NewPatterns, EmReplaceFlag);
　　　end;
　　　Editor_ExecCommand(hwnd, EEID_ERASE_FIND_HILITE);

関数部分
procedure Editor_ReplaceW_Delphi(hwnd: HWND;
const OldPattern, NewPattern: WideString;
nFlags: Longword = FLAG_REPLACE_ALL+FLAG_REPLACE_SEL_ONLY);
var
　WideStr: WideString;
begin
　WideStr := OldPattern + #0 + NewPattern + #0;

　Editor_ReplaceW(hwnd, nFlags,
　　　　　　　　　PWideChar(WideStr));
　{↓検索強調文字の解除}
// Editor_ExecCommand(hwnd,EEID_ERASE_FIND_HILITE);
end;

動いてよかったです。

諸事情で
DLLのサイズが800KBとプラグインにしては大きくなりすぎてしまったので、もう少しサイズ減らしてから自分のページで正式リリースしてみます。

私はDelphiって言語を使っています。
EmEditor本体や他のプラグインはC++言語で作られることが多いですね。
C++だと、if(){} else {} こんな感じでしょうね。

一度、プラグインの動作する開発環境を作ってしまえば
私にはマクロより作りやすいので機能拡張は全部プラグインでやっています。

使っていただいて何よりです。

もう少ししたらDelphiXE2という64bit版がリリースされるらしいので、64bit対応のプラグインも用意していけそうですが、開発環境のバージョンアップ費用がちょっと気が重いところです。

誰かのウチでコンパイルだけさせてもらったりとか、そういうのじゃいけないもんなのですかね。