Anzahl der Elemente einer Aufzählung

[Andreas L.]

Hi,

wie kann ich die Anzahl der Elemente einer Enumeration ermitteln?

Folgendes funktioniert leider nicht:

Delphi-Quellcode:

type
  TCsScCategory = (
    cscText,
    cscInteger,
    cscFloat,
    cscDateTime,
    cscColor,
    cscURL,
    cscHTML,
    cscEncryption,
    cscHash
  );

...
...

procedure TForm1.Button1Click(Sender: TObject);
var
  i: Integer;
begin
  i := High(TCsScCategory);
  // i := Length(TCsScCategory); 
  ShowMessage(IntToStr(i));
end;

Bei beiden Varianten erhalte ich vom Compiler die Meldung:

Zitat:

[DCC Fehler] Unit1.pas(42): E2029 '(' erwartet, aber ')' gefunden

Schöne Grüße,
Andreas