| |
半角カナの警告を出さないようにするのは、レジストリを書き換えて
EnvChangedDanger呼び出しする必要があります。それを実行したらまた元に戻す
作業も必要なので、ちょっと手間がかかります。
マクロのサンプルを１つ掲載します。
loaddll "tkinfo.dll";
#n = dllfunc("NewMail");
#n = dllfunc("SetHeader", "Subject", "テスト");
#n = dllfunc("SetHeader", "To", dllfuncstr("CurrentHeader","From"));
gofiletop;
beginsel;
gofileend;
insert "ハンカクモジデス\n"; //ここは実際には半角カナです。
//半角カナの警告を出さなくする
openreg "CURRENTUSER", "Software\\Hidemaruo\\TuruKame\\Config";
#confirmPrev = getregnum("Confirm");
if( (#confirmPrev & 2) != 0 ) {
writeregnum "Confirm", #confirmPrev ^ 2;
closereg;
#n = dllfunc("ExecAtMain", "EnvChangedDanger");
} else {
closereg;
}
#success = dllfunc("SendLater");
//半角カナの警告を元に戻す
if( (#confirmPrev & 2) != 0 ) {
openreg "CURRENTUSER", "Software\\Hidemaruo\\TuruKame\\Config";
writeregnum "Confirm", #confirmPrev;
closereg;
#n = dllfunc("ExecAtMain", "EnvChangedDanger");
}
if( #success != 0 ) {
exit;
}
このマクロにある「半角カナの警告を出さなくする」と「半角カナの警告を元
に戻す」を、メール送信の処理（SendLaterまたはSendNow呼び出し）の直前/直
後に入れたらいいかと思います。
|
|