タブ移動マクロ - EmEditorみんなでまとめサイト

タブ移動マクロ

インクリメンタルっぽくタブ移動するマクロです。
誰か改造してもっとステキにしてくれると幸せ

要SeraphyScriptDialog(http://www.vector.co.jp/soft/win95/prog/se134435.html) インスコはregsvr32 scrdlg.dllで。

/**
 * Incremental Buffer Search
 * @require SeraphyScriptDialog
 * http://www.vector.co.jp/soft/win95/prog/se134435.html
 * @purpose
 * 開いているドキュメントの中からインクリメンタルサーチで移動する。要SeraphyScriptDialog
**/

var obj;
var diff;
var n;
var list = new Array;

obj = new ActiveXObject("SeraphyScriptDialog");

frm = obj.CreateForm();
frm.DefineEdit('','',0);
frm.FormTitle = "Incremental Buffer Search";
frm.EnableForm = true;

count = Editor.Documents.Count;
for(i=1;i<=count;i++)
{
	list[i] = Editor.Documents.item(i).Name;
}

frm.ComposeForm();
	do{
		retEvent = frm.WaitEvent(30)

		if(diff != frm.value(0) && frm.value(0) != "")
		{
			for(var n in list)
			{
				if(list[n].search(eval("/" + frm.value(0) +"/i")) !=-1)
				{
					Editor.Documents.Item(parseInt(n)).Activate();
					break;
				}
			}
		}
		diff = frm.value(0);
	}while(retEvent != -1 && retEvent != 101);

frm.DestroyForm();