ПРОВЕРКА IP АДРЕСА DELPHI

При программировании на Delphi регулярно возникает необходимость проверять IP-адреса. В Delphi есть стандартные методы проверки IP-адреса, но также существуют дополнительные библиотеки, которые позволяют более гибко контролировать правильность введенных адресов.

function IsValidIP(const Value: string): Boolean;var i: Integer; IpAddress, S: string; C: Integer; SubStrings: TStringList;begin IpAddress := Trim(Value); SubStrings := TStringList.Create; try ExtractStrings(['.'], [], PChar(IpAddress), SubStrings); Result := (SubStrings.Count = 4); if not Result then Exit; for i := 0 to 3 do begin S := SubStrings[i]; Val(S, C, i); if (i <> Length(S)) or (C > 255) or (C < 0) then begin Result := False; Exit; end; end; finally SubStrings.Free; end;end;

Приведенный выше код позволяет проверить корректность введенного IP-адреса. Функция IsValidIP возвращает True, если адрес является корректным, и False — если нет.

Программисты могут использовать такую функцию в своих проектах для контроля корректности введенных данных. Также могут использоваться и другие библиотеки, которые могут предоставлять более широкий спектр проверок.

ip and host delphi,берем ip и имя нашего компьютера Delphi7.

TCP client and server in Delphi

Тест на Delphi

Урок на делфи 58. Пинг (ping).

Как узнать внешний IP. Delphi урок 1

Узнать IP

Реклама
Новое
Реклама