if ExecRegExpr('^(13[0-9]|15[0-9]|18[0-9])(\d{8})$',Edit1.Text) then begin这个校验手机码可以用
我应该要怎么样才能在一个文本中提取手机号码呢?我是调用这个正则的
unit RegExpr;
C#中的是string strPNR = Regex.Match(EPNR, "^(13[0-9]|15[0-9]|18[0-9])(\d{8})$").Value;
在DELPHI中应该怎么调用啊...急用谢谢!!!
我应该要怎么样才能在一个文本中提取手机号码呢?我是调用这个正则的
unit RegExpr;
C#中的是string strPNR = Regex.Match(EPNR, "^(13[0-9]|15[0-9]|18[0-9])(\d{8})$").Value;
在DELPHI中应该怎么调用啊...急用谢谢!!!
解决方案 »
- 谁做过这样的功能
- 学Spring了,用了一晚上写Blog将D的知识点总结了一下~希望对大家有帮助~另承接外包。求职~长三角、珠三角都可
- 请问一下这句语翻译成delphi怎么写
- 大虾,救命呀
- 请帮我解决一下这个SQL问题?
- 如何限制bordstytle=bssizeable的窗体的最小长宽??
- 关于子窗题的建立问题,请大家帮忙。
- 求助 FileListBox 显示指定文件夹下的文件
- 托盘问题(急!在线等候,100分相送)
- 友情链接,我的网站http://fullstrong.myetang.com/
- 如何用DBimage连接并显示图片?
- delphi连接oracle大家是用何种方式来连?哪种好!
MatchCollection mc = r.Matches(EPNR); foreach (Match m in mc)
{
telCode = m.Groups["telCode"].Value;
}telCode 就是你要提取的手机号码。。思想就是这样,你可以再将那个foreach优化下
reg:=tperlregex.Create(nil) ;
reg.Subject:=edit1.Text ;
reg.RegEx:='^(?:(? <telCode>((13[0-9])|(15[0-9])|(18[0-9]))(\d){8}))$';
if reg.MatchAgain then
telCode:=reg.SubExpressions[1];
end;
我用的是tperlReg 控件,应该和你的那个控件差不多