React — русскоговорящее с...
Android Developers
Python
Vue.js — русскоговорящее ...
supapro.cxx
DotNetRuChat
GNU/Linux Help
Telegram Developers
Node.js — русскоговорящее...
DevOps — русскоговорящее ...
JavaScript Noobs — сообще...
![Django [ru]](https://image.telq.org/channel_avatar_1063854692_12437233608009742_mini.jpeg){kind=avatar}
Django [ru]
Go-go!
Angular - русскоговорящее...
ntwrk
Верстка сайтов HTML/CSS/J...
phpGeeks
Kubernetes — русскоговоря...
Битрикс для разработчиков
MODX. Русскоязычное сообщ...
pgsql – PostgreSQL
Laravel Pro
iOS Developers — русского...
ClickHouse не тормозит
Rust — русскоговорящее со...
JavaScript — русскоговоря...
С#
pro.cxx
pro.jvm
React Native — русскогово...
Devs Chat
Docker — русскоговорящее ...
HTML/CSS — русскоговоряще...
Python beginners
🐧 RU.UBUNTU — Официальное...
Kotlin Community
Embedded Group
Чат экстремального погром...
aiogram
Scala User Group
Haskell
PHP
TypeScript
Клуб Vue.js-разработчиков
Xamarin Developers (MAUI,...
F# Chat
![Svelte [svelt] - All abou...](https://image.telq.org/channel_avatar_1142273288_5399907573915831550_mini.jpeg){kind=avatar}
Svelte [svelt] - All abou...
Системное администрирован...
Nuxt.js | Vue SSR
var chat = new Chat();
Data Science Chat
Ассемблер
Android Architecture
Laravel для начинающих
Церковь метрик
Dart & Flutter
QA — русскоговорящее сооб...
Tarantool
pro.elixir
Python Flask
SAP ABAP
R (язык программирования)
learn.java
DevsHelper
Big Data Science :: AI / ...
Delphi & Lazarus
SwiftBook
Solidity Development
Evolution CMS официальное...
pro.net (former COM+)
OpenStreetMap RU
Visual Studio Code — русс...
ru_mysql
pro.lua
Dart / Flutter
GraphQL — русскоговорящее...
pro.Asm
IDE и редакторы — русског...
OpenCartForum - 🇺🇦🇪🇺Чат O...
Angular.js (1.x) — русско...
Frontend_ru
Lame C
Flutter Developers — русс...
AutoIT RU
AI / Искусственный Интелл...
dlang.ru
Laravel Framework Russian...
WebPwnChat
Чат — Верстка Сайтов и Фр...
pro.python
Java Underground
Natural Language Processi...
javascript_ru
SqlCom.ru - сообщество MS...
Cinema 4D
Delphi Community
pro.vim
Server Side Swift Develop...
Autohotkey_RU ( v1 & v2 )
PHP DevConf KZ🇰🇿
Modern::Perl
pro.rb (Ruby/Rails / RU)
RubyRush.ru
Oracle RU
ru.nim.talks
DevOps
Odoo talks & fun
Software Design/Architect...
sql_ninja
AndroidDev Pro:: Професси...
WordPress for developers
PowerShellRus - о Powersh...
Haskell Start
Эльбрусы и с чем их едят
Java/Kotlin and more
pro.buildsystems
Powershell Rus
ErlangRus
Python для анализа данных
Скрипты Гугл, Таблицы, Go...
WebGL ru
Compiler Development
firebase_ru — русскоговор...
Electron.js
phpclub.ru
RU.CRYPTOGRAPHY — Криптог...
pro.osdev - os developmen...
MySQL
Lame C++
QA juniors
GameDev for Web
Go Get A Job
PostgreSQL (English)
Ember_js
Tilda Developers
RU.Docker — Официальное Р...
Emacs — русскоговорящее с...
FreePascal & Lazarus
Язык программирования Jul...
WordPress – русскоговорящ...
Django
sentry_ru
ReasonML и OCaml
WebAssembly — русскоговор...
ansible — русскоговорящее...
Сrystal Lang — русскогово...
aiohttp
Clojure — русскоговорящее...
heroku_ru
PowerShell Pro
macOS Developers — русско...
systemd
use Perl or die;
FORTH и родственные ЯП
Natural Language Processi...
ru_jenkins
CatBoost
CyberBiology
Sequelize - community (en...
sonarqube_ru
Elm Lang сообщество разра...
SublimeText_RU
NativeScript
WordPress CodeRun
ReactiveX - русскоговорящ...
PureScript — русскоговоря...
#Вайти
Эликсир и Вунш
Cassandra
Здравствуйте. Подскажите пожалуйста, есть какая-то стандартная функция проверки корректности IP
адреса?
12 ответов
IsValidIP из IdGlobalProtocols.pas
IsValidIP из IdGlobalProtocols.pas
ничоси они там поизвращались :))))
Денис
Автор вопроса
Если нужно строго валидировать откидывая извращенные адреса вида "0x4.0x3.002.16", то начиная с висты есть RtlIpv4StringToAddress с параметром strict=true.
Если нужно строго валидировать откидывая извращенн...
Функция работает, но не пойму почему в случае ошибки ошибка пустая? function RtlIpv4StringToAddress(S: PWideChar; Strict: Boolean; var Terminator: PWideChar; var Addr: in_addr) : Cardinal; stdcall; external 'Ntdll.dll' name 'RtlIpv4StringToAddressW'; ... const STATUS_SUCCESS = $00000000; var term: PChar; a: in_addr; status: Cardinal; serr: string; begin status := RtlIpv4StringToAddress(PChar(Edit1.Text), false, term, a); if status = STATUS_SUCCESS then begin ShowMessage(Format('IP address: "%d.%d.%d.%d"', [a.S_un_b.s_b1, a.S_un_b.s_b2, a.S_un_b.s_b3, a.S_un_b.s_b4])); if Length(term) > 0 then ShowMessage('Terminator: ' + string(term).QuotedString('"')); end else begin serr := SysErrorMessage(status, 0); // empty! ShowMessage('Error: ' + serr + '(0x' + status.ToHexString() + ')'); end;
Функция работает, но не пойму почему в случае ошиб...
глючная функция: принимает комбинации типа 1111 1111 1111 2222,2222
Так это валидные адреса, кроме последнего с запятой. Если поставить strict=true, то такие уже не пройдут.
Так это валидные адреса, кроме последнего с запято...
Хотя что с запятой что с пробелом для RtlIpv4 валидны, т.к. она умеет отбрасывать окончание и кладёт его в terminator.
Хотя что с запятой что с пробелом для RtlIpv4 вали...
даже не смешно 😉
Похожие вопросы
Обсуждают сегодня