Changeset 296 for trunk/UUnit.pas

Timestamp:

Mar 29, 2019, 12:58:09 PM (6 years ago)

Author:

chronos

Message:

• Added: New enumeration field type in generic TItem classes.

File:

• trunk/UUnit.pas (modified) (2 diffs)

trunk/UUnit.pas

@@ -115 +115 @@
   else if Index = 6 then Integer(Value) := PowerDefense
   else if Index = 7 then Integer(Value) := ViewRange
-  else raise Exception.Create('Unsupported value index ' + IntToStr(Index));
+  else inherited;
 end;
 
@@ -127 +127 @@
   else if Index = 6 then PowerDefense := Integer(Value)
   else if Index = 7 then ViewRange := Integer(Value)
-  else raise Exception.Create('Unsupported value index ' + IntToStr(Index));
+  else inherited;
 end;