| |
未読フォルダへ移動する機能は無いんですが、マクロを使えば一応実現可能です。な
のでとりあえずマクロでやってほしいです。
「設定 - 秀丸エディタの動作環境...」の「環境」ページでマクロ用フォルダを適当
に指定して、そこにメモ帳を使うなどして２つのマクロを作成します。マクロの文字
コード（エンコード）は、メモ帳で作成するなら「UTF-16BE」を選択します。
秀丸エディタで作成するなら「名前を付けて保存」の「エンコードの種類」の所に
「Unicode(UTF-16)」を選択し「BOMを付ける」をONにします。
上検索と下検索の２つのマクロを作成して保存して、「マクロ」メニューの「マクロ
登録...」を実行し、「秀丸メール本体側」のマクロ1〜のどこかに適当にマクロ登録
します。あとは「マクロ」メニューからマクロを選択すれば実行できますが、さらに
「設定 - キー割り当て」からどこかのキーにそのマクロを割り当てておけば、キー
一発で実行できます。
-------------「上方向の未読フォルダ選択マクロ.mac」-------------------------
-------------
loaddll "tkinfo.dll";
$account = dllfuncstr("CurrentAccount");
$folder = dllfuncstr("CurrentFolder");
//上方向に未読フォルダを探す。
while(1) {
$s = dllfuncstr("GetPrevFolder", $account, $folder);
if( $s == "" || $s == $prev ) {
Label_NotFound: ;
message "現在アカウント内の上方向に未読フォルダはありません。";
endmacro;
}
$prevAccount = $account;
$prev = $s;
#x = strstr( $s, "\\");
if( #x >= 0 ) {
$account = leftstr( $s, #x);
$folder = midstr( $s, #x + 1, 256 );
} else {
$account = $s;
$folder = "";
}
if( $account != $prevAccount ) {
goto Label_NotFound;
}
if( $folder != ""
&& $folder != "ゴミ箱"
&& dllfunc("GetFolderMailCount", $account, $folder, "unread") != 0 ) {
//見つけた
#n = dllfunc("SelectFolder", $account, $folder);
endmacro;
}
}
-------------「下s方向の未読フォルダ選択マクロ.mac」------------------------
--------------
loaddll "tkinfo.dll";
$account = dllfuncstr("CurrentAccount");
$folder = dllfuncstr("CurrentFolder");
//下方向に未読フォルダを探す。
while(1) {
$s = dllfuncstr("GetNextFolder", $account, $folder);
//message $account + "/" + $folder + "\nnext= " + $s;
if( $s == "" || $s == $prev ) {
Label_NotFound: ;
message "現在アカウント内の下方向に未読フォルダはありません。";
endmacro;
}
$prevAccount = $account;
$prev = $s;
#x = strstr( $s, "\\");
if( #x >= 0 ) {
$account = leftstr( $s, #x);
$folder = midstr( $s, #x + 1, 256 );
} else {
$account = $s;
$folder = "";
}
if( $account != $prevAccount ) {
goto Label_NotFound;
}
if( $folder != ""
&& $folder != "ゴミ箱"
&& dllfunc("GetFolderMailCount", $account, $folder, "unread") != 0 ) {
//見つけた
#n = dllfunc("SelectFolder", $account, $folder);
endmacro;
}
}
|
|