Проблема с winsock2

[firerap]

При компиляции проекта в delphi 2010 выдает ошибку

[DCC Error] winsock2.pas(1009): E2026 Constant expression expected

Ругается на:

  
  SERVICE_TYPE_VALUE_SAPID    = SERVICE_TYPE_VALUE_SAPIDW;
  SERVICE_TYPE_VALUE_TCPPORT  = SERVICE_TYPE_VALUE_TCPPORTW;
  SERVICE_TYPE_VALUE_UDPPORT  = SERVICE_TYPE_VALUE_UDPPORTW;
  SERVICE_TYPE_VALUE_OBJECTID = SERVICE_TYPE_VALUE_OBJECTIDW;

Я поменял значения констант на :

SERVICE_TYPE_VALUE_SAPID  : PWideChar    = 'SapId';
...

Компиляция происходит, но почему-то не выполняются нужные функции.

На delphi7 все работает без проблем.

[GunSmoker]

Скорее всего в опциях проекта какой-то злодей включил Writable Consts, либо же запулил директиву прямо в сырцы.

А этот WinSock2 - ваш? Если нет - то нафига вы его перекомпилируете?