本文整理自网络,侵删。
检查输入的IP地址串是否合法
uses WinSock;
function IsLegalIP(IP: String): Boolean;
begin
if(Longword(inet_addr(pchar(IP)))=INADDR_NONE) then Result := false
else Result := true;
end;
相关阅读 >>
Delphi windows 编程[9] - wm_close 消息
Delphi 获取动态创建的image与scrollbox的相对位置
更多相关阅读请进入《Delphi》频道 >>