◀マクロトップへ
  • 32 非正規表現に変換

  • [32] 非正規表現に変換 蒔田　信幸 2003年08月16日 04:08

    // 実行には PPA.DLL が必須です。sakura.exe と同じフォルダに
    // PPA.DLL を入れておいてください。
    // また、マクロファイルの拡張子は .PPA でなくてはなりません。
    // UNREGEXP.PPA
    // 選択した文字列を非正規表現に変換してクリップボードへコピー
    var
    st: String;
    begin
    // カーソル位置の文字列を取得する。
    st := S_GetSelectedString(0);
    // すべて置換：正規表現＆選択範囲
    S_ReplaceAll('[\^\.\$\|\[\]\(\)\{\}\*\+\?\\]', '\\$&', 132);
    // 文末の']'で(音)パボン？
    S_Cut(0); // 選択文字列とクリップボードの入替え
    S_InsText( st )；
    S_Right(0); // or Left
    S_Left(0);
    S_Right(0);
    S_SearchClearMark(0); // 検索マークの切替え
    end.
    // このマクロ何に使うのかと、関心の有る方は[一般]<3183>,<3184>をご覧下さい。