ちょっとしたスクリプト2016年4月 - Tablacus Explorer
某所で要望があった機能をスクリプトで書いてみました。
・ファイル群とフォルダ群の境目にジャンプ
var FV = GetFolderView(Ctrl,pt);
var Items = FV.Items();
var bFolder = !IsFolderEx(Items.Item(0));
var nIndex = Math.floor((Items.Count - 1) / 2);
var nDiff = nIndex;
while (nDiff) {
if (bFolder ^ IsFolderEx(Items.Item(nIndex))) {
nIndex += nDiff;
} else {
nIndex -= nDiff;
}
nDiff = Math.floor(nDiff / 2);
}
while (bFolder ^ IsFolderEx(Items.Item(nIndex))) {
nIndex++;
}
FV.SelectItem(Items.Item(nIndex), SVSI_SELECT | SVSI_DESELECTOTHERS | SVSI_ENSUREVISIBLE | SVSI_FOCUSED);