[Mishko]

Уважаемые! При компиляции код из D2010 в XE5 ошибка в строке Data := WinsockInfo;. Может кто нибудь сталкивался?

Код:

Код:

  { Display winsock info }
    Data := WinsockInfo;
    Display('Winsock version ' + IntToStr(LOBYTE(Data.wHighVersion)) + '.' + IntToStr(HIBYTE(Data.wHighVersion)));
    Display(String(StrPas(Data.szDescription)));
    Display(String(StrPas(Data.szSystemStatus)));

    Caption := Caption + ' ' + HostNameEdit.Text;