==========================
C:\codetyphon\CodeOcean\Solutions\samples\LSRegEx
目前可以验证的格式:
CLSHTTPSendAttempts: Byte = 3; CLSConstsNullDate: TDateTime = 0; CLSConstsNullTime: TDateTime = 0; CLSConstsTimeFormat: ShortString = 'hh:mm:ss'; CLSConstsDateFormat: ShortString = 'yyyy/mm/dd'; CLSConstsExtractIPRegEx: string = '^(25[0-5]|2[0-4][0-9]|[0-1]{1}[0-9]{2}|[1-9]{1}[0-9]{1}|[1-9])\.(25[0-5]' + '|2[0-4][0-9]|[0-1]{1}[0-9]{2}|[1-9]{1}[0-9]{1}|[1-9]|0)\.(25[0-5]|2[0-4]' + '[0-9]|[0-1]{1}[0-9]{2}|[1-9]{1}[0-9]{1}|[1-9]|0)\.(25[0-5]|2[0-4][0-9]|[' + '0-1]{1}[0-9]{2}|[1-9]{1}[0-9]{1}|[0-9])$'; CLSConstsExtractEmailRegEx: string = '([\w\d\-\.]+@[\w\d\-]+(\.[\w\d\-]+)+)'; CLSConstsExtractEmailRegEx2: string = '[^\w\d\-\.]([\w\d\-\.]+@[\w\d\-]+(\.[\w\d\-]+)+)[^\w\d\-\.]'; CLSConstsExtractURLRegEx: string = '((http)|(https)|(ftp)):\/\/([\- \w]+\.)+\w{2,3}(\/ [%\-\w]+(\.\w{2,})?)*'; { Matches (12) 123 1234 | (01512) 123 1234 | (0xx12) 1234 1234 Non-Matches 12 123 1234 | (012) 123/1234 | (012) 123 12345 See: http://regexlib.com/REDetails.aspx?regexp_id=34 } CLSConstsExtractTelRegEx: string = '\(([0-9]{2}|0{1}((x|[0-9]){2}[0-9]{2}))\)\s*[0-9]{3,4}[- ]*[0-9]{4}'; { Matches 18008793262 | 800-879-3262 | 0-800.879.3262 Non-Matches 879 3262 | 077 879 3262 | 879-3262 } CLSConstsExtractTelRegEx2: string = '^[01]?[- .]?\(?[2-9]\d{2}\)?[- .]?\d{3}[- .]?\d{4}$'; CLSSendMailPath: string = {$IFDEF UNIX} '/usr/bin/lssendmail' {$ELSE} '%s\LazSolutions\LSSendMail\lssendmail.exe' {$ENDIF}; CLSTimeEditDisplayFrmtHM: string = 't'; CLSTimeEditDisplayFrmtHMS: string = 'tt'; CLSTimeEditMaskHM: string = '!#9%s99;1;_'; CLSTimeEditMaskHMS: string = '!#9%s99%s99;1;_'; CLSGeoIPCountryDATFileName: TFileName = 'GeoIP.dat'; CLSGeoIPCityDATFileName: TFileName = 'GeoLiteCity.dat';
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。