E2083 レコード型のフィールドの順序が宣言と異なります (Delphi)

エラーと警告のメッセージ（Delphi） への移動

このエラーメッセージは型付き定数または初期化済み変数のレコードフィールドが宣言の順序で初期化されていない場合に表示されます。

program Produce;

type
  TPoint = record
    X, Y: Integer;
  end;

var
  Point : TPoint = (Y: 123; X: 456);

begin
end.

{ このコードは宣言とは逆の Y，X の順で初期化しようとしている }

program Solve;

type
  TPoint = record
    X, Y: Integer;
  end;

var
  Point : TPoint = (X: 456; Y: 123);

begin
end.

{ 初期化の順序を宣言の順序に対応させれば解決する }