Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

прибавление IP


IgoX ©   (2004-02-06 18:17:00) 

есть IP от 10.98.54.2 до 10.98.55.250
нужно просканировать этот интервал

unsigned long IPrangeF,IPrangeL;
IN_ADDR a;
IPrangeF = inet_addr("10.98.54.2");
d = inet_addr("0.0.0.1");
IPrangeF=IPrangeF+d;
a.S_un.S_addr = IPrangeF;
ShowMessage(IPrangeF);

прибавляет и получается 10.98.54.3 но когда 10.98.54.255 и прибаляю  еще 0.0.0.1 то третий актет не растети получается 10.98.54.0
Работать со строкой (переводить в строку и вырезать Substr) некрасиво
Кто нибудь решал подобную задачу


IgoX   (2004-02-07 08:02:00) [1]

Спасибо


Verg   (2004-02-06 20:34:00) [2]


> unsigned long IPrangeF,IPrangeL;
> IN_ADDR a;
> IPrangeF = ntohl(inet_addr("10.98.54.2"));
> //d = inet_addr("0.0.0.1");
> IPrangeF= htonl(IPrangeF+1);
> a.S_un.S_addr = IPrangeF;
> ShowMessage(IPrangeF);


"Сетевой порядок байт", "Порядок байт хоста" - слышал такие слова?


Наверх

Титульная страница Поиск, карта сайта Написать письмо