Compilermeldung E2100 Datentyp zu groß: 2 GB überschritten?

[newbe]

Hallo allerseits,

Ich bekomme folgende Compilerfehlermeldung...

[dcc32 Fehler] GraphicUtilities.pas(147): E2100 Datentyp zu groß: 2 GB überschritten

..und weis leider nicht warum.

es hängt mit folgender Konstantendeklaration zusammen.

Delphi-Quellcode:

const
  SortGlyphs: array[TSortDirection, Boolean] of Integer = ( // ascending/descending, normal/XP style
    (3, 5) {ascending}, (2, 4) {descending}
  );

der ensprechende Aufruf sieht so aus...

SortIndex:= SortGlyphs[Sender.SortDirection, tsUseThemes in Sender.Treeview.TreeStates]; Wenn ich die beiden Sachen auskommentiere läuft alles, Code wieder rein bekomme ich das...

[dcc32 Fehler] GraphicUtilities.pas(147): E2100 Datentyp zu groß: 2 GB überschritten
[dcc32 Fehler] GraphicUtilities.pas(149): E2072 Anzahl der Elemente (2) weicht von der Deklaration (0) ab
[dcc32 Fehler] GraphicUtilities.pas(280): E2010 Inkompatible Typen: 'Integer' und 'TSortDirection'

Der Gag ist das der Code in der VirtualTrees unit so ohne Probleme läuft. Ich habe nur die Konstanten in meine Unit übernommen, da diese von Außen nicht zugänglich war. Kann mir jemand einen Tip geben?

mfg newbe