枚举库文件中关键字


//搜索函数用
//搜索注释用
//搜索其它兴趣关键字
//自定义去搜索范例（在脱机玩快手找示范用法）、其它
import win.ui;
/*DSG{{*/
var labsearcher = win.form(parent=...; min=1;bottom=521;max=1;text="库搜索";right=661 )
labsearcher.add(
richedit={ ah=1;vscroll=1;color=0;right=648;left=10;cls="richedit";bottom=512;wrap=1;multiline=1;top=159;font=LOGFONT( name="宋体";h=-19;out=3;family=2;clip=2;quality=1 );aw=1;text="";hscroll=1;edge=1;z=3 };
edit={ bottom=95;color=0;right=254;left=16;multiline=1;top=45;font=LOGFONT( name="宋体";h=-35;out=3;family=2;clip=2;quality=1 );z=0;text="抓";edge=1;cls="edit" };
button={ bottom=148;color=0;right=213;left=47;top=108;font=LOGFONT( name="宋体";h=-35;out=3;family=2;clip=2;quality=1 );z=2;text="搜索";cls="button" };
static={ bottom=40;color=0;right=217;left=71;top=9;font=LOGFONT( name="宋体";h=-29;out=3;family=2;clip=2;quality=1 );transparent=1;text="关键字：";z=1;cls="static" };
listbox={ bgcolor=16777215;vscroll=1;color=0;right=639;left=274;
items={ };font=LOGFONT( name="宋体";h=-19;out=3;family=2;clip=2;quality=1 );text="listbox";z=4;bottom=140;top=44;edge=1;cls="listbox" };
static2={ bottom=33;color=0;right=498;left=347;top=7;font=LOGFONT( name="宋体";h=-29;out=3;family=2;clip=2;quality=1 );z=5;text="双击打开库";transparent=1;cls="static" }
)
/*}}*/
//导入文件操作库
import fsys;
import win;
//导入气泡库
import win.util.tray;
//显示窗体
labsearcher.show(true)
//单击按钮事件
labsearcher.button.oncommand = function(id,event){
//如果为空则提示
if(labsearcher.edit.text=""){win.msgbox("最好严格限制关键词","不能为空") }
//否则运行搜索
else {
//清理列表栏
labsearcher.listbox.clear()
//枚举搜索库文件函数
enumil=function(aautofile){
//展开文件中每一行
for line in io.lines(aautofile) {
//如果找到关键字
    if(string.find(line,labsearcher.edit.text)){
    //返回这一行
    return line
    };
};
}
//定义变量
i=0;
str=""
//枚举文件和文件夹函数
fsys.enum(fsys.getExeDir()+"lib",
  "*.aau",
  function(dir,filename){
  //如果找到文件
    if(filename){
    //变量计数加1
            i+=1
            //气泡提示
            win.util.tray.pop("查找"+i+"个文件","正在努力搞...");
            //如果返回不为空 。则连接路径文件名和返回行并返回这个字符
              if(enumil(dir+filename)!=null){str=str+dir+filename+'\r\n'+enumil(dir+filename)+'\r\n';
              //写入文本栏
              labsearcher.richedit.text=str;
              //加入列表栏文件路径和名
              labsearcher.listbox.add(dir+filename)
                  }
    }
  }
    )
}//endproc
//如果双击了列表栏
labsearcher.listbox.wndproc = function(hwnd,message,wparam,lparam){
//选择列表栏窗口监视的消息
  select(message) {
  //如果是双击
  case 0x203/*_WM_LBUTTONDBLCLK*/{
  import process
  //运行快手打开选中的条目
  process.execute(fsys.getExeFile(),labsearcher.listbox.selText)
  }
  }
  }//if
  win.util.tray.pop("完成","提示")
}//endproc
win.loopMessage();
return winform;