Ich habe da schon versucht statt Include direkt zu addieren, aber es geht einfach nicht mehr.
Bei XE gibt es natürlich auch neue Möglichkeiten, die ich dann irgendwann nutzen werde, aber kurzfristig geht es so einfach nicht mehr, weil variable Werte nicht mehr erlaubt sind. Gerade die brauche ich an solchen Stellen aber oft...
Da ist mit Sicherheit ein anderer Bug am Werke.
Delphi-Quellcode:
function GetAllAnchors: TAnchors;
var
i: TAnchorKind;
begin
Result := [];
for i := Low(TAnchorKind) to High(TAnchorKind) do
begin
Include(Result, i);
end;
end;
liefert [akLeft,akTop,akRight,akBottom].
Edit: SJConfigUTilsDemo kompiliert und läuft tadellos unter XE Update1