|
>(エディタの範疇でないかもしれませんが・・・) または、そういうマクロでもあ
ればいいので
こんなマクロはいかがですか...
//"(&F) file list - directory "
ppkn_file_list1:
$wk1 = input(directory2+"\n\nfile list - 検索するファイル ?","*.*");
if( ! result ){endmacro;}
if( strlen($wk1) == 0 ){
grepdialog;
if( ! result ){endmacro;}
if( iskeydown( 0x1B ) ){//[Esc]
if( basename == "" && x+y == 0 ){
quit;endmacro;
} else {
endmacro;
}
}
} else {
grep ".", $wk1, directory2, regular, icon, filelist;
}
if( basename == "" && code == eof ){
quit;endmacro;
}
disableinvert;disabledraw;
//Rreplaceallfast "\\(1\\)$", "", regular;
replaceallfast "\\([0-9]*\\)$", "", regular;
#i = result;
gofiletop;
enableinvert;enabledraw;
message str(#i) + " - file(s) found !";
setsearch "", 0x00;//reset. 記憶にありません !
//Rselectall;tab;escape;gofiletop;
endmacro;
|
|