手機號碼驗證

沧江魅影發表於2024-08-15
複製程式碼 
  if (not TRegEx.IsMatch(Edit1.Text, '^[0-9]{11}')) or (length(Edit1.Text) <> 11) then // 11位數字，否則不合格
  begin
    ShowMessage('請輸入正確的11位手機號碼');
    exit;
  end


引用  System.RegularExpressions,
複製程式碼
轉自https://www.cnblogs.com/Thenext/p/13752897.html

相關文章