Delphi XE6记录类型赋值

program Project1;

{$APPTYPE CONSOLE}
{$R *.res}

uses
  System.SysUtils;

TYPE
  Trec = record
    Member1, Member2: Integer;
  end;

CONST
  IntRec: Trec = (Member1: 55; Member2: 2);

begin
  Writeln(IntRec.Member1);
  Writeln(IntRec.Member2);
  Readln;
end.

定义的时候，是可以进行赋值的 ，记录类型好神奇啊 ！