| |
なむnomoto さん今日は、Iranoan です。
> 新ファイルの「名前をつけて保存」ですが、
> 新規のファイルネームをつけて保存できます。
> この場合、本文の部分を、範囲選択しておいて、このファイル保存をしようとす
> る場合には、
> ちゃんと新規ファイルネーム欄にこの範囲選択文字が自動的に記入されると良い
についてですが、「名前をつけて保存」の代わりにマクロを使えば良いと思い
ます。
//------------------------ saveas.mac------------------------------------
$name = basename2;
if( basename == "" ){
if( selecting )$$return = gettext( seltopx, seltopy, selendx, selendy );
else $$return = gettext( 0, 0, width + 1, 0 );
##return = strstr( $$return, "\n" );
if( ##return != -1 )$$return = leftstr( $$return, ##return - 1);
call ChangeCharacter $$return, "\\", "￥";
call ChangeCharacter $$return, "/", "／";
call ChangeCharacter $$return, "<", "＜";
call ChangeCharacter $$return, ">", "＞";
call ChangeCharacter $$return, "?", "？";
call ChangeCharacter $$return, "*", "＊";
call ChangeCharacter $$return, ":", "：";
$$return = $$return + ".txt";
changename $$return;
}
SAVEAS;
if( !result )changename $name;
endmacro;
ChangeCharacter://buffer 中の文字列を置換
##change_char=strlen($$2);
$$string = "";
while(1){
##number = strstr($$1, $$2);
if(##number == -1)break;
else{
##long = strlen($$1);
$$string = $$string + leftstr($$1, ##number) + $$3;
$$1 = rightstr($$1, ##long - ##number - ##change_char);
}
}
return $$string + $$1;
|
|