E2013 Le type de l'expression doit être INTEGER (Delphi)

Remonter à Messages d'erreur et d'avertissement (Delphi)

Ce message d'erreur n'est fourni que lorsque l'expression constante spécifiant le nombre de caractères d'un type chaîne courte n'est pas de type entier.

program Produce;
type
  color = (red,green,blue);
var
  S3 : string[Succ(High(color))];
begin
end.

L'exemple essaie de spécifier le nombre d'éléments d'une chaîne selon les éléments maximum de type Color - malheureusement, le compteur d'éléments est de type Color, ce qui est incorrect.

program Solve;
type
  color = (red,green,blue);
var
  S3 : string[ord(High(color))+1];
begin
end.