阿赛·游梦鱼·郭言赛·阿赛工作室
全站技术源码素材
  • 发布:biancheng
    //字符串分割:Splitvar reg:TPerlRegEx; List:TStrings;begin List:=TStringList.Create; reg:=TPerlRegEx.Create(nil); reg.Subject:=aaa,bbb,ccc,ddd; reg.RegEx :=,;{这里可是运行相当复杂的分割符啊} reg.Split(List,MaxInt);{第一个参数读
  • 发布:biancheng
    //EscapeRegExChars函数可以自动为特殊字符加转义符号\var reg:TPerlRegEx;begin reg:=TPerlRegEx.Create(nil); reg.Subject:=C++Builer; reg.RegEx :=reg.EscapeRegExChars(C+)+{2};{相当于C\+{2}} reg.Replacement:=◆; reg.ReplaceAll
  • 发布:biancheng
    //Compile、Studyvar reg:TPerlRegEx;begin reg:=TPerlRegEx.Create(nil); reg.RegEx :=ab; reg.Options:=[preCaseLess]; reg.Compile;{编译表达式} reg.Study;{Study方法会检查是否编译,如果没有编译则执行Compile} reg.Replacement:=◆; reg
  • 发布:biancheng
    //Replacevar reg:TPerlRegEx;begin reg:=TPerlRegEx.Create(nil); reg.RegEx :=ab; reg.Replacement:=◆; reg.Subject:=ababab; reg.ReplaceAll; ShowMessage(reg.Subject);//返回:◆◆◆ reg.Subject:=ababab;//下面四行程序,相
  • 发布:biancheng
    //设定搜索范围:Start、Stopvar reg:TPerlRegEx;begin reg:=TPerlRegEx.Create(nil); reg.Subject:=ababab; reg.RegEx :=ab; reg.Replacement:=◆; reg.Start:=1; reg.Stop:=2; whilereg.MatchAgaindo begin reg.Replace; en
  • 发布:biancheng
    //MatchedExpression与SubExpressions[0]var reg:TPerlRegEx;begin reg:=TPerlRegEx.Create(nil); reg.Subject:=CodeGearDelphi2007; reg.RegEx :=Delphi; whilereg.MatchAgaindo begin ShowMessage(reg.MatchedExpre
  • 发布:biancheng
    //查找是否存在varreg:TPerlRegEx;beginreg:=TPerlRegEx.Create(nil);reg.Subject:=CodeGearDelphi2007forWin32;reg.RegEx:=\d;ifreg.MatchthenShowMessage(找到了)elseShowMessage(没找到);FreeAndNil(reg);end;//查找是否存在(方法2)va
  • 发布:biancheng
    //preCaseLess:不区分大小写,相当于其他语言中的ivarreg:TPerlRegEx;beginreg:=TPerlRegEx.Create(nil);reg.Subject:=abcABCaBc;reg.RegEx:=abc;reg.Replacement:=◆;reg.Options:=[preCaseLess];//选项是集合类型的reg.ReplaceAll;ShowMessa
  • 发布:biancheng
    //匹配右边varreg:TPerlRegEx;beginreg:=TPerlRegEx.Create(nil);reg.Subject:=Delphi6;Delphi7;Delphi2007;DelphiNet;reg.RegEx:=Delphi(?=2007);//?=reg.Replacement:=◆;reg.ReplaceAll;ShowMessage(reg.Subject);//返回
  • 发布:biancheng
    //准备:我们先写一个搜索所有英文单词的表达式varreg:TPerlRegEx;beginreg:=TPerlRegEx.Create(nil);reg.Subject:=onetwothreefourfivesixseveneightnineten;reg.RegEx:=\b[A-Za-z]+\b;//这个表达式就可以找到所有的英文单词reg.Replacement:=◆;reg.Replac
  • 发布:biancheng
    //?号的意义是匹配0-1次,如果需要匹配?怎么办varreg:TPerlRegEx;beginreg:=TPerlRegEx.Create(nil);reg.Subject:=你好吗?还行!;reg.RegEx:=\?|!;//加转义用的\reg.Replacement:=◆;reg.ReplaceAll;ShowMessage(reg.Subject);//返回:你好吗◆还行◆FreeAndN
  • 发布:biancheng
    //贪婪匹配var reg:TPerlRegEx;begin reg:=TPerlRegEx.Create(nil); reg.Subject:=标题内容; reg.RegEx :=;//将会全部匹配,因为两头分别是: reg.Replacement:=◆; reg.ReplaceAll; ShowMessage(reg.Subject);//返回:◆ FreeAndNil(reg);end;//
  • 发布:biancheng
    //\b单词边界varreg:TPerlRegEx;beginreg:=TPerlRegEx.Create(nil);reg.Subject:=DelphiDelphi2007MyDelphi;reg.RegEx:=\bDelphi\b;//前后边界reg.Replacement:=◆;reg.ReplaceAll;ShowMessage(reg.Subject);//返回:◆Delphi2007
  • 发布:biancheng
    //\d匹配所有数字,相当于[0-9]varreg:TPerlRegEx;beginreg:=TPerlRegEx.Create(nil);reg.Subject:=期待Delphi2008forWin32!;reg.RegEx:=\d;reg.Replacement:=◆;reg.ReplaceAll;ShowMessage(reg.Subject);//返回:期待Delphi◆◆◆◆forWi
  • 发布:biancheng
    //[A-Z]:匹配所有大写字母varreg:TPerlRegEx;begin reg:=TPerlRegEx.Create(nil); reg.Subject:=CodeGearDelphi2007forWin32; reg.RegEx :=[A-Z]; reg.Replacement:=◆; reg.ReplaceAll; ShowMessage(reg.Subject);//返回:◆ode◆
  • 发布:biancheng
    //|号的使用,|是或者的意思var reg:TPerlRegEx;begin reg:=TPerlRegEx.Create(nil); reg.Subject:=CodeGearDelphi2007; reg.RegEx :=e|Delphi|0;//使用了|记号 reg.Replacement:=◆; reg.ReplaceAll; ShowMessage(reg.Subject);//返回:
  • 发布:biancheng
    //替换一般字符串var reg:TPerlRegEx;begin reg:=TPerlRegEx.Create(nil); reg.Subject:=我爱DELPHI,但Delphi不爱我!; reg.RegEx :=Delphi; reg.Replacement:=◆; reg.ReplaceAll; ShowMessage(reg.Subject);//返回:我爱DELPHI,但◆不爱我!
  • 发布:biancheng
    在Delphi中使用正则表达式,目前PerlRegEx应该是首选,准备彻底而细致地研究它.官方网站:http://www.regular-expressions.info/delphi.html直接下载:http://www.regular-expressions.info/download/TPerlRegEx.zip安装方法:1、先把解压的TPerlRegEx文件夹放一个合适的地方,我放在了D
  • 发布:biancheng
    {IHTMLDocument2方法:}write//写入writeln//写入并换行open//打开一个流,以收集document.write或document.writeln的输出close//关闭并输出用document.open方法打开的流clear//清空文档中所有元素,可能暂时不支持queryCommandSupported//是否支持指定命令queryCommandEnabled//指
  • 发布:biancheng
    {location 对象:}reload //重新加载当前文档replace //用新的文档替换当前文档assign //加载新文档href  //设置或返回完整的 URLprotocol //设置或返回当前 URL 的协议host  //设置或返回 # 号开始的 URL(锚)hostname //设置或返回当前 URL 的主机名port  //设置或返回当前 URL 的端口号pathname /
  • 123456789››59Pagesize= Page=
    知识分类
    推荐知识
    近期热门知识

    MapSiteMapRssGoTop