Konstantenauflistung (wie clGreen, clRed, ) selber erstellen

[Christian Seehase]

Moin dartrax,

Zitat von dartrax:

Allerdings akzeptiert Delphi es nicht, wenn ich statt Coin50 z. B. 2 auf eine TCoinTyp-deklarierte Eigenschaft zuweise.

Wie geht das?

mittels Typecast:

Delphi-Quellcode:

var
  MyVariable : TCoinTyp;

begin
  MyVariable := TCoinTyp(2);
...
end;