간단하게 Record 초기화 하기

TSampleRecord = Record
  nNumber : Integer;
  sText : string;
  ..
end;

var
  SampleRecord : TSampleRecord;
begin
  SampleRecord := Default(TSampleRecord);
end;