本文のある文字列を切り取ってsubjectに貼No.12190
kendo さん 03/04/01 12:29
 

こうしたマクロは可能でしょうか。お教えください。


メールの本文を『秀丸』で書いていて、
本文の先頭行に特殊な記号(あまり文字列として考えられないようなもの)
で括って題目(subject)に相当する文(=文字列)を書いておきます。
 
 こうして書いた本文を『鶴亀』の本文部分に貼り付けて、
(もちろん最初から、『鶴亀』の本文部分で題目部分を含んで
書いておくこともあります。)そのマクロを実行すると、
その特殊記号で括られた部分が切り取られて、Subject: の内容部分に
貼り付けられるというものです。
(もともとのものは特殊記号とともになくなる。)


 それが可能として、たとえば、欧文コードで本文を書いていて、
特殊アクセント付きの文字がSubject: の右にも貼りつくでしょうか。
 
 フランス語の例で示してみます。

$$Molière##                            題目にしたい部分
Molière est un écrivain ......         本文

このMolièreを 貼り付けたいのですが?

[ ]
RE:12190 本文のある文字列を切り取ってsuNo.12191
kendo さん 03/04/01 12:34
 
Kendoです。
>
>$$Molière##                            題目にしたい部分
>Molière est un écrivain ......         本文
>
>このMolièreを 貼り付けたいのですが?

投稿がさっそく文字化けしてしまいました。

è のところは原稿を書く窓では、eの上に左上がりのアクセント
がついた記号だったのですが.....
(うまく表示できなくてすみません。)

éの方は右上がりのものでした。

(それぞれ文字コードを欧文にしていると、秀丸でも鶴亀でもちゃんと表記
できる文字です。ですから、それらを切り取って貼り付けたいのです。)

[ ]
RE:12190 本文のある文字列を切り取ってsuNo.12192
山紫水明 さん 03/04/01 13:53
 
 kendoさん,こんにちは。

》その特殊記号で括られた部分が切り取られて、Subject: の内容部分に
》貼り付けられるというものです。

 次のマクロでいかがでしょう。
 記号で囲んでも,範囲選択してもどちらでもいいです。

//-----------------------------------------------//
//目的の語を2つの記号で囲むか,範囲選択して実行
//最初の2行で記号を指定
$top = "$$";    //前記号
$tail = "##";   //後記号
if( !selecting ) {
    gofiletop;
    searchdown2 $top;
    right strlen($top);
    beginsel;
    searchdown $tail;
}
copy;
searchup "Subject";
right;
paste;
endmacro;
//-----------------------------------------------//

     では, (^^)/~
                                        山紫水明

[ ]
RE:12192 本文のある文字列を切り取ってsuNo.12193
kendo さん 03/04/01 15:56
 
山紫水明様、kendoです。
いつものことですが、たいへんお世話になります。
以前、鶴亀の本文とsubject部分を
一緒にまとめて置換したいという投稿をして、
山紫水明様やひろ様からアドバイスいただいた件を
自分なりに発想を変えて処理してみたいという
「おねだり」です。

> kendoさん,こんにちは。
>
>》その特殊記号で括られた部分が切り取られて、Subject: の内容部分に
>》貼り付けられるというものです。
> 次のマクロでいかがでしょう。
> 記号で囲んでも,範囲選択してもどちらでもいいです。
ありがとうございます。
さっそくテストしてみました。
フランス語の特殊記号でもばっちりです。

ただし次のことが私の環境ではちょっとうまく行きません。
お時間のありますとき、また教えてください。
(いまでもこれ、とても便利です。)

 まず私の例ですと、$$と##で、subjectになる文字列を挟んでいるわけですが、
$$の直後の半角文字一個分がペーストされずに消えてしまいました。

