delphi 正则判断是否包含数字

本文整理自网络，侵删。

 
uses RegularExpressions;

procedure TForm4.Button1Click(Sender: TObject);
const
  pattern = '.*\d+.*';
var
  match: TMatch;
begin
  if TRegEx.IsMatch(Edit1.Text, pattern) then
    Memo1.Lines.Add('包含数字')
  else
    Memo1.Lines.Add('不包含数字');
end;
 

相关阅读 >>

使用idhttp抓取百度和google会出错

Delphi cxdbtreelist：最简单的节点图标添加方法

Delphi idhttp的基本用法

datasnap 上传/下载大文件(本demo以图传片文件为例)

Delphi 获取用户当前的windows临时文件夹

Delphi webbroker isapi 示例说明

Delphi获得唯一id字符串

Delphi 验证ip地址

Delphi 在电脑屏幕上显示图片

Delphi中使用内联变量(inline variables) 的5个理由

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » delphi 正则判断是否包含数字