Delphi default record structure

// Thanks to Earl Glyn (2003)   http://www.delphigroups.info/2/8f/521922.html

program Rec_Default;
{$APPTYPE CONSOLE}
uses
  System.UITypes,
  System.Classes,
  Vcl.Graphics;

type
    TCell = record
      Alignment: TAlignment;   // = taLeftJustify;
      BackColor: TColor;       // = clWindow;
      FontColor: TColor;       // = clBlack;
      FontStyle: TFontStyles;  // = [];
    end;

const
    CellConstant:  TCell = (Alignment:  taLeftJustify;
                            BackColor:  clWindow;
                            FontColor:  clBlack;
                            FontStyle:  []);
begin
  var Cell := CellConstant;
end.