また範囲選択の場合、選択した部分が本文に残ってしまいます。(これは消したいで
す。

よろしくお願いいたします。

[ ]
RE:12193 本文のある文字列を切り取ってsuNo.12194
kendo さん 03/04/01 16:05
 
山紫水明様、kendです。
自己レスです。何度もすみません。

>
>ただし次のことが私の環境ではちょっとうまく行きません。
>お時間のありますとき、また教えてください。
>(いまでもこれ、とても便利です。)
>
> まず私の例ですと、$$と##で、subjectになる文字列を挟んでいるわけですが、
>$$の直後の半角文字一個分がペーストされずに消えてしまいました。
>
>また範囲選択の場合、選択した部分が本文に残ってしまいます。(これは消したいで
>す。
$$と##で挟む場合も、$$と##を含めてその文字列全体を削除したいのですが......

[ ]
RE:12194 本文のある文字列を切り取ってsuNo.12195
山紫水明 さん 03/04/01 16:52
 
 kendoさん,こんにちは。

》 まず私の例ですと、$$と##で、subjectになる文字列を挟んでいるわけですが、
》$$の直後の半角文字一個分がペーストされずに消えてしまいました。

 どうもうっかりしていました。

》また範囲選択の場合、選択した部分が本文に残ってしまいます。(これは消した
》いです。

 残したい時もあるのでは?

》$$と##で挟む場合も、$$と##を含めてその文字列全体を削除したいのですが......

 ですよねー,なぜ残すのかなーと思っていました。

//-----------------------------------------------//
//本文中の語を題名に写す。
//目的の語を2つの記号で囲むか,範囲選択して実行

$top = "$$";    //前記号
$tail = "##";   //後記号
if( !selecting ) {
    gofiletop;
    searchdown2 $top;
    right strlen($top) - 1;
    beginsel;
    searchdown $tail;
    cut;
    left strlen($top);
    beginsel;
    right strlen($top) + strlen($tail);
    delete;
} else {
    question "元の部分消しますか?";
    if( result == yes ) cut;
    else copy;
}
gofiletop;
searchup "^Subject:  ", regular;
right;
paste;
endmacro;
//-----------------------------------------------//

     では, (^^)/~
                                        山紫水明

[ ]
RE:12195 本文のある文字列を切り取ってsuNo.12196
kendo さん 03/04/01 17:09
 
山紫水明様、kendoです。
さっそく、ありがとうございます。
ばっちりでした。


>》また範囲選択の場合、選択した部分が本文に残ってしまいます。(これは消した
>》いです。
>
> 残したい時もあるのでは?
実行してみると、残すかどうか 聞いてきますね? ステキです。心憎いです。

>》$$と##で挟む場合も、$$と##を含めてその文字列全体を削除したいのですが......
> ですよねー,なぜ残すのかなーと思っていました。
ご指摘のとおりです。

またちょっと「おねだり」ついでですが、Subjectに貼り付ける文字列を貼り付けて
消したとき(=残さないとき)、その文字列のあった行を削除して、
本文を1行分、上に上げることは可能でしょうか。

---------------------
このマクロ、とても気に入っています。
でも他の方はあまり必要、おぼえないでしょうか。

たとえば、タイトルでも何か置換したいことがあるとき、
本文にタイトルを書いておき、一括置換をしてからタイトルをsubject部分に貼り付
ければいいのですから、便利です。
たとえば、

12の会、23の開催

とかで、12は「全国鶴亀・秀丸愛好」 23「年次全国大会」
とかで、本文でも12とか23を使って書いた文章と一緒に処理できるわけです。

[ ]
RE:12195 本文のある文字列を切り取ってsuNo.12197
kendo さん 03/04/01 18:37
 
山紫水明様、kendoです。

>》また範囲選択の場合、選択した部分が本文に残ってしまいます。(これは消した
>》いです。
> 残したい時もあるのでは?
 この残すという仕様、使ってみると とてもとてもいいです。
 つまり、あまりタイトルを考えずにメールの本文をどんどん書いていって、
なにかのキーフレーズとかを範囲選択して、「ひょいっ」と貼り付けると
大切な表現がそのままタイトルになるからです。

本当にありがとうございます。

[ ]
RE:12197 本文のある文字列を切り取ってsuNo.12200
山紫水明 さん 03/04/01 20:31
 
 kendoさん,こんばんは。

》Subjectに貼り付ける文字列を貼り付けて消したとき(=残さないとき)、その
》文字列のあった行を削除して、本文を1行分、上に上げることは可能でしょう
》か。

 少し,選択肢が多くなりますね。

》 つまり、あまりタイトルを考えずにメールの本文をどんどん書いていって、
》なにかのキーフレーズとかを範囲選択して、「ひょいっ」と貼り付けると
》大切な表現がそのままタイトルになるからです。

 そういう使い方を想定していました。

》でも他の方はあまり必要、おぼえないでしょうか。

 もしかしたら,ひそかにお使いの方がいらっしゃるかも(^^;

//-----------------------------------------------//
//本文中の語を題名に写す。
//目的の語を2つの記号で囲むか,範囲選択して実行

$top = "$$";    //前記号
$tail = "##";   //後記号
if( !selecting ) {
    disableinvert;
    gofiletop;
    searchdown2 $top;
    right strlen($top) - 1;
    beginsel;
    searchdown $tail;
    menu "&1 記号と文字を削除", "&2 行を削除";
    #r = result;
    cut;
    if( #r == 2 ) deleteline;
    else {
        left strlen($top);
        beginsel;
        right strlen($top) + strlen($tail);
        delete;
    }
} else {
    menu "&1 削除しない", "&2 選択範囲のみ削除", "&3 行を削除";
    if( result <= 1 ) copy;
    else if( result == 2 ) cut;
    else {
        cut;
        deleteline;
    }
}
gofiletop;
searchup "^Subject:  ", regular;
right;
paste;
endmacro;
//-----------------------------------------------//

     では, (^^)/~
                                        山紫水明

[ ]
RE:12200 本文のある文字列を切り取ってsuNo.12201
CreamPuff さん 03/04/01 20:54
 
山紫水明さん
kendoさん、こんばんわっ!

》もしかしたら,ひそかにお使いの方がいらっしゃるかも(^^;
はい。早速使わせていただいています。(●^o^●)
とっても便利で、重宝しています。
こんなすばらしいマクロを、どうもありがとうございました。

なんだか、ひそかに使っているのが申し訳なくて、
ひとこと、お礼まで。M(__)M

CreamPuffでした。

[ ]
RE:12201 本文のある文字列を切り取ってsuNo.12202
kendo さん 03/04/01 21:02
 
CreamPuff様、ご投稿ありがとうございます。
kendoです。いいですよね、このマクロ。

>山紫水明さん
>kendoさん、こんばんわっ!
私はオマケですので......

>とっても便利で、重宝しています。
>こんなすばらしいマクロを、どうもありがとうございました。
>なんだか、ひそかに使っているのが申し訳なくて、
>ひとこと、お礼まで。M(__)M
まったく同感です。
「おねだり」して良かった! d(^-^) 

[ ]