| |
以前作っていただいたマクロがあります。
メールエディタ画面で実行すると、添付ファイルが並び変わります。
受信メールも送信メールもどちらも並び替えができます。
参考にしてください。
loaddll "tkinfo.dll";
#cAttach = 0;
while (1) {
$aAttach[#cAttach] = dllfuncstr("CurrentHeader2","X-Attach",#cAttach);
if ($aAttach[#cAttach] == "") {
break;
}
#cAttach = #cAttach + 1;
}
if (#cAttach == 0) {
endmacro;
}
#update = 0;
#x = 0;
while (#x < #cAttach - 1) {
#y = #x + 1;
while (#y < #cAttach) {
if ($aAttach[#x] > $aAttach[#y]) {
$temp = $aAttach[#x];
$aAttach[#x] = $aAttach[#y];
$aAttach[#y] = $temp;
#update = 1;
}
#y = #y + 1;
}
#x = #x + 1;
}
if (#update != 0) {
#htmlview = dllfunc("IsHtmlMailViewerVisible");
#main = dllfunc("IsHidemaruMailMain");
#readonly = readonly;
if (#main != 0) {
#n = dllfunc("BeginEditMail");
}
else {
if (#readonly != 0) {
#n = dllfunc("EnableEdit");
if (readonly) {
readonlyswitch;
}
}
}
#x = 0;
while (#x < #cAttach) {
#n = dllfunc("SetHeader2","X-Attach:",$aAttach[#x],#x);
#x = #x + 1;
}
if (#main != 0) {
#n = dllfunc("SaveEditMail",0,0);
}
else {
if (#readonly != 0) {
#n = dllfunc("AlterSave");
#n = dllfunc("SetMailFlag","altered",0);
if (! readonly) {
readonlyswitch;
}
}
}
if (#htmlview != 0 && dllfunc("IsHtmlMailViewerVisible") == 0) {
#n = sendmessage(hidemaruhandle(0),0x111,40336,0);
}
}
|
|