FastSerch能够实现快速分组并进行快速组合查询

可设置3级分组 可设置10个组合查询条件 procedure TForm1.BitBtn1Click(Sender: TObject); var tmp1,tmp2:string ; begin tmp1:=FastS_G1.Serch_inivalue; tmp2:=FastS_G1.Serch_userfiltvalue; FastS_G1.Serch_Caption:='XXXXXXXXXXXXXX'; FastS_G1.show_serchquery(tmp1,tmp2) ; ShowMessage(tmp1+'-'+tmp2); end; procedure TForm1.BitBtn2Click(Sender: TObject); var tmp3:string; begin FastS_G1.Serch_Caption:='XXXXXXXXXXXXXX'; FastS_G1.show_SerchGroup(tmp3) ; ShowMessage(tmp3); end;