| |
フォルダ毎の設定での自動削除なら、例えばマークしたメールは自動削除し
ないとか、そういうことは出来ますけど。
普通の削除コマンドについては期待した動作は出来ないです。
削除コマンド相当のことをマクロで、例えばマークしたメールが含まれてる
かどうか探して、もしそれがあったら警告を出すとかって程度なら出来ますけ
ど。
loaddll "tkinfo.dll";
#count = dllfunc("SelectedMailCount");
if( #count == 0 ) {
goto Label_Delete;
}
if( #count > 1 ) {
#n = dllfunc("DisableDraw");
}
#n = dllfunc("LockSelection");
while(1) {
#n = dllfunc("EnumSelection", 1);
if( #n == 0 ) {
break;
}
if( dllfunc("GetMailFlag", "mark") ) {
#mark = 1;
break;
}
}
#n = dllfunc("UnlockSelection", 1);
if( #count > 1 ) {
#n = dllfunc("EnableDraw");
}
if( #mark ) {
question "マークされたメールが含まれてます。かまわずに削除しますか？";
if( result != yes ) {
endmacro;
}
}
Label_Delete:
#n = dllfunc("Move", "", "ゴミ箱");
|
|