如何判斷字符串是否是有效EMAIL地址
function IsEMail(EMail: String): Boolean;
var s: String;ETpos: Integer;
begin
ETpos:= pos(’@’, EMail);
if ETpos > 1 then
begin
s:= copy(EMail,ETpos+1,Length(EMail));
if (pos(’.’, s) > 1) and (pos(’.’, s) < length(s)) then
Result:= true else Result:= false;
end
else
Result:= false;
end;
var s: String;ETpos: Integer;
begin
ETpos:= pos(’@’, EMail);
if ETpos > 1 then
begin
s:= copy(EMail,ETpos+1,Length(EMail));
if (pos(’.’, s) > 1) and (pos(’.’, s) < length(s)) then
Result:= true else Result:= false;
end
else
Result:= false;
end;
發表評論
所有評論
還沒有人評論,想成為第一個評論的人麼? 請在上方評論欄輸入並且點擊發布.
相關文章
JPA不識別MySQL的枚舉類型
原創
2024-04-02 01:07:56
AppBuilder低代碼體驗:構建雅思大作文組件
Ai technology 前言 AppBuilder上線了低代碼製作組件功能,可以通過工作流的方式構建自定義組件,完成簡單Agent無法完成的複雜功能,使得生成的文本更加定製化,
原創
2024-05-16 00:15:54
有點意思的 Java 遞歸調用
原創
2024-05-13 02:41:48
基於Redis實現基本搶紅包算法
原創
2024-04-17 11:18:19
Java中拼接字符串方式(+、StringBuilder/StringBuffer)分析
原創
2024-04-09 21:31:20
Java中String 、StringBuilder 、StringBuffer 的區別
原創
2024-04-08 09:31:31
go-Channel
原創
2024-03-24 00:10:06
golang調用python實戰
雲棲號資訊小編
2020-09-03 11:13:56
震驚!Redis 的字符串居然是這樣實現的…
雲棲號資訊小哥
2020-08-06 12:10:50
Java 新特性前瞻:封印類
雲棲號資訊小哥
2020-08-05 15:37:51
有啥不同?來看看Spring Boot 基於 JUnit 5 實現單元測試
雲棲號資訊小哥
2020-08-04 10:52:50
5分鐘!用Java實現目標檢測 | PyTorch
雲棲號資訊小哥
2020-07-27 14:40:52
做java兩年了,構造方法和方法重載還是搞不明白?一文幫你搞定
雲棲號資訊小哥
2020-07-23 13:10:53
24小時熱門文章
-
NETCore中實現一個輕量無負擔的極簡任務調度ScheduleTask
-
使用c#強大的表達式樹實現對象的深克隆之解決循環引用的問題
-
GPT-4o 引領人機交互新風向,向量數據庫賽道沸騰了
-
free AI online tools All In One
-
痞子衡嵌入式:恩智浦i.MX RT1xxx系列MCU啓動那些事(12.A)- uSDHC eMMC啓動時間(RT1170)
-
基於Ubuntu-22.04安裝K8s-v1.28.2實驗(二)使用kube-vip實現集羣VIP訪問
-
基於Ubuntu-22.04安裝K8s-v1.28.2實驗(三)數據卷掛載NFS(網絡文件系統)
-
企業大模型如何成爲自己數據的“百科全書”?
-
本地SSL證書過期 輸入命令在IIS自動生成
-
.NET週刊【5月第2期 2024-05-12】