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;
 

相关阅读 >>

Delphi 模仿qq截图

qdac项目

Delphi 生成指定范围和个数的不重复的随机整数

Delphi用mapfileandchecksum 函数检测 exe 或 dll 是否被修改

Delphi readprocessmemory 输入进程id 输入读取地址

Delphi 判断端口(port)是否被占用

Delphi 链接转换为本地文件路径

Delphi 判断dll动态链接库是否可用

Delphi中获取客户区坐标

Delphi中怎样得到系统当前“输入法”名称？

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

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