Enumerations in Delphi with Custom Values

Question

You can declare enumerations with custom values in Delphi 5 as follows:

type
  MyEnum = (meVal1 = 1, meVal2 = 3); // compiler error

Thank!

+3

Someone Sep 06 '10 at 7:43

4 answers

gabr · Answer 1 · 2010-09-06T11:53:03+0000

In old Delphis you can do

type
  MyEnum = (meUnused1, meVal1, meUnused2, meVal2);

Ben laan · Answer 2 · 2010-09-06T07:54:46+0000

It is legal under this article . Let me remind you that in earlier versions of Delphi delivery values were not supported.

This can help ensure you get a "compiler error." Also, which version of Delphi are you using?

Uli Gerhardt · Answer 3 · 2010-09-06T08:16:44+0000

Delphi (< = D5 IIRC), . , enum ? -

const
  meVal1 = 1;
  meVal2 = 3;

type
  TMyEnum = Byte; // or Integer or ... - depends on your needs.

, , .

shunty · Answer 4 · 2010-09-06T08:52:38+0000

, - :

type
  TMyEnum = (meVal1, meVal2);

const
  MY_ENUM_VALS: array[TMyENum] of integer = (1, 3);

if (aVal = MY_ENUM_VALS[meVal2]) then...

Not really, I give you, but at least you get a bit more compiler errors for those early versions of Delphi.