|
三月さん今日は、ひろです。
> 「メールの内部情報」で変えれると簡単でうれしいですが。
これ自体は簡単になるので賛成です。
現状でどうするかですが、送信メールについては、送信前なら「優先度=高」
はキーの割り当てが出来るので、問題ないですよね。送信済みメールについ
ては、理由は省略しますが無理です。しかし殆ど書き換えたいのは、受信メー
ルだと思いますが、これに限れば、末尾のマクロで可能です。欠点は更新フ
ラグが付くことです。私はこれを、秀まるおさんの書き込みで開発者にしか
解らないけれど、ヘルプにもかかれてない仕様の詳細についてのお話に、「
重要度=高」にしたり、「ゴミ箱直行」メールだけれど、「重要度=高」になっ
ているメールのフラグ削除に使っています。
##スパムメールで「重要度=高」になっていると、「古くなったメールは自
動的に削除」も働かないし、非常に邪魔です。
//メールの「優先度:高」を toggle switch
loaddll "tkinfo.dll";
if( dllfunc("MailType") == -1)goto End;
if( (!readonly) & updated )goto End;
execmacro macrodir + "\\tkmail\\ChkWinNum.mac";
if( dllfunc("IsTuruKameMain") ){
if( !dllfunc("OpenMail") )goto DllError;
#openMail = 1;
}
else{
#openMail = 0;
#x = x;
#y = y;
}
if( readonly ){
if( !dllfunc("EnableEdit") )goto DllError;
}
$priority = dllfuncstr("ToLower",dllfuncstr("CurrentHeader","Priority"));
$Xpriority = dllfuncstr("ToLower",dllfuncstr("CurrentHeader","X-Priority"));
#head = dllfunc("HeaderView");
if( val($Xpriority) || $priority == "hight" || $Xpriority == "hight"){
#tmp = dllfunc("SwitchHeaderView",2);
gofiletop;
replaceup "^Priority:.+\\n","",regular;
replaceup "^X-Priority:.+\\n","",regular;
}
else $tmp = dllfuncstr("SetHeader","X-Priority","1");
#tmp = dllfunc("SwitchHeaderView",#head);
save;
if( #openMail ){
##edit = hidemaruhandle(0);
#main = findwindowclass("TuruKameFrame");
setactivehidemaru #main;
closehidemaru ##edit;
}
else moveto #x,#y;
goto End;
DllError:
message "DLL 関数失敗";
End:
freedll;
endmacro;
|
|