//---------------------------------------------------------------------------
//  FINDFILES   :   指定フォルダからワイルドカードにマッチする
//                  ファイル名の一覧を取得するルーチン
//      [Usage] :
//          call FINDFILES $$folder, $$file;
//          ##num = ##return;
//
//          $$folder    :   フォルダ名
//          $$file      :   ファイル名のワイルドカード指定
//          ##num       :   見つかったファイルの個数
//                          (ファイル名自体は $ENUM_FILE[] 配列で渡す)
//
//  備考：  テキストファイルのみ検索可能です。
//          バイナリファイルを指定した場合の動作は保証できません。
//
//---------------------------------------------------------------------------
//  サンプル：
//      call FINDFILES "c:\\usr\\src", "*.c";
//      ##num = ##return;
//      $$files = "";
//      ##a = 0;
//      while( ##a < ##num ){
//          $$files = $$files + $ENUM_FILE[##a] + "\n";
//          ##a = ##a + 1;
//      }
//      message "c:\\usr\\src の中にあるソースファイルは\n"+$$files+"です";
//      endmacro;
//---------------------------------------------------------------------------
//
FINDFILES:
    ##hwnd = hidemaruhandle( 0 );
    grep "^", $$2, $$1, regular, filelist, icon;
    ##n = result;
    ##hwnd_grep = hidemaruhandle( 0 );
    selectall;
    copy;
    setactivehidemaru ##hwnd;
    closehidemaruforced ##hwnd_grep;
    if( ##n > 0){
        beginclipboardread;
        ##a = 0;
        while( ##a < ##n ){
            $$s = getclipboard;
            $ENUM_FILE[##a] = leftstr($$s,strlen($$s)-4);
            ##a = ##a + 1;
        }
    }

    return ##n;
//---------------------------------------------------------------------------