Winapi.IpRtrMib.pas

[raxp]

был скомпилирован с другой версией

чушь.

Под XE5 прекрасно компилируется с ним проект по отлову наличия Ethernet кабеля, а файлик 2011 года.

[ZuBy]

У меня стоит триалка, Architect XE6.

Кто собирал в ней старые проекты, уже матерился и не слабо. Её переработали, многие баги пропали конечно, функции и процедуры перекинули в другие модули, значения некоторых методов в компонентах сгруппировали/изменили... в общем много всего.

но у кого нибудь есть нужный мне файлик?

[raxp]

Я вам скинул pas, который XE5 кушает свободно, а вы тут dcu обводите. Киньте этот pas- модуль непосредственно в каталог с Indy пакетом, если оно его хочет и пути исправьте.

[StriderX]

Сообщение от ZuBy

У меня стоит триалка, Architect XE6.
...
но у кого нибудь есть нужный мне файлик?

Проверяйте, XE6:

[ZuBy]

StriderX огромное спасибо!
raxp, в architect'e нет pas файлов. там одни dcu, но студия не кушала dcu от appmethod, поэтому я просил pas файл

[raxp]

...вам и дан был сразу pas файл.

[ZuBy]

Сообщение от raxp

...вам и дан был сразу pas файл.

я ведь привел ошибку которую выдавал компилятор с вашим pas файлом!

ладно это все уже не важно, тему можно закрывать!

[northener]

Сообщение от ZuBy

я ведь привел ошибку которую выдавал компилятор с вашим pas файлом!

Так надо было сразу сказать что pas-файлов вообще никаких нет.

[raxp]

А я дал совет куда положить модуль и исправить пути.

[ZuBy]

Сообщение от raxp

А я дал совет куда положить модуль и исправить пути.

структура PMIB_IPADDRTABLE немного изменена, поэтому конфликт с модулем Winapi.IpHlpApi был

вот так в старом

type 
  PMIB_IPADDRROW = ^MIB_IPADDRROW; 
  {$EXTERNALSYM PMIB_IPADDRROW} 
  _MIB_IPADDRROW = record 
    dwAddr: DWORD; 
    dwIndex: DWORD; 
    dwMask: DWORD; 
    dwBCastAddr: DWORD; 
    dwReasmSize: DWORD; 
    unused1: Word; 
    unused2: Word; 
  end; 
  {$EXTERNALSYM _MIB_IPADDRROW} 
  MIB_IPADDRROW = _MIB_IPADDRROW;

вот так в новом

type
  PMIB_IPADDRROW = ^MIB_IPADDRROW;
  {$EXTERNALSYM PMIB_IPADDRROW}
  _MIB_IPADDRROW_XP = record
    dwAddr: DWORD;
    dwIndex: DWORD;
    dwMask: DWORD;
    dwBCastAddr: DWORD;
    dwReasmSize: DWORD;
    unused1: Word;
    wType: Word;
  end;
  {$EXTERNALSYM _MIB_IPADDRROW_XP}
  MIB_IPADDRROW = _MIB_IPADDRROW_XP;