[Mishko]

я так и сделал)

Display('Winsock version ' + IntToStr(LOBYTE(WinsockInfo.wHighVersion)) + '.' + IntToStr(HIBYTE(WinsockInfo.wHighVersion)));
Display(String(StrPas(WinsockInfo.szDescription))) ;
Display(String(StrPas(WinsockInfo.szSystemStatus)) );