| |
こんにちは。ユーザの IKKI です。
> \を抜くだけにします。よろしくお願い致します。
対象は秀丸エディタ v7.x 以降ってことでよろしいですか?
ちょっと手抜きですが、こんな感じでどうでしょう。
// アンエスケープしてコピー.mac
if (!selecting) endmacro;
if (rectselecting) {
message "BOX 選択範囲はアンエスケープしてコピーできません";
endmacro;
}
openreg "CURRENTUSER", "Software\\Hidemaruo\\Hidemaru\\Env";
#CopyClear = getregnum("CopyClear");
closereg;
call Unescape gettext(seltopx, seltopy, selendx, selendy, (!#CopyClear));
setclipboard $$return;
endmacro;
Unescape:
loaddll "HmJre.dll";
if (!result) {
message "HmJre.dll がロードできません";
return $$1;
}
$$r = dllfuncstr("ReplaceRegular", "\\\\(.)", $$1, 0, "\\1", true);
if ($$r == "") $$r = $$1;
freedll;
return $$r;
|
|