Тема: Incompatible types
Показать сообщение отдельно
  #1  
Старый 28.08.2015, 14:31
Mishko Mishko вне форума
Прохожий
 
Регистрация: 28.08.2015
Сообщения: 28
Версия Delphi: Delphi XE5
Репутация: 10
Смущение Incompatible types

Уважаемые профи, подскажите плиз.
При компиляци проекта возникает ошибка

[dcc32 Error] MainForm.pas(9466): E2010 Incompatible types: 'FWZipZLib.TCompressionLevel' and 'System.ZLib.TCompressionLevel'

Строка Item.CompressionLevel := TCompressionLevel(Byte(2));

Действительно описания типов в юнитах не соответствуют. Привожу к единообразию как в System.ZLib, но ошибка все равно возникает.

Первоначальные объявления классов:

юнит FWZipZLib

TCompressionLevel = (
clNone,
clFastest,
clDefault,
clMax,
clLevel1,
clLevel2,
clLevel3,
clLevel4,
clLevel5,
clLevel6,
clLevel7,
clLevel8,
clLevel9
);

юнит System.ZLib

TZCompressionLevel = (zcNone, zcFastest, zcDefault, zcMax);

// CG: Define old enum for compression level
TCompressionLevel = (clNone = Integer(zcNone), clFastest, clDefault, clMax);

В описании в System.ZLib пытался менять Integer(zcNone) на Byte(zcNone), не помогло
Ответить с цитированием