Delphi Compiler Bug?

I found a Bug of Delphi XE3 Compiler,It may exists in XE4,XE5.

Here is the code to show the bug

procedure Test;overload;
begin
  ShowMessage('procedure Test;');
end;

procedure Test(Value:Integer);overload;
begin
  if Value=1 then ShowMessage('procedure Test(Value:Integer);');
end;

var
  T:procedure(Value:Integer);
procedure TForm1.FormCreate(Sender:TObject);
begin
  T:=@Test;
  T(1);
end;

 We expect The results is "procedure Test(Value:Integer);",

but it shows "procedure Test;"

我們期待的結果應該是顯示"procedure Test(Value:Integer);"

實際上顯示的是"procedure Test;"

哪位幫忙在xe4，xe5上測試下，是否還存在此bug

誰有embarcadero的賬號，請到qc提交。