如何确保Delphi例程的16byte代码对齐？

program Align16BytesExample;

{$ALIGN 16}

type
  TMyRecord = record
    Field1: Integer;
    Field2: Double;
  end;

var
  MyVar: TMyRecord;

begin
  MyVar.Field1 := 1;
  MyVar.Field2 := 2.0;
end.

program Align16BytesExample;

{$MINENUMSIZE 4}

type
  TMyEnum = (EnumValue1, EnumValue2);

var
  MyEnumVar: TMyEnum;

begin
  MyEnumVar := EnumValue1;
end.

program Align16BytesExample;

{$IFDEF CPUX64}
  {$ALIGN 16}
{$ELSE}
  {$ALIGN 8}
{$ENDIF}

type
  TMyRecord = record
    Field1: Integer;
    Field2: Double;
  end;

var
  MyVar: TMyRecord;

begin
  MyVar.Field1 := 1;
  MyVar.Field2 := 2.0;
end.