Delphi Email地址合法性检测判断.rar下载

[weixin_39821228]

Delphi Email地址合法性检测判断，这是个相当 小且实用的验证判断 程序，用来验证用户输入的Email程序是否合法，可判断@符号之前、之后的后缀是否合法，以及整个Email地址是否合乎规则。主要代码如下：
　　if (pos('@',edit4.Text)<2) then showmessage('您的E_mail地址不合法!!!') else
　　if (pos('@',rightstr(edit4.text,3))=0) then
　　begin
　　 mystr:=rightstr(edit4.text,length(edit4.text)-pos('@',edit4.Text
相关下载链接：//download.csdn.net/download/weixin_39840914/11319913?utm_source=bbsseo