通用查询组件设计(续三)[2]

[入库:2005年8月18日] [更新:2007年3月25日]

本文简介:选择自 nxyc_twz 的 blog

          value := '%' + filtervalue; 

        fdmatchexact : //非匹配记录

          value := filtervalue;

      end

else  //大小写不敏感

  case matchtype of

        fdmatchstart, fdmatchany : //起始部分匹配或任意位置匹配

          value := ansiuppercase(filtervalue);

        fdmatchend : //结束部分匹配

          value := '%' + ansiuppercase(filtervalue);  {do not localize}

        fdmatchexact : //非匹配记录

          value := ansiuppercase(filtervalue);

      end;

  end

  else//字段类型为非字符串型

 value := filtervalue;

 

  if matchtype <> fdmatchrange then//如果匹配类型不为按范围

tquery(d).parambyname(fieldname + 'filter').value :=  value

else //否则

    begin

本文关键:通用查询组件设计
 

本站最佳浏览方式为 分辨率 1024x768 IE 6.0(或更高版本的 IE浏览器)

go top