E2054 Ungültiger Typ in Write/Writeln-Anweisung (Object Pascal)

Aus Appmethod Topics
Wechseln zu: Navigation, Suche

Nach oben zu Fehler- und Warnungsmeldungen (Object Pascal) - Index

Sie haben versucht, einen unzulässigen Typ in einer Write- oder Writeln-Anweisung auszugeben.


program Produce;
type
  TColor = (red,green,blue);
var
  Color : TColor;
begin
  Writeln(Color);
end.

Wäre es nicht bequem, Color mit einer Writeln-Anweisung auszugeben?


program Solve;
type
  TColor = (red,green,blue);
var
  Color : TColor;
const
  ColorString : array [TColor] of string = ('red', 'green', 'blue');
begin
  Writeln(ColorString[Color]);
end.

Leider ist das nicht zulässig, und wir müssen uns mit einer Hilfstabelle behelfen.