I'm running Rad Studio XE7, I have run into a problem. Wonder if you all can help.

I'm running Rad Studio XE7, I have run into a problem. Wonder if you all can help.

I have isolated my problem to this example code below, I think it may be a bug. I'm wondering if anybody else can test this in either their copy of XE7 and higher and give me some feedback. I'm using similar constructs all over my code, which was working and for some reason now fails with an access violation. Any thoughts would be great.

Code:

unit Unit1;

interface

uses
Winapi.Windows,
Winapi.Messages,
System.SysUtils,
System.Variants,
System.Classes,

Vcl.Graphics,
Vcl.Controls,
Vcl.Forms,
Vcl.Dialogs;

type

TForm1 = class(TForm)
procedure FormCreate(Sender: TObject);
private
public
end;

var
Form1: TForm1;

const
ABYTE_DEF = 0;

var
BytesConst: TBytes = [1, 2, 3, 4];

implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
var
aBytes: TBytes;
begin
aBytes := BytesConst + [ABYTE_DEF];
end;

end.

Nothing on the form just hook up the OnCreate to the FormCreate method. Hit run in debugger and an Access Violation occurs. I have traced using madExcept and the call stack shows the error in @DynArrayCopyRange.

Any thoughts? Could you tell me if it work ok in higher versions of Delphi.
Many Thanks.