814123 2018-05-04 13:49 采纳率: 50%
浏览 1494
已采纳

delphi 正则表达式验证手机号与固话?

函数返回,判断一个字符串是手机号还是固话号,用正则匹配,是手机号返回,否则返回空,会正则的老师帮个忙/

  • 写回答

2条回答 默认 最新

  • threenewbee 2018-05-04 14:00
    关注
     先自行下载一个 PerlRegEx
    用下面的代码
    var
      reg: TPerlRegEx;
    begin
      reg := TPerlRegEx.Create(nil);
      reg.Subject := '13701271023';
      reg.RegEx := '1(3|5|7|8)\d{9}';
      if reg.Match then
        ShowMessage('是手机')
      else
        ShowMessage('不是');
      FreeAndNil(reg);
    end;
    
    电话号码,要看你的格式,有没有横杠
    下面这个匹配有横杠的,替换到上面的正则就可以了
    \d{3,4}\-\d{7,8}
    这个能匹配3~4位区号-7~8位电话,比如 010-12345678
    
    本回答被题主选为最佳回答 , 对您是否有帮助呢?
    评论
查看更多回答(1条)

报告相同问题?

悬赏问题

  • ¥15 BP神经网络控制倒立摆
  • ¥20 要这个数学建模编程的代码 并且能完整允许出来结果 完整的过程和数据的结果
  • ¥15 html5+css和javascript有人可以帮吗?图片要怎么插入代码里面啊
  • ¥30 Unity接入微信SDK 无法开启摄像头
  • ¥20 有偿 写代码 要用特定的软件anaconda 里的jvpyter 用python3写
  • ¥20 cad图纸,chx-3六轴码垛机器人
  • ¥15 移动摄像头专网需要解vlan
  • ¥20 access多表提取相同字段数据并合并
  • ¥20 基于MSP430f5529的MPU6050驱动,求出欧拉角
  • ¥20 Java-Oj-桌布的计算