频道分类

delphi 正则判断是否包含数字

作者:admin 来源: 日期:2020/2/29 0:19:16 人气: 标签:

 
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 判断字符串是否包含数字下一篇:没有资料