| |
たけのこです。
なんだか紛糾していますが、個人的には『そのまま送信できないヘッダを含むも
のは草稿にも保存できない』様な仕組みでいいと思います。
とは云え、これだけだと他の方と一緒なのでちょっと別のアプローチを。
つまり、編集するときにだけ、日本語ヘッダにしといて欲しいって事なんですよ
ね？（違うのかな？）
だとすれば、下のようなマクロでどうですかね？ メニュー形式がイヤなら、編
集開始用、草稿保存用にメニューの部分を定数セットするようにマクロを２行だ
け変更するか、そもそもif分を分解するか。
loaddll "tkinfo.dll";
// 簡易日本語ヘッダ変換
// ユーザ定義部分
// 相互変換したい分だけペアで配列を作ってください
$JAPANESE[0] = "作成日:"; $ENGLISH[0] = "X-Create-Date:";
$JAPANESE[1] = "題名:"; $ENGLISH[1] = "Subject:";
// 定数
#TO_JAPANESE = 1;
#TO_ENGLISH = 2;
// どっち？
menu "英語→日本語", "日本語→英語";
#action = result;
// 変換
#i = 0;
while($JAPANESE[#i] != ""){
if(#action == #TO_JAPANESE){
call interpret $ENGLISH[#i], $JAPANESE[#i];
}else{
call interpret $JAPANESE[#i], $ENGLISH[#i];
}
#i = #i + 1;
}
endmacro;
// ヘッダを探して、別のヘッダにしてしまう
// 第一引数：探すヘッダ
// 第二引数：置換先
interpret:
// 指定ヘッダの数を数える
##count = dllfunc("CountCurrentHeader", $$1);
##i = 0;
while(##i < ##count){
// 元のヘッダ
$$headerValue = dllfuncstr("CurrentHeader2", $$1, 0);
// 新しいヘッダ
$$s = dllfuncstr("AddHeader", $$2, $$headerValue);
// 元のヘッダを消す
#n = dllfunc("DeleteHeader", $$1);
##i = ##i + 1;
}
return;
// そうして独り言
// >>何故、「作成日」などというヘッダを付けたいんでしょうか？
// >付けたいから付けたいんです。
// ケンカ口調は相手の思考を硬化するだけですよ〜
|
|